asp+存储过程的使用

在ASP中调用存储过程

<!-- 必须加载adovbs.inc文件，否则将出错 -->

<!--#include file="adovbs.inc"-->

<%

dim objCnn

dim objCmd

dim Rs

const o_id=112

'-----建立Connection对象----------

set objCnn=Server.CreateObject("Adodb.connection")

objCnn.Open "driver={sql server};server=localhost;uid=sa;pwd=cncanet;database=check;"

'-----建立Command对象-----------

set objCmd=Server.CreateObject("Adodb.Command")

objCmd.ActiveConnection=objCnn

objCmd.CommandText="order_tot_amt" '指定存储过程名称

objCmd.CommandType=adCmdStoredProc '其为Stored Procedure

'-----准备stored procedure 的参数-------

objCmd.Parameters.Append _

objCmd.CreateParameter("o_id",adInteger,adParamInput,,o_id)

objCmd.Parameters.Append _

objCmd.CreateParameter("p_tot",adBigInt,adParamOutput,,0)

'-----执行存储过程----------------------

objCmd.Execute

'-----输出参数以及处理结果--------------

for each parm in objCmd.Parameters

Response.Write parm.name &"="& trim(parm) &"<br>"

next

%>

以上代码在Win2000+IIS5.0+SQL Server2000中通过