VB6 给 SQL 存储过程中的变量赋值问题!!
各位大神小弟遇到一个问题,求指点。
在SQL SERVER中 写了一个存储过程,其中有两个变量,@pro_xrcode 和 @pro_quantity 存储过程如下:
ALTER PROCEDURE Proc_restock
AS
declare @pro_xrcode varchar(15)
declare @pro_quantity int
update tb_stock
set quantity=quantity+@pro_quantity
where xrcode=@pro_xrcode
过程语法没问题,而且在SQL中给变量赋值后正常运行,现在有一个问题,我要在VB语句中来操作这个 存储过程 , 不知道该如何给其中的两个变量赋值,比如 @pro_xrcode = text1.text 类似的 求大虾指点!谢谢!
以下是部分语句,试了很多都不成功…………
Dim cnn As ADODB.Connection
Dim Recommand As
Dim Para As ADODB.Parameter
Dim Rs As ADODB.Recordset
Set cnn = New ADODB.Connection
Set Recommand = New
Set Rs = New ADODB.Recordset
cnn.Open "XXXX"'SQL连接语句
With Recommand
.ActiveConnection = cnn
.CommandType = adCmdStoredProc
.CommandText = "Proc_restock" '存储过程名字
Set Rs = .Execute()
End With