SQL_SERVER数据库开发之存储过程应用

SQL_SERVER数据库开发之存储过程应用 SQL SERVER 可能有不少朋友使用SQL SERVER做开发也已经有段日子，但还没有或者很少在项目中使用存储过程， 或许有些朋友认为根本没有必要使用存储过程等等。其实当你一个项目做完到了维护阶段时，就会发现存 储过程给我们带来了好处了，修改方便，不能去改我们的应用程序，只需要改存储过程的内容，而且还可 以使我们的程序速度得到提高。 QUOTE: SQL SERVER 联机丛 书 关于书的成语关于读书的排比句社区图书漂流公约怎么写关于读书的小报汉书pdf 中的定义： 存储过程是保存起来的可以接受和返回用户提供的参数的 Transact-SQL 语句的集合。 可以创建一个过程供永久使用，或在一个会话中临时使用（局部临时过程），或在所有会话中临时使 用（全局临时过程）。 也可以创建在 Microsoft SQL Server 启动时自动运行的存储过程。 要使用存储过程，首先我们必需熟悉一些基本的T-SQL语句，因为存储过程是由于一组T-SQL语句构 成的，并且，我们需要了解一些关于函数、过程的概念，因为我们需要在应用程序中调用存储过程，就像 我们调用应用程序的函数一样，不过调用的方法有些不同。 下面我们来看一下存储过程的建立和使用方法。 和数据 表 关于同志近三年现实表现材料材料类招标技术评分表图表与交易pdf视力表打印pdf用图表说话 pdf 一样，在使用之前我们需要创建存储过程，它的简明语法是： QUOTE: CREATE PROC 存储过程名称 [参数列表（多个以“,”分隔）] AS SQL 语句 例： QUOTE: CREATE PROC upGetUserName @intUserId INT, @ostrUserName NVARCHAR(20) OUTPUT -- 要输出的参数 AS BEGIN -- 将uName的值赋给 @ostrUserName 变量，即要输出的参数 SELECT @ostrUserName=uName FROM uUser WHERE uId=@intUserId END 其中 CREATE PROC 语句（完整语句为CREATE PROCEDURE）的意思就是告诉SQL SERVER，现在 需要建立一个存储过程，upGetUserName 就是存储过程名称，@intUserId 和 @ostrUserName 分别是该 存储过程的两个参数，注意，在SQL SERVER中，所有用户定义的变量都以“@”开头，OUTPUT关键字表 示这个参数是用来输出的，AS之后就是存储过程内容了。只要将以上代码在“查询分析器”里执行一次，SQL SERVER就会在当前数据库中创建一个名为“upGetUserName”的存储过程。你可以打开“企业管理器”，选择 当前操作的数据库，然后在左边的树型列表中选择“存储过程”，此时就可以在右边的列表中看到你刚刚创建的存储过程了（如果没有，刷新一下即可）。 之前我们已经创建了一个名为“upGetUserName”的存储过程，从字面理解该存储过程的功能是用来取 得某一个用户的名称。存储过程建立好了，接下来就是要在应用程序里调用了，下面看一下在ASP程序里 的调用。 QUOTE: Dim adoComm '// 创建一个对象，我们用来调用存储过程 Set adoComm = CreateObject("ADODB.Command") With adoComm '// 设置连接，设 adoConn 为已经连接的 ADODB.Connection 对象 .ActiveConnection = adoConn '// 类型为存储过程，adCmdStoredProc = 4 .CommandType = 4 '// 存储过程名称 .CommandText = "upGetUserName" '// 设置用户编号 .Parameters.Item("@intUserId").Value = 1 '// 执行存储过程 .Execute '// 取得从存储过程返回的用户名称 Response.Write "用户名：" & .Parameters.Item("@ostrUserName").Value End With '// 释放对象 Set adoComm = Nothing 通过以上两步，我们已经可以创建和使用简单的存储过程了。下面我们来看一个稍微复杂点的存储过 程，以进一步了解存储过程的应用。 用户登录在ASP项目中经常会使用到，相信很多朋友也都做过类似的系统，但使用存储过程来做验证 朋友可能不多，那么我们就以它来做例子，写一个简单的用户登录验证的存储过程。 QUOTE: CREATE PROC upUserLogin @strLoginName NVARCHAR(20), @strLoginPwd NVARCHAR(20), @blnReturn BIT OUTPUT AS -- 定义一个临时用来保存密码的变量 DECLARE @strPwd NVARCHAR(20) BEGIN -- 从表中查询当前用户的密码，赋值给 @strPwd 变量，下面要对他进行比较 SELECT @strPwd=uLoginPwd FROM uUser WHERE uLoginName=@strLoginName IF @strLoginPwd = @strPwd BEGIN SET @blnReturn = 1 -- 更新用户最后登录时间 UPDATE uUser SET uLastLogin=GETDATE() WHERE uLoginName=@strLoginName END ELSE SET @blnReturn = 0 END 用户登录的存储过程建立好了，现在在程序里试一下吧。注意，在一个区域内如果有多条语句时，必 需使用BEGIN...END关键字。 QUOTE: Dim adoComm '// 创建一个对象，我们用来调用存储过程 Set adoComm = CreateObject("ADODB.Command") With adoComm '// 设置连接，设 adoConn 为已经连接的 ADODB.Connection 对象 .ActiveConnection = adoConn '// 类型为存储过程，adCmdStoredProc = 4 .CommandType = 4 '// 存储过程名称 .CommandText = "upUserLogin" '// 设置登录名称 .Parameters.Item("@strLoginName").Value = "admin" '// 设置登录密码 .Parameters.Item("@strLoginPwd").Value = "123456" '// 执行存储过程 .Execute '// 判断是否登录成功 If .Parameters.Item("@blnReturn").Value = 1 Then Response.Write "恭喜你，登录成功！" Else Response.Write "不是吧，好像错了哦。。。" End If End With '// 释放对象 Set adoComm = Nothing 通过以上的步骤，简单用户登录验证过程也做完了，现在只要把它整合到程序中就可以实现简单的用 户登录验证了，关于其他细节就由你自己来处理了。 上面介绍的两个存储过程都是只返回一个值的，下面我们来看一个返回一个记录集的存储过程。 QUOTE: CREATE PROC upGetUserInfos @intUserGroup INT AS BEGIN -- 从数据库中抽取符合条件的数据 SELECT uName,uGroup,uLastLogin FROM uUser WHERE uGroup=@intUserGroup -- 插入一列合计 UNION SELECT '合计人数:',COUNT(uGroup),NULL FROM uUser WHERE uGroup=@intUserGroup END 现在我们来看一下ASP程序的调用。 QUOTE: Dim adoComm Dim adoRt '// 创建一个对象，我们用来调用存储过程 Set adoComm = CreateObject("ADODB.Command") Set adoRs = CreateObject("ADODB.Recordset") With adoComm '// 设置连接，设 adoConn 为已经连接的 ADODB.Connection 对象 .ActiveConnection = adoConn '// 类型为存储过程，adCmdStoredProc = 4 .CommandType = 4 '// 存储过程名称 .CommandText = "upGetUserInfos" '// 设置用户组 .Parameters.Item("@intUserGroup").Value = 1 '// 执行存储过程，和以上几个例子不同，这里使用RecordSet的Open方法 adoRs.Open adoComm '// 显示第一个值 Response.write adoRs.Fields(0).Value End With '// 释放对象 Set adoRs = Nothing Set adoComm = Nothing 怎么样，是不是也很简单呢，不过存储过程的用处不仅仅只有这些，他还有更强大的功能，比如使用 游标、临时表来从多个表，甚至是多个数据库中调用数据，然后返回给用户，这些你可以在使用过程中慢 慢的去发掘。 好了，存储过程应用就先介绍到这里，如果你对本文有任何疑问，欢迎跟贴提出，我将尽力给予解答。 下次我将给大家介绍触发器的应用。 谢谢楼主，通过你的文章我看了前2个例子。不过我是用c#做的例子来调用，真是不公平，vb.net实在太 随便了，调用真不负责任，感觉好像什么都可以乱调一样，太过分了！！！ 把我做的btn按钮代码发上来，参考哈： SqlConnection con = new SqlConnection(); con.ConnectionString = System.Configuration.ConfigurationSettings.AppSettings["DSN"]; con.Open(); string u_name=Server.HtmlEncode(TextBox1.Text); string u_pwd=Server.HtmlEncode(TextBox2.Text); SqlCommand cmdLogin = new SqlCommand("upUserLogin",con); cmdLogin.CommandType = CommandType.StoredProcedure; SqlParameter uname = new SqlParameter("@strLoginName",SqlDbType.NVarChar,20 ); uname.Value=u_name; SqlParameter upwd = new SqlParameter("@strLoginPwd",SqlDbType.NVarChar,20 ); upwd.Value=u_pwd; SqlParameter isOK = new SqlParameter("@blnReturn",SqlDbType.Bit); isOK.Direction = ParameterDirection.Output; cmdLogin.Parameters.Add (uname); cmdLogin.Parameters.Add (upwd); cmdLogin.Parameters.Add (isOK); cmdLogin.ExecuteNonQuery (); bool a=System.Convert.ToBoolean( cmdLogin.Parameters["@blnReturn"].Value.ToString ()); if(a) { Label1.Text="登录成功"+"欢迎您："+Server.HtmlEncode(TextBox1.Text); } else { Label1.Text="登录失败！"; } 前言 一直用ASP+ACCESS来编写网页和公司的内部应用系统,内部应用系统也就是大家说的OA吧,这个我也不知道,公司又叫它ERP,反正不管什么,它是用来帮助公司处理日常工作的,简化劳动的.从来没用过存储过程,所有的添加,删除,修改都是在ASP里面写程序执行，代码很多.数据量少的时候没什么感觉,挺快的,可等到数据量大的时候,上W条记录查询,尤其是不分页都显示在一页里的时候情况就出现了，速度很慢，要10几秒才有反应，所以想到了要用 SQL的存储过程来简化代码和加快程序的执行速度！ 在学习了51JS里的一篇教程SQL SERVER数据库开发之存储过程应用又在QQ里大侠的指导 下终于有点入门，下边是我的学习笔记，有问 题 快递公司问题件快递公司问题件货款处理关于圆的周长面积重点题型关于解方程组的题及答案关于南海问题 欢迎大家一起讨论！~ 1.ASP调用存储过程 首先在SQL里建立一个数据库叫it，怎么建我就不说了，这个简单，一看就知道了。然后 在库里建个表，写几个数据记录，如下： 打开查询分析器，在里边写下如下语句点击绿色按钮执行它： 你到数据库的存储过程里面看，已经多了一个名为upGetUserName的存储过程了表明已经成 功的建立了存储过程，如果没有，试着刷新下 下面用ASP来调用它： CONN文件（连接数据库）如下： 复制内容到剪贴板 <% set db=server.createobject("adodb.connection") db.Open ("driver={SQL Server};server=192.168.18.254;uid=sa;pwd=;database=it;") %> 192.168.18.254为SQL SERVER服务器的IP地址，uid pwd it 分别为连接数据库的用户和 密码及所要连的数据库 新建一个index.asp文件，内容如下： 复制内容到剪贴板 <% set rs=server.createobject("adodb.recordset") sql = "exec upGetUserName" rs.open sql,db,3,2 response.write rs.recordcount&"
" while not rs.eof response.write rs("uname")&"
" rs.movenext wend response.End %> 在浏览器中执行这个页面如果显示如下： 那么恭喜你，成功了！ 上面是不带参数的存储过程调用，但我们在使用中一定会有参数的，下面就来介绍一个有参 数的。 还是上边的例子，我们把原来的存储过程改成这样： 复制内容到剪贴板 CREATE PROC upGetUserName @intUserId NVARCHAR(50), @intUserpass NVARCHAR(50) AS BEGIN SELECT uname FROM users WHERE uId=@intUserId and pass=@intUserpass END GO 可以把原来的存储过程删除，然后把这个写在查询分析器里来执行，也可以直接在原来的存 储过程里改。 @intUserId NVARCHAR(50), @intUserpass NVARCHAR(50) 是要传送进来的参数，@是必须的,因为有两个，所以之间用“，”来分隔 index文件改成如下： 复制内容到剪贴板 <% set rs=server.createobject("adodb.recordset") sql = "exec upGetUserName 'snake','snake'" rs.open sql,db,3,2 response.write rs.recordcount&"
" while not rs.eof response.write rs("uname")&"
" rs.movenext wend response.End %> 注意：sql = "exec upGetUserName 'snake','snake'" 两个snake不是一个意思，一个是uid，一个是pass,存储过程返回的是uid="snake"并且 pass="snake"的记录 数据库里只有一条这样的记录，所以会显示： ASP 中调用存储过程、语法、写法－sql server数据库 ASP与存储过程(Stored Procedures)的文章不少，但是我怀疑作者们是否真正实践过。我 在初学时查阅过大量相关资料，发现其中提供的很多方法实际操作起来并不是那么回事。对 于简单的应用，这些资料也许是有帮助的，但仅限于此，因为它们根本就是千篇一律，互相 抄袭，稍微复杂点的应用，就全都语焉不详了。 现在，我基本上通过调用存储过程访问SQL Server，以下的文字虽不敢保证绝对正确，但都是实践的 总结 初级经济法重点总结下载党员个人总结TXt高中句型全总结.doc高中句型全总结.doc理论力学知识点总结pdf ，希望对大家能有帮助。 存储过程就是作为可执行对象存放在数据库中的一个或多个SQL命令。 定义总是很抽象。存储过程其实就是能完成一定操作的一组SQL语句，只不过这组语句是放在数据库中的(这里我们只谈SQL Server)。如果我们通过创建存储过程以及在ASP中 调用存储过程，就可以避免将SQL语句同ASP代码混杂在一起。这样做的好处至少有三个： 第一、大大提高效率。存储过程本身的执行速度非常快，而且，调用存储过程可以大大 减少同数据库的交互次数。 第二、提高安全性。假如将SQL语句混合在ASP代码中，一旦代码失密，同时也就意味 着库结构失密。 第三、有利于SQL语句的重用。 在ASP中，一般通过command对象调用存储过程，根据不同情况，本文也介绍其它调用 方法。为了方便说明，根据存储过程的输入输出，作以下简单分类： 1. 只返回单一记录集的存储过程 假设有以下存储过程(本文的目的不在于讲述T-SQL语法，所以存储过程只给出代码，不作说明)： /*SP1*/ CREATE PROCEDURE dbo.getUserList as set nocount on begin select * from dbo.[userinfo] end go 以上存储过程取得userinfo表中的所有记录，返回一个记录集。通过command对象调用该存储过程的ASP代码如下: '**通过Command对象调用存储过程** DIM MyComm,MyRst Set MyComm = Server.CreateObject("ADODB.Command") MyComm.ActiveConnection = MyConStr 'MyConStr是数据库连接字串 MyComm.CommandText = "getUserList" '指定存储过程名 MyComm.CommandType = 4 '表明这是一个存储过程 MyComm.Prepared = true '要求将SQL命令先行编译 Set MyRst = MyComm.Execute Set MyComm = Nothing 存储过程取得的记录集赋给MyRst，接下来，可以对MyRst进行操作。 在以上代码中，CommandType属性表明请求的类型，取值及说明如下： -1 表明CommandText参数的类型无法确定 1 表明CommandText是一般的命令类型 2 表明CommandText参数是一个存在的表名称 4 表明CommandText参数是一个存储过程的名称 还可以通过Connection对象或Recordset对象调用存储过程，方法分别如下： '**通过Connection对象调用存储过程** DIM MyConn,MyRst Set MyConn = Server.CreateObject("ADODB.Connection") MyConn.open MyConStr 'MyConStr是数据库连接字串 Set MyRst = MyConn.Execute("getUserList",0,4) '最后一个参断含义同CommandType Set MyConn = Nothing '**通过Recordset对象调用存储过程** DIM MyRst Set MyRst = Server.CreateObject("ADODB.Recordset") MyRst.open "getUserList",MyConStr,0,1,4 'MyConStr是数据库连接字串,最后一个参断含义与CommandType相同 2. 没有输入输出的存储过程 请看以下存储过程： /*SP2*/ CREATE PROCEDURE dbo.delUserAll as set nocount on begin delete from dbo.[userinfo] end go 该存储过程删去userinfo表中的所有记录，没有任何输入及输出，调用方法与上面讲 过的基本相同，只是不用取得记录集： '**通过Command对象调用存储过程** DIM MyComm Set MyComm = Server.CreateObject("ADODB.Command") MyComm.ActiveConnection = MyConStr 'MyConStr是数据库连接字串 MyComm.CommandText = "delUserAll" '指定存储过程名 MyComm.CommandType = 4 '表明这是一个存储过程 MyComm.Prepared = true '要求将SQL命令先行编译 MyComm.Execute '此处不必再取得记录集 Set MyComm = Nothing 当然也可通过Connection对象或Recordset对象调用此类存储过程，不过建立 Recordset对象是为了取得记录集，在没有返回记录集的情况下，还是利用Command对象吧。 3. 有返回值的存储过程 在进行类似SP2的操作时，应充分利用SQL Server强大的事务处理功能，以维护数据 的一致性。并且，我们可能需要存储过程返回执行情况，为此，将SP2修改如下： /*SP3*/ CREATE PROCEDURE dbo.delUserAll as set nocount on begin BEGIN TRANSACTION delete from dbo.[userinfo] IF @@error=0 begin COMMIT TRANSACTION return 1 end ELSE begin ROLLBACK TRANSACTION return 0 end return end go 以上存储过程，在delete顺利执行时，返回1，否则返回0，并进行回滚操作。为了在ASP中取得返回值，需要利用Parameters集合来声明参数： '**调用带有返回值的存储过程并取得返回值** DIM MyComm,MyPara Set MyComm = Server.CreateObject("ADODB.Command") MyComm.ActiveConnection = MyConStr 'MyConStr是数据库连接字串 MyComm.CommandText = "delUserAll" '指定存储过程名 MyComm.CommandType = 4 '表明这是一个存储过程 MyComm.Prepared = true '要求将SQL命令先行编译 '声明返回值 Set Mypara = MyComm.CreateParameter("RETURN",2,4) MyComm.Parameters.Append MyPara MyComm.Execute '取得返回值 DIM retValue retValue = MyComm(0) '或retValue = MyComm.Parameters(0) Set MyComm = Nothing 在MyComm.CreateParameter("RETURN",2,4)中，各参数的含义如下： 第一个参数("RETURE")为参数名。参数名可以任意设定，但一般应与存储过程中声明的 参数名相同。此处是返回值，我习惯上设为"RETURE"； 第二个参数(2)，表明该参数的数据类型，具体的类型代码请参阅ADO参考，以下给出常用的类型代码： adBigInt: 20 ; adBinary : 128 ; adBoolean: 11 ; adChar: 129 ; adDBTimeStamp: 135 ; adEmpty: 0 ; adInteger: 3 ; adSmallInt: 2 ; adTinyInt: 16 ; adVarChar: 200 ; 对于返回值，只能取整形，且-1到-99为保留值； 第三个参数(4)，表明参数的性质，此处4表明这是一个返回值。此参数取值的说明如 下： 0 : 类型无法确定； 1: 输入参数；2: 输入参数；3：输入或输出参数；4: 返回值 以上给出的ASP代码，应该说是完整的代码，也即最复杂的代码，其实 Set Mypara = MyComm.CreateParameter("RETURN",2,4) MyComm.Parameters.Append MyPara 可以简化为 MyComm.Parameters.Append MyComm.CreateParameter("RETURN",2,4) 甚至还可以继续简化，稍后会做说明。 对于带参数的存储过程，只能使用Command对象调用(也有资料说可通过Connection对象或Recordset对象调用，但我没有试成过)。 4. 有输入参数和输出参数的存储过程 返回值其实是一种特殊的输出参数。在大多数情况下，我们用到的是同时有输入及输出 参数的存储过程，比如我们想取得用户信息表中，某ID用户的用户名，这时候，有一个输 入参数----用户ID，和一个输出参数----用户名。实现这一功能的存储过程如下： /*SP4*/ CREATE PROCEDURE dbo.getUserName @UserID int, @UserName varchar(40) output as set nocount on begin if @UserID is null return select @UserName=username from dbo.[userinfo] where userid=@UserID return end go 调用该存储过程的ASP代码如下： '**调用带有输入输出参数的存储过程** DIM MyComm,UserID,UserName UserID = 1 Set MyComm = Server.CreateObject("ADODB.Command") MyComm.ActiveConnection = MyConStr 'MyConStr是数据库连接字串 MyComm.CommandText = "getUserName" '指定存储过程名 MyComm.CommandType = 4 '表明这是一个存储过程 MyComm.Prepared = true '要求将SQL命令先行编译 '声明参数 MyComm.Parameters.append MyComm.CreateParameter("@UserID",3,1,4,UserID) MyComm.Parameters.append MyComm.CreateParameter("@UserName",200,2,40) MyComm.Execute '取得出参 UserName = MyComm(1) Set MyComm = Nothing 在以上代码中，可以看到，与声明返回值不同，声明输入参数时需要5个参数，声明输出参数时需要4个参数。声明输入参数时5个参数分别为：参数名、参数数据类型、参数类 型、数据长度、参数值。声明输出参数时，没有最后一个参数：参数值。 需要特别注意的是：在声明参数时，顺序一定要与存储过程中定义的顺序相同，而且各 参数的数据类型、长度也要与存储过程中定义的相同。 如果存储过程有多个参数，ASP代码会显得繁琐，可以使用with命令简化代码： '**调用带有输入输出参数的存储过程(简化代码)** DIM MyComm,UserID,UserName UserID = 1 Set MyComm = Server.CreateObject("ADODB.Command") with MyComm .ActiveConnection = MyConStr 'MyConStr是数据库连接字串 .CommandText = "getUserName" '指定存储过程名 .CommandType = 4 '表明这是一个存储过程 .Prepared = true '要求将SQL命令先行编译 .Parameters.append .CreateParameter("@UserID",3,1,4,UserID) .Parameters.append .CreateParameter("@UserName",200,2,40) .Execute end with UserName = MyComm(1) Set MyComm = Nothing 假如我们要取得ID为1到10，10位用户的用户名，是不是要创建10次Command对象呢？不是的。如果需要多次调用同一存储过程，只需改变输入参数，就会得到不同的输出： '**多次调用同一存储过程** DIM MyComm,UserID,UserName UserName = "" Set MyComm = Server.CreateObject("ADODB.Command") for UserID = 1 to 10 with MyComm .ActiveConnection = MyConStr 'MyConStr是数据库连接字串 .CommandText = "getUserName" '指定存储过程名 .CommandType = 4 '表明这是一个存储过程 .Prepared = true '要求将SQL命令先行编译 if UserID = 1 then .Parameters.append .CreateParameter("@UserID",3,1,4,UserID) .Parameters.append .CreateParameter("@UserName",200,2,40) .Execute else '重新给入参赋值(此时参数值不发生变化的入参以及出参不必重新声明) .Parameters("@UserID") = UserID .Execute end if end with UserName = UserName + MyComm(1) + "," '也许你喜欢用数组存储 next Set MyComm = Nothing 通过以上代码可以看出：重复调用同一存储过程时，只需为值发生改变的输入参数重新 赋值即可，这一方法在有多个输入输出参数，且每次调用时只有一个输入参数的值发生变化 时，可以大大减少代码量。 5. 同时具有返回值、输入参数、输出参数的存储过程 前面说过，在调用存储过程时，声明参数的顺序要与存储过程中定义的顺序相同。还有 一点要特别注意：如果存储过程同时具有返回值以及输入、输出参数，返回值要最先声明。 为了演示这种情况下的调用方法，我们改善一下上面的例子。还是取得ID为1的用户的用户名，但是有可能该用户不存在(该用户已删除，而userid是自增长的字段)。存储过程根据用户存在与否，返回不同的值。此时，存储过程和ASP代码如下： /*SP5*/ CREATE PROCEDURE dbo.getUserName --为了加深对"顺序"的印象，将以下两参数的定义顺序颠倒一下 @UserName varchar(40) output, @UserID int as set nocount on begin if @UserID is null return select @UserName=username from dbo.[userinfo] where userid=@UserID if @@rowcount>0 return 1 else return 0 return end go '**调用同时具有返回值、输入参数、输出参数的存储过程** DIM MyComm,UserID,UserName UserID = 1 Set MyComm = Server.CreateObject("ADODB.Command") with MyComm .ActiveConnection = MyConStr 'MyConStr是数据库连接字串 .CommandText = "getUserName" '指定存储过程名 .CommandType = 4 '表明这是一个存储过程 .Prepared = true '要求将SQL命令先行编译 '返回值要最先被声明 .Parameters.Append .CreateParameter("RETURN",2,4) '以下两参数的声明顺序也做相应颠倒 .Parameters.append .CreateParameter("@UserName",200,2,40) .Parameters.append .CreateParameter("@UserID",3,1,4,UserID) .Execute end with if MyComm(0) = 1 then UserName = MyComm(1) else UserName = "该用户不存在" end if Set MyComm = Nothing 6. 同时返回参数和记录集的存储过程 有时候，我们需要存储过程同时返回参数和记录集，比如在利用存储过程分页时，要同 时返回记录集以及数据总量等参数。以下给出一个进行分页处理的存储过程： /*SP6*/ CREATE PROCEDURE dbo.getUserList @iPageCount int OUTPUT, --总页数 @iPage int, --当前页号 @iPageSize int --每页记录数 as set nocount on begin --创建临时表 create table #t (ID int IDENTITY, --自增字段 userid int, username varchar(40)) --向临时表中写入数据 insert into #t select userid,username from dbo.[UserInfo] order by userid --取得记录总数 declare @iRecordCount int set @iRecordCount = @@rowcount --确定总页数 IF @iRecordCount%@iPageSize=0 SET @iPageCount=CEILING(@iRecordCount/@iPageSize) ELSE SET @iPageCount=CEILING(@iRecordCount/@iPageSize)+1 --若请求的页号大于总页数，则显示最后一页 IF @iPage > @iPageCount SELECT @iPage = @iPageCount --确定当前页的始末记录 DECLARE @iStart int --start record DECLARE @iEnd int --end record SELECT @iStart = (@iPage - 1) * @iPageSize SELECT @iEnd = @iStart + @iPageSize + 1 --取当前页记录 select * from #t where ID>@iStart and ID<@iEnd --删除临时表 DROP TABLE #t --返回记录总数 return @iRecordCount end go 在上面的存储过程中，输入当前页号及每页记录数，返回当前页的记录集，总页数及记 录总数。为了更具典型性，将记录总数以返回值的形式返回。以下是调用该存储过程的ASP 代码(具体的分页操作略去): '**调用分页存储过程** DIM pagenow,pagesize,pagecount,recordcount DIM MyComm,MyRst pagenow = Request("pn") '自定义函数用于验证自然数 if CheckNar(pagenow) = false then pagenow = 1 pagesize = 20 Set MyComm = Server.CreateObject("ADODB.Command") with MyComm .ActiveConnection = MyConStr 'MyConStr是数据库连接字串 .CommandText = "getUserList" '指定存储过程名 .CommandType = 4 '表明这是一个存储过程 .Prepared = true '要求将SQL命令先行编译 '返回值(记录总量) .Parameters.Append .CreateParameter("RETURN",2,4) '出参(总页数) .Parameters.Append .CreateParameter("@iPageCount",3,2) '入参(当前页号) .Parameters.append .CreateParameter("@iPage",3,1,4,pagenow) '入参(每页记录数) .Parameters.append .CreateParameter("@iPageSize",3,1,4,pagesize) Set MyRst = .Execute end with if MyRst.state = 0 then '未取到数据，MyRst关闭 recordcount = -1 else MyRst.close '注意：若要取得参数值，需先关闭记录集对象 recordcount = MyComm(0) pagecount = MyComm(1) if cint(pagenow)>=cint(pagecount) then pagenow=pagecount end if Set MyComm = Nothing '以下显示记录 if recordcount = 0 then Response.Write "无记录" elseif recordcount > 0 then MyRst.open do until MyRst.EOF ...... loop '以下显示分页信息 ...... else 'recordcount=-1 Response.Write "参数错误" end if 对于以上代码，只有一点需要说明：同时返回记录集和参数时，若要取得参数，需先将 记录集关闭，使用记录集时再将其打开。 7. 返回多个记录集的存储过程 本文最先介绍的是返回记录集的存储过程。有时候，需要一个存储过程返回多个记录集， 在ASP中，如何同时取得这些记录集呢？为了说明这一问题，在userinfo表中增加两个字 段：usertel及usermail，并设定只有登录用户可以查看这两项内容。 /*SP7*/ CREATE PROCEDURE dbo.getUserInfo @userid int, @checklogin bit as set nocount on begin if @userid is null or @checklogin is null return select username from dbo.[usrinfo] where userid=@userid --若为登录用户，取usertel及usermail if @checklogin=1 select usertel,usermail from dbo.[userinfo] where userid=@userid return end go 以下是ASP代码： '**调用返回多个记录集的存储过程** DIM checklg,UserID,UserName,UserTel,UserMail DIM MyComm,MyRst UserID = 1 'checklogin()为自定义函数，判断访问者是否登录 checklg = checklogin() Set MyComm = Server.CreateObject("ADODB.Command") with MyComm .ActiveConnection = MyConStr 'MyConStr是数据库连接字串 .CommandText = "getUserInfo" '指定存储过程名 .CommandType = 4 '表明这是一个存储过程 .Prepared = true '要求将SQL命令先行编译 .Parameters.append .CreateParameter("@userid",3,1,4,UserID) .Parameters.append .CreateParameter("@checklogin",11,1,1,checklg) Set MyRst = .Execute end with Set MyComm = Nothing '从第一个记录集中取值 UserName = MyRst(0) '从第二个记录集中取值 if not MyRst is Nothing then Set MyRst = MyRst.NextRecordset() UserTel = MyRst(0) UserMail = MyRst(1) end if Set MyRst = Nothing 以上代码中，利用Recordset对象的NextRecordset方法，取得了存储过程返回的多个 记录集。 至此，针对ASP调用存储过程的各种情况，本文已做了较为全面的说明。最后说一下在 一个ASP程序中，调用多个存储过程的不同方法。 在一个ASP程序中，调用多个存储过程至少有以下三种方法是可行的： 1. 创建多个Command对象 DIM MyComm Set MyComm = Server.CreateObject("ADODB.Command") '调用存储过程一 ...... Set MyComm = Nothing Set MyComm = Server.CreateObject("ADODB.Command") '调用存储过程二 ...... Set MyComm = Nothing ...... 2. 只创建一个Command对象，结束一次调用时，清除其参数 DIM MyComm Set MyComm = Server.CreateObject("ADODB.Command") '调用存储过程一 ..... '清除参数(假设有三个参数) MyComm.Parameters.delete 2 MyComm.Parameters.delete 1 MyComm.Parameters.delete 0 '调用存储过程二并清除参数 ...... Set MyComm = Nothing 此时要注意：清除参数的顺序与参数声明的顺序相反，原因嘛，我也不知道。 3. 利用Parameters数据集合的Refresh方法重置Parameter对象 DIM MyComm Set MyComm = Server.CreateObject("ADODB.Command") '调用存储过程一 ..... '重置Parameters数据集合中包含的所有Parameter对象 MyComm.Parameters.Refresh '调用存储过程二 ..... Set MyComm = Nothing 一般认为，重复创建对象是效率较低的一种方法，但是经测试(测试工具为Microsoft Application Center Test)，结果出人意料： 方法2 >= 方法1 >> 方法3 方法2的运行速度大于等于方法1(最多可高4%左右)，这两种方法的运行速度远大于方法3(最多竟高达130%)，所以建议在参数多时，采用方法1，在参数较少时，采用方法2。 ASP与存储过程(Stored Procedures)的文章不少，但是我怀疑作者们是否真正实践过。我在初 学时查阅过大量相关资料，发现其中提供的很多方法实际操作起来并不是那么回事。对于简 单的应用，这些资料也许是有帮助的，但仅限于此，因为它们根本就是千篇一律，互相抄袭， 稍微复杂点的应用，就全都语焉不详了。 现在，我基本上通过调用存储过程访问SQL Server，以下的文字都是实践的总结，希望 对大家能有帮助。 存储过程就是作为可执行对象存放在数据库中的一个或多个SQL命令。 定义总是很抽象。存储过程其实就是能完成一定操作的一组SQL语句，只不过这组语句是放在数据库中的(这里我们只谈SQL Server)。如果我们通过创建存储过程以及在ASP 中调用存储过程，就可以避免将SQL语句同ASP代码混杂在一起。这样做的好处至少有三 个： 第一、大大提高效率。存储过程本身的执行速度非常快，而且，调用存储过程可以大大 减少同数据库的交互次数。 第二、提高安全性。假如将SQL语句混合在ASP代码中，一旦代码失密，同时也就意 味着库结构失密。 第三、有利于SQL语句的重用。 在ASP中，一般通过command对象调用存储过程，根据不同情况，本文也介绍其它调 用方法。为了方便说明，根据存储过程的输入输出，作以下简单分类： 1. 只返回单一记录集的存储过程 假设有以下存储过程(本文的目的不在于讲述T-SQL语法，所以存储过程只给出代码，不作说明)： /*SP1*/ CREATE PROCEDURE dbo.getUserList as set nocount on begin select * from dbo.[userinfo] end go 以上存储过程取得userinfo表中的所有记录，返回一个记录集。通过command对象调 用该存储过程的ASP代码如下: '**通过Command对象调用存储过程** DIM MyComm,MyRst Set MyComm = Server.CreateObject("ADODB.Command") MyComm.ActiveConnection = MyConStr 'MyConStr是数据库连接字串 MyComm.CommandText = "getUserList" '指定存储过程名 MyComm.CommandType = 4 '表明这是一个存储过程 MyComm.Prepared = true '要求将SQL命令先行编译 Set MyRst = MyComm.Execute Set MyComm = Nothing 存储过程取得的记录集赋给MyRst，接下来，可以对MyRst进行操作。 在以上代码中，CommandType属性表明请求的类型，取值及说明如下： -1 表明CommandText参数的类型无法确定 1 表明CommandText是一般的命令类型 2 表明CommandText参数是一个存在的表名称 4 表明CommandText参数是一个存储过程的名称 还可以通过Connection对象或Recordset对象调用存储过程，方法分别如下： '**通过Connection对象调用存储过程** DIM MyConn,MyRst Set MyConn = Server.CreateObject("ADODB.Connection") MyConn.open MyConStr 'MyConStr是数据库连接字串 Set MyRst = MyConn.Execute("getUserList",0,4) '最后一个参断含义同CommandType Set MyConn = Nothing '**通过Recordset对象调用存储过程** DIM MyRst Set MyRst = Server.CreateObject("ADODB.Recordset") MyRst.open "getUserList",MyConStr,0,1,4 'MyConStr是数据库连接字串,最后一个参断含义与CommandType相同 []ASPCommandMSSQL Juven 很多文章都介绍过，在ASP中调用MSSQL存储过程（Stored Procedure）的介绍。可以使用两种方法： 利用recordset对象，或者直接用command对象。 recordset对象相当简单，熟悉Asp的都能上手操作，这里简单做个实例： Mssql 中建立存储过程SP_UserList ： CREATE PROCEDURE SP_UserList @Uid int AS select * from Users where Uid = @Uid return GO 在SQL Server中执行存储过程： declare @Uid int execute SP_UserList 1 使用recordset对象调用： Uid = 1 set rs=server.createobject("adodb.recordset") sql = "exec SP_UserList "&Uid&"" rs.open sql,conn,1,1 或者： Uid = 1 '存储过程的输入参数,为简化程序, 直接设置该值 sql = "SP_UserList "&Uid&"" Set rs = Conn.Execute(sql) '或者Set rs = Conn.Execute("exec SP_UserList "&Uid&"") 如果改用command对象来调用存储过程，则必须先加载adovbs.inc文件(文件adovbs.inc可在 C:\Program Files\Common Files\System\ADO下找到)： '-----建立Connection对象---------- set Conn = Server.CreateObject("Adodb.connection") Conn.Open "driver={sql server};server=localhost;uid=sa;pwd=;database=Mydbase;" Uid = 1 '-----建立Command对象----------- set Comm = server.createobject("adodb.command") Comm.ActiveConnection = Conn Comm.CommandText = "SP_UserList" '存储过程名称，指定要执行的是一个存储过程 Comm.CommandType = 4 'adCmdStoredProc = 4 ,其为Stored Procedure '-----准备 Stored Procedure 的参数------- Comm.Parameters.Append Comm.CreateParameter("@Uid",adInteger,adParamInput,4,Uid) '命令格式Set parameter = command.CreateParameter (Name, Type, Direction, Size, Value) '-----或者使用下列的方法定义 Stored Procedure 的参数：先创建输入参数对象，然后把参数加到参数集 合------- 'Set CommFirstParam = Comm.CreateParameter("@Uid",adInteger,adParamInput,4,Uid) '创建输入参数对象 'Comm.Parameters.Append CommFirstParam '把参数加到参数集合 '-----执行存储过程---------------------- Comm.Execute '-----下面输出参数结果---------------------- response.write Comm.Parameters("@Uid") 最后关闭command对象：Set Comm = Nothing。如果准备 Stored Procedure 的参数中采用的是创建输入参数对象的方法，则在最后还必须关闭对象：Set CommFirstParam = Nothing 再次提示一下，在使用command调对存储过程时，必须预先使用include加载adovbs.inc文件，否则肯定出错！！ 下列是对Command对象中使用的各属性的描述。 1、ActiveConnection 属性：指示指定的 Command 或 Recordset 对象当前所属的 Connection 对象。 2、CommandText 属性：包含要根据提供者发送的命令的文本。设置或返回包含提供者命令（如 SOL 语句、表格名称或存储的过程调用）的字符串值。默认值为 ""（零长度字符串）。 3、CommandType 属性：指示 Command 对象的类型。 设置和返回值： AdCmdText：将 CommandText 作为命令或存储过程调用的文本化定义进行计算。 AdCmdTable：将 CommandText 作为其列全部由内部生成的 SQL 查询返回的表格的名称进行计算。 AdCmdTableDirect：将 CommandText 作为其列全部返回的表格的名称进行计算。 AdCmdStoredProc：将 CommandText 作为存储过程名进行计算。 AdCmdUnknown：默认值。CommandText 属性中的命令类型未知。 adCmdFile：将 CommandText 作为持久 Recordset 文件名进行计算。 AdExecuteNoRecords：指示 CommandText 为不返回行的命令或存储过程（例如，插入数据的命令）。 如果检索任意行，则将丢弃这些行且并不返回。它总是与 adCmdText 或 adCmdStoredProc 进行组合。 4、CreateParameter 属性：使用指定属性创建新的 Parameter 对象。返回 Parameter 对象。 语法：Set parameter = command.CreateParameter (Name, Type, Direction, Size, Value) 参数描述： Name：可选，字符串，代表 Parameter 对象名称。 Type： 可选，长整型值，指定 Parameter 对象数据类型。关于有效设置请参见 Type 属性。 Direction：可选，长整型值，指定 Parameter 对象类型。关于有效设置请参见 Direction 属性。 Size：可选，长整型值，指定参数值最大长度（以字符或字节数为单位）。 Value： 可选，变体型，指定 Parameter 对象的值。 在上例使用Command对象时，在“准备 Stored Procedure 的参数”中，我们还可以这样实现： Comm.Parameters.Append Comm.CreateParameter("Uid",adInteger,adParamInput,4) Comm("Uid")=1 这样我们在使用存储过程（Stored Procedure） 参数的时候，就可以使用三种方法来实现了。 在ASP中使用存储过程使用到的各个属性我们就简单介绍到这里。在存储过程使用过程中，除了可传 递输入参数外，还可以使用返回码和输出参数返回值，由于篇幅关系，笔者不再举例，有兴趣可去参考VB6.0的MSDN文档中有关ADO的部分和SQL Server 2000的帮助文档。 附：存储过程的书写格式 CREATE PROCEDURE [拥有者.]存储过程名[;程序编号] [(参数#1,…参数#1024)] [WITH {RECOMPILE | ENCRYPTION | RECOMPILE, ENCRYPTION} ] [FOR REPLICATION] AS 程序行 存储过程使用大全 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") %> 建立使用out参数传递 参考 SqlParameter p1 = new SqlParameter( "@StudentID ", SqlDbType.Char,9 ); p1.Value=具体的值; cmd.Parameters.Add(p1); SqlParameter p2 = new SqlParameter( "@returnVal ", SqlDbType.Int); cmd.Parameters.Add(p2); cmd.ExecuteNonQuery(); conn.Close(); Response.Write(p2.Value); 样就可以访问你out参数的值了 存储过程修改为 CREATE PROCEDURE CheckID @StudentID char(9),@returnVal int AS BEGIN IF ((SELECT COUNT(*) FROM Students WHERE StudentID = @StudentID ) > 1) set @returnVal=1 ELSE set @returnVal= 0 END GO cmd.ExecuteNonQuery(); conn.Close(); Response.Write(p2.Value);