在ASP中如何调用存储过程？

在ASP中如何调用sqlserver中的存储过程？
---------------------------------------------------------------

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")