?? 如何直接調用后臺存儲過程.txt
字號:
如何直接調用后臺存儲過程?
我開發了一個程序,數據在服務器端處理,通過ODBC和Access通訊。在實際應用中,調用后臺存儲過程不方便,花費時間也長。有什么好辦法可以在Access中傳遞查詢,直接將命令發送到數據庫服務器去?
Access是有一種直接調用的方法的。這種方法不需要一個中間的表去排隊或激活后臺存儲過程,應該說,它的應用范圍是很廣的。我們可以用Access 傳遞查詢直接將命令發送到數據庫服務器,加快處理速度。但這種方法Oracle 8.0中不能實現。
具體方法如下:
一、建立Access 傳遞查詢步驟:
1、在數據庫窗口中選中“查詢”項,然后按下“新建”按鈕;
2、在“新建查詢”對話框中選中“設計視圖”選項,然后單擊“確定”按鈕;
3、在“顯示表”對話框內按下“關閉”按鈕;
4、在“查詢”菜單里選中“SQL 語句條件”,然后單擊“傳遞”命令;
5、單擊工具欄里的“屬性”按鈕,顯示查詢屬性表;
6、在查詢屬性表中,設置“ODBC 連接字符串”屬性來指定要連接的數據庫信息,可輸入連接信息:
ODBC;DSN=ntserver0;UID=sa;PWD=;DATABASE=BMS
或按下“生成器”按鈕直接生成;
7、將“返回記錄”屬性設置為“否”(存儲過程不需返回記錄);
8、在“SQL 傳遞查詢”窗口中輸入傳遞查詢:
exec statistics
statistics 是SQL Server 數據庫的一個存儲過程;
9、關閉查詢,保存stat_query。
二、運行傳遞查詢:
1、用Microsoft Access的宏 OpenQuery。
2、用下面的事件過程:
Private Sub 統計_Click()
Dim dbs As Database, qdf As QueryDef
Dim tmq As Dynaset
Dim strSQL As String
Set dbs = CurrentDb
Set qdf = dbs.OpenQueryDef("stat_query ")
' 打開上面建的傳遞查詢stat_query
qdf.Execute
Set dbs = Nothing
End Sub
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -