怎样在VB中调用一个SQL SERVER的存储过程？？？

Question

使用command 对象和 params对象
慢慢调吧

Answer 1

Dim adocn As New ADODB.Connection
Dim cmd1 As New ADODB.Command
adocn.open ........
....................
cmd1.CommandType = adCmdStoredProc
cmd1.CommandText = "存储过程名"
cmd1.ActiveConnection = adocn
cmd1.Parameters.Refresh
For i = 1 To cmd1.Parameters.Count
    cmd1.Parameters("需要的参数名称") = 参数值
Nextcmd1.execute

Answer 2

我喜欢用数据环境，而且我现在也一直在用数据环境，简单还好管理。建一个COMMAND，选择对向存储过程：再选你要用的那个。可以了。

Answer 3

Dim cnn As New Connection
Dim Cmd As New Command
Dim rs As New Recordset
Dim fld As Field
Dim prm As Parameter' 为存储过程定义命令对象。
cnn.Open "DSN=Pubs"
cnn.CursorLocation = adUseClient
Cmd.CommandText = "testOut"
Cmd.CommandType = adCmdStoredProc
Cmd.Name = "Test"' 定义存储过程的输入参数。
Set prm = Cmd.CreateParameter("Country", adVarChar, adParamInput, 20)
Cmd.Parameters.Append prm
Set prm = Cmd.CreateParameter("TotalHits", adVarChar, adParamOutput, 4)
Cmd.Parameters.Append prm
Set Cmd.ActiveConnection = cnn' 通过执行该命令调用存储过程。
cnn.Test "Usa", rsLabel1.Caption = Cmd.Parameters("TotalHits")