请问在VB里如何调用有参数的sqlserver存储过程？

[xf2gl]

请问各位大侠，写了一个存储过程stuff_over(@sup_guid nvarchar,@class1 nvarchar,@price float)
请问在VB程序里如何调用该存储过程，谢谢～

[Tiger_Zhao]

用 ADODB.Command 对象，MSDN 中找例程

[aohan]

没有输出参数时，直接

rs.open "exec stuff_over 参数1,参数2,参数3，…… ",cn,1,3


就可以了

有输出参数时用Command 对象

比如：

On Error GoTo err:
cmd.CommandText = "Att_CalCulateEmp"
cmd.CommandType = adCmdStoredProc
cmd.ActiveConnection = Cn
cmd.Parameters.Append cmd.CreateParameter("empid", adInteger, adParamInput, , Empid)
cmd.Parameters.Append cmd.CreateParameter("startdate", adDate, adParamInput, , EmpRundate)
cmd.Parameters.Append cmd.CreateParameter("totaltime", adInteger, adParamOutput)
cmd.Parameters.Append cmd.CreateParameter("markid", adInteger, adParamOutput)
cmd.Execute
Set cmd = Nothing
Exit Sub
err:
MsgBox err.Description