1,调用没有参数的存储过程
1
2set conn=server.CreateObject("adodb.connection")
3set cmd=server.CreateObject("adodb.command")
4strconn="dsn=pubs;uid=sa;pwd"
5
6conn.Open strconn
7set cmd.ActiveConnection=conn
8
9cmd.CommandText="{call nono}"
10
11'set rs=cmc.exe 或者cmd.execute
12
13set rs=cmd.Execute()
14
2,一个输入的参数的存储过程
1
2set conn=server.CreateObject("adodb.connection")
3set cmd=server.CreateObject("adodb.command")
4strconn="dsn=pubs;uid=sa;pwd"
5
6conn.Open strconn
7set cmd.ActiveConnection=conn
8
9cmd.CommandText="{call oneinput(?)}"
10cmd.Parameters.Append cmd.CreateParameter("@aaa",adInteger ,adParamInput )
11cmd("@aaa")=100
12
13cmd.Execute()
14
3,一个输入参数和一个输出的参数
1
2set conn=server.CreateObject("adodb.connection")
3set cmd=server.CreateObject("adodb.command")
4strconn="dsn=pubs;uid=sa;pwd"
5
6conn.Open strconn
7set cmd.ActiveConnection=conn
8
9cmd.CommandText = "{call oneinout(?,?)}"
10cmd.Parameters.Append cmd.CreateParameter("@aaa",adInteger,adParamInput)
11cmd("@aaa")=10
12cmd.Parameters.Append cmd.CreateParameter("@bbb",adInteger,adParamOutput)
13
14cmd.Execute()
15
16bbb=cmd("@bbb")
4,一个输入参数,一个输出参数,和一个返回值
1
2set conn=server.CreateObject("adodb.connection")
3set cmd=server.CreateObject("adodb.command")
4strconn="dsn=pubs;uid=sa;pwd"
5
6conn.Open strconn
7set cmd.ActiveConnection=conn
8
9cmd.CommandText="{?=call onereturn(?,?)}"
10
11cmd.Parameters.Append cmd.CreateParameter("@return_value",adInteger,adParamReturnValue )
12cmd.Parameters.Append cmd.CreateParameter("@aaa",adInteger,adParamInput )
13cmd("@aaa")=10
14cmd.Parameters.Append cmd.CreateParameter("@bbb",adInteger,adParamOutput)
15
16cmd.Execute()
17
18bbb=cmd("@bbb")
19rrr=cmd("@return_value")