几例在ASP存储过程的使用方法

一、使用Command对象和Parameter对象传递参数
本讲将主要使用Microsoft SQL Server7.0数据库，先建立一个连接文件AdoSQL7.asp备用，以后用到时不再特别说明。
<% 'AdoSQL7.asp
Option Explicit
Response.Expires = 0

'第一部分: 建立连接
Dim Cnn, StrCnn
Set Cnn = Server.CreateObject("ADODB.Connection")
StrCnn = "Provider=sqloledb; User ID=sa; Password=; Initial Catalog=pubs; Data Source=ICBCZJP"
Cnn.Open StrCnn
%>
注意：自己使用时要将Data Source设为你的数据库服务器所在的机器名。
另外，以前使用Access数据库时，用Microsoft Access97可以很方便的查看字段及数据，而使用SQL Server数据库，尤其是并不在数据库服务器，而是在另一台机器上调试ASP脚本时，要查看字段及数据便需另外安装工具，这里向你提供一个工具：Msqry32.exe（Microsoft Query），这个文件随Office97安装，一般位于目录“Microsoft OfficeOffice”下。
例wuf70.asp：
<%@ LANGUAGE="VBSCRIPT" %>
<!--#include file="AdoSQL7.asp"-->
<!--#include file="adovbs.inc"-->
<% ' wuf70.asp
Dim cmdTest, prmTest, rsTest
'创建 Command 对象
Set cmdTest = Server.CreateObject("ADODB.Command")
'Recordset、Command对象都可以通过ActiveConnection属性来连接Connection对象
cmdTest.ActiveConnection = Cnn
'SQL命令 - 含两个参数， 用 ？ 表示
cmdTest.CommandText = "Update jobs Set job_desc = ? Where job_id = ?"
'设命令类型为 SQL 语句
cmdTest.CommandType = adCmdText
'Prepared 属性决定是否将 SQL 命令先行编译，将其设为True，可以加快运行
cmdTest.Prepared = True

'创建 Parameter 对象
Set prmTest=cmdTest.CreateParameter("job_desc",adVarChar,adParamInput,50,"网络")
'将数据追加到 Parameters 数据集合中
cmdTest.Parameters.Append prmTest

Set prmTest = cmdTest.CreateParameter("job_id",adSmallInt,adParamInput,,"12")
cmdTest.Parameters.Append prmTest

'执行修改 ? 不需要返回结果，简单的使用cmdTest.Execute 就可以了

补充：asp教程,高级应用