asp存储过程使用大全<?xml:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" />

1，调用没有参数的存储过程

<%

set conn=server.CreateObject("adodb.connection")

set cmd=server.CreateObject("adodb.command")

strconn="dsn=pubs;uid=sa;pwd"

 

conn.Open strconn

set cmd.ActiveConnection=conn

 

cmd.CommandText="{call nono}"

 

'set rs=cmc.exe 或者cmd.execute

 

set rs=cmd.Execute()

 

%>

 

2，一个输入的参数的存储过程

<%

set conn=server.CreateObject("adodb.connection")

set cmd=server.CreateObject("adodb.command")

strconn="dsn=pubs;uid=sa;pwd"

 

conn.Open strconn

set cmd.ActiveConnection=conn

 

cmd.CommandText="{call oneinput(?)}"

cmd.Parameters.Append cmd.CreateParameter("@aaa",adInteger ,adParamInput )

cmd("@aaa")=100

 

cmd.Execute()

%>

 

3，一个输入参数和一个输出的参数

<%

set conn=server.CreateObject("adodb.connection")

set cmd=server.CreateObject("adodb.command")

strconn="dsn=pubs;uid=sa;pwd"

 

conn.Open strconn

set cmd.ActiveConnection=conn

 

cmd.CommandText = "{call oneinout(?,?)}"

cmd.Parameters.Append cmd.CreateParameter("@aaa",adInteger,adParamInput)

cmd("@aaa")=10

cmd.Parameters.Append cmd.CreateParameter("@bbb",adInteger,adParamOutput)

 

cmd.Execute()

 

bbb=cmd("@bbb")

%>

 

4，一个输入参数，一个输出参数，和一个返回值

<%

set conn=server.CreateObject("adodb.connection")

set cmd=server.CreateObject("adodb.command")

strconn="dsn=pubs;uid=sa;pwd"

 

conn.Open strconn

set cmd.ActiveConnection=conn

 

cmd.CommandText="{?=call onereturn(?,?)}"

 

cmd.Parameters.Append cmd.CreateParameter("@return_value",adInteger,adParamReturnValue )

cmd.Parameters.Append cmd.CreateParameter("@aaa",adInteger,adParamInput )

cmd("@aaa")=10

cmd.Parameters.Append cmd.CreateParameter("@bbb",adInteger,adParamOutput)

 

cmd.Execute()

 

bbb=cmd("@bbb")

rrr=cmd("@return_value")

%>