vb如何执行sql server已经有的存储过程？

Question

vb如何执行sql server已经有的存储过程，最好能给出点代码

Answer 1

Dim cnn As New ADODB.Connection
With cnn
     .ConnectionString = "PROVIDER=MSDASQL;driver={SQL Server};server=hwq;" _
                       & "uid=SA;pwd=;database=CyData;"
     .Open
End With
cnn.Execute "exec 存储过程名 [[参数1，][参数2，]...]"

Answer 2

adoconn.Execute proc @pramm = 'AA'

Answer 3

adoconn.Execute "exec proc @pramm = 'AA'"

Answer 4

chenyu5188(来自东方的狼) 的对，应该用command好一点，我错了.

Answer 5

我是这样做的，没有问题！
Dim CN   As New ADODB.Connection                '定义数据库的连接存放数据和代码
Dim Rs   As New ADODB.Recordset
Set CN = New ADODB.Connection
CN.ConnectionString = "Provider=sqloledb;Data Source=zxlserver;Initial Catalog=spcdb2000;User Id=sa;Password=;"
CN.Open
Rs.CursorLocation = adUseClient
Rs.Open "d_ExamSite", CN, adOpenDynamic, adLockBatchOptimistic
For i = 0 To 1000
    If (Not Rs.EOF) Then
        Combo1.AddItem Rs(0) & Rs(1)
        Rs.MoveNext
    End If
Next i
Rs.Close

Answer 6

如果没有参数可用recordset对象，否则用Command对象