明輝手游網(wǎng)中心:是一個免費提供流行視頻軟件教程、在線學習分享的學習平臺!

asp+存儲過程的使用

[摘要]<!-- 必須加載adovbs.inc文件,否則將出錯 --> <!--#include file="adovbs.inc"--> <% dim objCnn dim objCmd dim Rs const o_id=112 '-----建...

<!-- 必須加載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 的參數(shù)-------
objCmd.Parameters.Append _
objCmd.CreateParameter("o_id",adInteger,adParamInput,,o_id)
objCmd.Parameters.Append _
objCmd.CreateParameter("p_tot",adBigInt,adParamOutput,,0)
'-----執(zhí)行存儲過程----------------------
objCmd.Execute

'-----輸出參數(shù)以及處理結(jié)果--------------
for each parm in objCmd.Parameters
Response.Write parm.name &"="& trim(parm) &"<br>"
next
%>


以上代碼在Win2000+IIS5.0+SQL Server2000中通過
(出處:Viphot)