Sql Server数据库的存储过程

一、创建存储过程

CREATE PROC

存储过程名称

[参数列表（多个以“,”分隔）]

AS   SQL 语句

例：

 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程序里的调用。

 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

 

三、存储过程的实际应用

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: 
// 创建一个对象，我们用来调用存储过程
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