依靠ADO执行存储过程,要用Command命令。在Command命令执行存储过程中,CommandType属性取值为adCmdStoredProc,使基础提供者产生相应的SQL语句。对于ODBC提供者,过程调用的ODBC换码序列进行为{[?=] call procedurename[([parameter][,[parameter]]…)]},SQL Serve ODBC驱动器针对这个序列进行优化。
例程1:
Dim Cmd As New ADODB.Command
Dim rs As New ADODB.Recordset
Cmd.CommandText="sp_who" '//////引号内为存储过程
Cmd.CommandType=adCmdStoredProc
Set rs=Cmd.Execute()
Debug.Print rs(0);rs(1);rs(2)
rs.Close
这个存储过程不接受任何变元。如果要存储过程接受变元,则参数由ADO中的CreateParameter方法提供。语法如下:
Set parameter=command.CreateParameter(Name,Type,Direction,Size,Value