1个回答
展开全部
你可以使用ADODB的Command、Connection对象来调用。
Dim adoComm As Object
'// 创建一个对象,我们用来调用存储过程
Set adoComm = CreateObject("ADODB.Command")
With adoComm
'// 设置连接,假设 adoConn 为已经连接的 ADODB.Connection 对象
.ActiveConnection = adoConn
'// 类型为存储过程,adCmdStoredProc = 4
.CommandType = 4
'// 存储过程名称
.CommandText = "存储过程名"
'// 设置参数值
.Parameters.Item("@参数").Value = 1
'// 执行存储过程
.Execute
'// 取得从存储过程返回的返回参数值
Msgbox .Parameters.Item("@返回参数").Value
End With
'// 释放对象
Set adoComm = Nothing
Dim adoComm As Object
'// 创建一个对象,我们用来调用存储过程
Set adoComm = CreateObject("ADODB.Command")
With adoComm
'// 设置连接,假设 adoConn 为已经连接的 ADODB.Connection 对象
.ActiveConnection = adoConn
'// 类型为存储过程,adCmdStoredProc = 4
.CommandType = 4
'// 存储过程名称
.CommandText = "存储过程名"
'// 设置参数值
.Parameters.Item("@参数").Value = 1
'// 执行存储过程
.Execute
'// 取得从存储过程返回的返回参数值
Msgbox .Parameters.Item("@返回参数").Value
End With
'// 释放对象
Set adoComm = Nothing
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询