導航:首頁 > 源碼編譯 > vb如何編譯sql語句

vb如何編譯sql語句

發布時間:2023-02-03 16:24:17

A. VB6.0里怎麼寫SQL語句

第一個窗體form1上添加一個textbox控制項,一個command控制項。
第二個窗體form2上添加一個datagrid控制項。
注意:示例使用的資料庫是access的。使用時在textbox控制項里輸入查詢的SQL語句。如select * form 資料庫中的表名

Private Sub Command1_Click()
Dim mycon As ADODB.Connection
Dim myrt As ADODB.Recordset

Set mycon = New ADODB.Connection
Set myrt = New ADODB.Recordset

mycon.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=輸入資料庫文件位置如(D:\db1.MDB)"
mycon.Open

myrt.CursorLocation = adUseClient
myrt.Open Text1.Text, mycon, adOpenStatic, adLockOptimistic

Set Form2.DataGrid1.DataSource = myrt
Form2.Show
End Sub

B. 如何把sql語句寫進vb程序裡面啊

VB實現SQL Server 2000存儲過程調用

存儲過程是存儲在伺服器上的一組預編譯的Transact-SQL語句,是一種封裝重復任務操作的方法,支持用戶提供的變數,具有強大的編程功能。它類似於DOS系統中的BAT文件。在BAT文件中,可以包含一組經常執行的命令,這組命令通過BAT文件的執行而被執行。同樣的道理,可以把要完成某項任務的許多Transact-SQL語句寫在一起,組織成存儲過程的形式,通過執行該存儲過程就可以完成這項任務。存儲過程與BAT文件又有差別,即存儲過程已經進行了預編譯。

1、創建存儲過程的方法

在Transact-SQL語言中,創建存儲過程可以使用CREATE PROCEDURE語句,其語法形式如下:

CREATE PROC[EDURE] procere_name[;number]
[{@parameter data_type}[VARYING][=default][OUTPUT]
]],…n]
[WITH{RECOMPILE|ENCRYPTION|RECOMPILE,ENCRYPTION}]
[FOR REPLICATION]
AS sql_statement[…n]

在上面的CREATE PROCEDURE語句中,方括弧"[ ]"中的內容是可選的,花括弧"{}"中的內容是必須出現的,不能省略,[,…n]表示前面的參數樣式,可以重復出現。豎線"|"表示兩邊的選項可以任選一個。

下面分析該語句中各種選項的含義。

CREATE PROCEDURE是關鍵字,也可以寫成CREATE PROC。

procere_name是該存儲過程的名稱,名稱可以是任何符合命名規則的標示符。名稱後的[;number]參數表示可以定義一系列的存儲過程名稱,這些存儲過程的數量由number指定。

參數名稱可以使用@parameter data_type來指定。在Transact-SQL語言中,用戶定義的參數名稱前面加"@"符號,這些數據類型是Transact-SQL語言允許的各種數據類型,包括系統提供的數據類型和用戶定義的數據類型。

當參數類型為cursor時,必須使用關鍵字VARYING和OUTPUT。VARYING表示結果集可以是一個輸出參數,其內容是動態的。該關鍵字只能在使用游標作為數據類型時使用。關鍵字OUTPUT表示這是一個輸出參數,可以把存儲過程執行的結果信息返回應用程序。
default用於指定參數的默認值。

RECOMPILE選項表示重新編譯該存儲過程。該選項只是在需要的時候才使用,例如經常需要改變資料庫模式時。

ENCRYPTION選項用來加密創建存儲過程的文本,防止他人查看。

選項FOR REPLICATION主要用於復制過程中。注意,該選項不能和選項RECOMPILE同時使用。

AS是一個關鍵字,表示其後的內容是存儲過程的語句。參數sql-statement[…n]表示在一個存儲過程中可以包含多個Transact-SQL語句。

2、存儲過程的優點

在頻繁訪問資料庫的系統中,開發者都樂於使用存儲過程,這與存儲過程的下列優點是分不開的。

⑴ 存儲過程可以與其他應用程序共享應用程序的邏輯,從而確保一致的數據訪問和操縱。

⑵ 存儲過程提供了一種安全機制。如果用戶被授予執行存儲過程許可權,那麼即使該用戶沒有訪問在執行該存儲過程中所參考的表或視圖的許可權,該用戶也可以完全執行該存儲過程而不受到影響。因此,可以創建存儲過程來完成所有的增加、刪除等操作,並且可以通過編程式控制制上述操作中對信息的訪問許可權。

⑶ 存儲過程執行速度快,便於提高系統的性能。由於存儲過程在第一次執行之後,其執行規劃就駐存在過程高速緩沖存儲區中,在以後的操作中,只需從過程高速緩沖存儲區中調用編譯好的二進制形式存儲過程來執行。

⑷ 使用存儲過程可以減少網路傳輸時間。如果有一千條Transact-SQL語句的命令,一條一條地通過網路在客戶機和伺服器之間傳送,那麼這種傳輸所耗費的時間將很長。但是,如果把這一千條Transact-SQL語句的命令寫成一條較為復雜的存儲過程命令,這時在客戶機和伺服器之間網路傳輸所需的時間就會大大減少。

SQL Server 2000資料庫存儲過程的調用

VB作為當今應用極為普遍的資料庫客戶端開發工具之一,對客戶端應用程序調用伺服器端存儲過程提供了強大的支持。特別是隨著VB6.0的推出,VB客戶端應用程序可以方便地利用ADO的對象和集合來實現對資料庫存儲過程的調用。

在筆者編寫的科技檔案管理系統中,就是採用VB作為開發平台,採用SQL Server2000資料庫管理數據,在這個科技檔案管理系統中有海量的數據,並且對資料庫有頻繁的訪問,利用存儲過程訪問資料庫節省了執行時間,大大提高了系統的性能。

1、ADO簡介

ADO控制項(也稱為ADO Data控制項)與VB固有的Data控制項相似。使用ADO Data控制項,可以利用Microsoft ActiveX Data Objects(ADO)快速建立資料庫綁定控制項和數據提供者之間的連接。

ADO Data控制項可以實現以下功能:

·連接一個本地資料庫或遠程資料庫。

·打開一個指定的資料庫表,或定義一個基於結構化查詢語言(SQL)的查詢、存儲過程或該資料庫中的表的視圖的記錄集合。

·將數據欄位的數值傳遞給數據綁定控制項,可以在這些控制項中顯示或更改這些數值。

·添加新的記錄,或根據更改顯示在綁定的控制項中的數據來更新一個資料庫。

2、資料庫的連接

資料庫的連接可通過ADO控制項實現,為此,必須在工程部件中選擇Microsoft ADO Data Control 6.0 (OLEDB),然後在窗體中添加ADO控制項。利用ADO連接資料庫有兩種方法,具體如下。

1) 通過ADODC屬性頁實現連接

在ADODC屬性頁中選擇生成按鈕,進入數據鏈接屬性對話框;然後選擇該對話框中的連接屬性頁,選擇或輸入伺服器名稱和資料庫等重要信息;最後測試連接,連接成功後,按確定按鈕,返回到屬性頁對話框,可獲得連接字元串,如下例:

Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=Science_File;Data Source=Data_Server

其中sa是用戶名;Science_File是資料庫名;Data_Server是資料庫名。

通過下列語句,即可連接到指定的資料庫:

dim odbcstr as String, adocon As New ADODB.Connection
odbcstr = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=Science_File;Data Source=Data_Server"
adocon.Open odbcstr '連接到資料庫

2) 直接使用連接語句實現

連接資料庫的語句如下:

Dim ado as ADODC
ado.ConnectionString = "Provider=SQLOLEDB.1;Password=" & User_Pwd & ";Persist Security Info=True;User ID=" & User_Name & ";Initial Catalog=" & Data_Name & ";Data Source=" & server_name

其中User-Pwd是用戶密碼;User_Name是用戶名;Data_Name是資料庫名;server_name是伺服器名。

連接資料庫成功後就可以調用存儲過程執行操作。

3、存儲過程的調用

假設有一個名為doc_ProcName存儲過程,該存儲過程有一個輸入參數,一個輸出參數。

1) 直接傳遞參數調用存儲過程

直接傳遞參數方法主要通過以下幾個步驟來實現:

(1) 通過ADODB的Connection對象打開與數據源的連接;

(2) 通過ActiveConnection指定Command對象當前所屬的Connection對象;

(3) 通過CommandText屬性設置Command對象的源,即要調用的存儲過程;

(4) 通過CommandType屬性確定Command對象的源類型,如果源類型為存儲過程CommandType即為adCmdStoredProc;

(5) 通過Command對象的Parameters集合向所調用的存儲過程傳遞參數,其中對象Parameters(0)為執行存儲過程的返回值,返回值為0則執行存儲過程成功;

(6) 通過Eexecute方法執行在 CommandText 屬性中指定的存儲過程。

以存儲過程doc_ProcName為例,關鍵代碼如下:

Dim strS As String '定義一變數
Dim adoconn As New ADODB.Connection 'Connection 對象代表了打開與數據源的連接。
Dim adocomm As New ADODB.Command 'Command 對象定義了將對數據源執行的指定命令。
Dim ReturnValue As Integer '調用存儲過程的返回值
adoconn.ConnectionString = Adodc1.ConnectionString 'Adodc1為窗體中的ADO控制項,並已成功連接資料庫
adoconn.Open
Set adocomm.ActiveConnection = adoconn '指示指定的 Command對象當前所屬的 Connection對象。
adocomm.CommandText = "doc_ProcName" '設置Command對象源。
adocomm.CommandType = adCmdStoredProc '通知提供者CommandText屬性有什麼,它可能包括Command對象的源類型。設置這個屬性優化了該命令的執行。
adocomm.Parameters(1) = "1"
adocomm.Parameters(2) = "OutputParameters" 'OutputParameters可以為任意的字元串或數字
adocomm.Execute
ReturnValue = adocomm.Parameters(0) '存儲過程的返回值,返回0則成功執行。
strS = adocomm.Parameters(2) '把存儲過程的輸出參數的值賦給變數strS

2) 追加參數法調用存儲過程

追加參數通過CreateParameter方法,用來指定屬性創建新的Parameter對象。具體語法如下:

Set parameter = command.CreateParameter (Name, Type, Direction, Size, Value)

·Name 可選,字元串,代表 Parameter 對象名稱。
·Type 可選,長整型值,指定 Parameter 對象數據類型。
·Direction 可選,長整型值,指定 Parameter 對象類型。
·Size 可選,長整型值,指定參數值最大長度(以字元或位元組數為單位)。
·Value 可選,變體型,指定 Parameter 對象值。

這種方法與上面一種方法的分別主要在於,追加參數的方法在向存儲過程傳遞參數時,這種方法首先通過CreateParameter方法為存儲過程創建參數,然後通過Append方法將創建的參數追加到Parameters集合中去。

仍然以存儲過程doc_ProcName的調用為例,關鍵代碼如下:

Dim mRst As ADODB.Recordset 'Recordset 對象表示的是來自基本表或命令執行結果的記錄全集。
Dim prm As ADODB.Parameter 'Parameter 對象代表參數或與基於參數化查詢或存儲過程的Command 對象相關聯的參數。
adoconn.ConnectionString = Adodc1.ConnectionString
adoconn.Open
Set adocomm.ActiveConnection = adoconn
adocomm.CommandText = "doc_ProcName"
adocomm.CommandType = adCmdStoredProc
Set prm = adocomm.CreateParameter("parameter1", adTinyInt, adParamInput, , "1")
adocomm.Parameters.Append prm
Set prm = adocomm.CreateParameter("parameter2", adInteger, adParamOutput)
adocomm.Parameters.Append prm
Set mRst = adocomm.Execute
ReturnValue = adocomm.Parameters(0)

以上代碼中未定義的變數以及未注釋的語句與前述相同。

C. VB中如何運用SQL查詢語句

在VB6中可用ADO及DATAGRID控制項,用如下語句可更靈活:
Private Sub Form_Load()
Text1 = ""
With Adodc1
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:\db1.mdb;Persist Security Info=False"
Adodc1.RecordSource = "select name from b1 order by name"
Adodc1.Refresh
DataGrid1.Refresh
End With
End Sub

Private Sub Text1_Change()
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:\db1.mdb;Persist Security Info=False"
Adodc1.RecordSource = "select name from b1 where name >='" & Text1 & "' order by name"
Adodc1.Refresh'對查詢更新
DataGrid1.Refresh
End Sub

資料庫用VB6編程語言,對新手而言,如何用好ADODC控制項和DATAGRID控制項相當重要。上面的原代碼基於ADODC控制項和DATAGRID控制項的靈活應用。具體做法:
新建工程時選數據工程,此時VB6集成調試環境左邊工具箱內已載入了有關資料庫編程必須的控制項。
然後在FORM1窗體中添加ADODC控制項和DATAGRID控制項,將DATAGRID1的屬性DATASOURCE選ADODC1,打開ADODC1控制項屬性頁使用連接字元串,選生成,在提供者選項中ACCESS資料庫選MICROSOFT jet 4.0 OLE DB Provider,然後按要求連接資料庫等。在ADODC1控制項屬性頁使用連接字元串空白文本窗口中就有一長串字元串,注意該字元串可復制到程序代碼用於編程。ADODC1控制項屬性頁的數據源內有命令文本(SQL)編寫窗口可編寫SQL查詢語言。該窗口的SQL語句可復制到程序代碼用於編程。
SQL查詢語言主要結構為:
Select 查詢欄位 from 表名 Where 查詢條件語句 [排序語句或分組語句]
查詢欄位必須分別用(西文)逗號分開或就用一個*號代替,上述查詢中排序語句建議最好應用。
SQL查詢語言如有錯程序運行時告訴你出錯,作相應改動即可。本人一般先按上述連接,SQL用"SELECT * FROM TabelName"作調試,無問題,用一個按鈕孔件將前述需復制的連接字元串和SQL查詢語言先復制於按鈕控制項的CLICK事件中備著,以便放著以後使用。然後刪去ADODC1孔件,再添加ADODC1控制項再添其他內容。
以上不知是否說清楚?SQL查詢語言多寫多用就會熟練,以上供提問者參考。

D. VB如何寫SQL語句

sql="select * from (表格名字) where id='" & text1.text & "' and name='" & text2.text & "' and age="' & text3.text & "' order by id asc"
order by id asc 這句意思是按id升序排列,可寫可不寫。

閱讀全文

與vb如何編譯sql語句相關的資料

熱點內容
法國經典復古四級有哪些 瀏覽:598
帶英文字幕的中文電影 瀏覽:899
泰國百合劇大全 瀏覽:506
甲骨文雲伺服器流量 瀏覽:222
程序員不那麼程序員都么可愛 瀏覽:535
惠普文件夾怎麼加密 瀏覽:742
沐風之女在線觀看 瀏覽:713
術後pdf 瀏覽:497
免費看的韓國電影劇情片 瀏覽:118
單片機sck 瀏覽:829
絕佳江山一攻多受 瀏覽:936
程序員佐藤是什麼電視劇 瀏覽:31
forcedirected演算法 瀏覽:883
沒有命令的你 瀏覽:731
python47小時講解 瀏覽:368
cad2010命令狀態欄 瀏覽:353
李采譚所有電影名 瀏覽:797
永不收費的影視網站 瀏覽:139
python中字元串的截取 瀏覽:434
黑人電影 瀏覽:617