在VB中如何调用带参数的SP_EXECUTESQL[系统存储过程]呀!谢谢了!

来源：百度知道 编辑：UC知道 时间：2024/05/22 01:19:26
在VB中如何调用带参数的SP_EXECUTESQL呀!我找了好多资料都没有找到答案,看哪位高手能帮个忙!最好是能给个完整的代码呀!

VB中调用存储过程的几种方法
[ 2006-12-27 17:54:00 | By: ybl1987 ]

2
推荐'第一种方法
Dim conn As String
Dim cn As New adodb.Connection
Dim cm As New adodb.Command
conn = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=Stu"
cn.ConnectionString = conn
cn.Open
cm.ActiveConnection = cn
cm.CommandText = "vag" '存储过程名
cm.CommandType = adCmdStoredProc
cm.Parameters.Item("@Num").Value = "020301" '输入参数的值
cm.Execute
MsgBox cm.Parameters.Item("@val").Value '存储过程式的返回值

'第二种方法
Set rs = cm.CreateParameter("Num", adChar, adParamInput, 6, "020301")
cm.Parameters.Append rs
Set rs = cm.CreateParameter("val", adChar, adParamOutput, 6)
cm.Parameters.Append rs

Dim ado as ADODC
ado.ConnectionString = "Provider=SQLOLEDB.1;Password=" & User_Pwd & &