vb中能不能調用sql server存儲過程且返回存儲過程中的結果集

Question

請教高手一個關於數據庫的問題.
vb中能不能調用sql server存儲過程且返回存儲過程中的結果集.
謝謝!

Answer 1

Sub Main()
    Dim cn As ADODB.Connection
    Dim rs As Recordset
    
    Set cn = New ADODB.Connection
    cn.Open "Driver={SQL Server};Server=(local);Database=master;Uid=sa;Pwd=;"
    
    Set rs = New ADODB.Recordset
    rs.Open "sp_who(DEFAULT)", cn, , , adCmdStoredProc
    Debug.Print rs.GetString
    
    rs.Close
    cn.Close
End Sub

Answer 2

如果存储过程用数据集返回,用ADO执行调用语句就是了,可以返回数据的