如何在存儲過程中使用rdo連接

使用VB6和SQL Server 2000如何在存儲過程中使用rdo連接

我想使用rdo連接將值傳遞給存儲過程。

我知道存儲過程和rdo連接字符串，但我不知道如何通過rdo連接將參數值傳遞給存儲過程。

試過代碼

Dim rsql As rdoQuery 
       'Set rsql = rdovispay 
       rsql.rdoParameters ("Storeprocedure1") 
       rsql.rdoParameters(0).Direction = rdParamReturnValue 
       rsql(1) = Eid 
       rsql.Execute

任何人都可以提供用於該參數值傳遞到存儲過程的一個示例代碼？

來源

2011-11-21 Gopal

從MSDN：

參數查詢簡單地替換用戶提供的或應用程序提供的參數爲普通的查詢。雖然此查詢通常是SELECT語句，但它也可以是INSERT，UPDATE或DELETE查詢。以下示例說明如何使用單個參數對簡單SELECT查詢進行編碼。該查詢通過Pubs示例數據庫中的名稱查找作者。

首先，設置一個SQL查詢，使用？標記每個參數。參數標記。

QSQL $ =「SELECT * FROM Authors WHERE Au_Lname =？」

接下來，創建一個rdoQuery對象來管理查詢及其參數。

集PSAuthors = cn.CreateQuery（「」，QSQL $）

接下來，使用下面的代碼中插入由用戶（Text1.Text）到查詢中輸入的值。

PSAuthors.rdoParameters（0）= Text1.Text

你可以找到完整的頁面here

你的代碼（ODBC語法）將被修改爲：

Dim rsql As rdoQuery 
Dim QSQL as string 

' if your data source is ODBC then use the ODBC syntax 
'QSQL$ = "{ ? = call Storeprocedure1 (?) }" 

' if your data source is SQL, then use the SQL syntax 
'QSQL$ = "Execute Storeprocedure1 ?" 

Set rsql = Connection.CreateQuery("", QSQL$) 
rsql.rdoParameters(0).Direction = rdParamReturnValue 
rsql(1) = Eid ' set the input parameter 
rsql.Execute

來源

2011-11-22 05:07:44 jac

我不不想創建查詢，只是我想將參數值傳遞給存儲過程。 – Gopal

@Gopal，創建查詢是如何將參數傳遞給存儲過程。例如 - QSQL $ =「{？=調用sp_my_stored_proc（？，？）}」 – jac

如何在存儲過程中使用rdo連接

回答

相關問題