如何用VB处理带形参的存储过程？

来源：百度知道 编辑：UC知道 时间：2024/06/24 08:10:51
用SQL Server已经编好了一个数据库，里面有几张表，根据这几张表编好了存储过程。
用VB的ADO控件已经和SQL连接上了，如何调用SQL的存储过程，实现在两个框里面输入实参，经过SQL存储过程处理后，返回值在第三个框里面显示出来？
我对VB一窍不通

'Dim cn As New Connection '定义连接对象
'
Dim cm As New Command '定义命令对象
'
Dim rs As New Recordset '定义纪录集对象
'
Dim p As New Parameter '定义参数对象

On Error Resume Next
'
Set cm = New Command
'
'设置command对象的运行参数
'
cm.ActiveConnection = conn
'
cm.CommandType = adCmdStoredProc
'
cm.CommandText = "test"
'
'为参数查询提供参数值
'

cm.Parameters.Append cm.CreateParameter("pid", adWCharm, adParamInput, , "2")
set rs = cm.Execute

CONN是一个公有数据库连接，connect，你可以自己定义一个连接。不知道你的不了解程度到底是不了解到什么地步？