中国网站建设博客欢迎使用中国网站建设博客，有问题或意见请到bbs.handun.net社区反馈，谢谢您的参与使用。

　　使用SQL Server数据库，你可使用存储过程直接在数据库中存储并运行功能强大的任务，而不在自己的ASP脚本中实现它们，因为存储过程位于数据库服务器上，因而具有更高的性能并能减少网络负载。本文旨在通过实例说明在ASP中如何调用存储过程并传递输入参数的方法。

　　下面我们就通过一个实例来说明这种技术的使用方法(文件adovbs.inc可在C:\Program Files\Common Files\System\ADO下找到)：

安装SQL Server后，数据库pubs中自带存储过程byroyalty，语句为（@percentage就是输入参数）：

Alter PROCEDURE byroyalty @percentage int

AS

select au_id from titleauthor

where titleauthor.royaltyper = @percentage

ASP源程序：

<% @LANGUAGE = VBScript %>



<%

Response.Expires = 0

Dim Cnn, objRS,strConn,objCmd, objParam

Const strIn = 30　　　　'存储过程的输入参数,为简化程序, 直接设置该值.



' 建立连接

Set Cnn = Server.CreateObject("ADODB.Connection")

strConn ="Provider=sqloledb;" & _

　　 "Data Source=16.62.5.8;Initial Catalog=pubs;User Id=sa;Password=;"

Cnn.Open strConn



' 创建Command对象

Set objCmd = Server.CreateObject("ADODB.Command")

objCmd.CommandText = "byroyalty"　　　　 '存储的过程名

objCmd.CommandType = adCmdStoredProc　　 '将 CommandText 作为存储过程名进行计算

Set objCmd.ActiveConnection = Cnn



'创建并定义参数

Set objParam = objCmd.CreateParameter ("@percentage", adInteger, adParamInput, 4,

strIn)

objCmd.Parameters.Append objParam



Set objRS = objCmd.Execute()

%>





下面输出结果, 输入参数为:

<%= objCmd.Parameters("@percentage") %> .



au_id


<%

While Not objRS.EOF

Response.Write Server.HTMLEncode(objRS("au_id")) & "
"

objRS.MoveNext

Wend



objRS.close: Cnn.close

Set objRS = Nothing: Set Cnn = Nothing

Set objParam = Nothing: Set objCmd = Nothing

%>







　　除了可传递输入参数外，还可以使用返回码和输出参数返回值，由于篇幅关系，笔者不再举例.