各种存储过程使用指南

各种存储过程使用指南

<%@ Language=VBScript %> 
<%

'---开始链接数据库 
Dim strConnString 
strConnString = "driver={SQL Server};server=songhp;uid=sa;pwd=;database=XVZDemo" 
set Conn = Server.CreateObject("ADODB.Connection") 
Conn.Open strConnstring 
'---结束链接数据库

'---开始为输入参数赋值 
Dim SelectSql , SelectRs 
Dim SelectID , SelectName , SelectReturn 
SelectSql = "Select Max(CompanyID) From Dim_Company" 
Set SelectRs = Conn.Execute(SelectSql) 
SelectID = SelectRs(0) 
'---结束为输入参数赋值

Dim TiggerType 
TiggerType = 3

Set Cmd = Server.CreateObject("ADODB.Command") 
Set Cmd.ActiveConnection = Conn 
Cmd.CommandType = 4 '---声明此过程为存储过程

If TiggerType = 1 then

'---开始一个输入参数的存储过程调用 
Cmd.CommandText = "TransCompany1"

Set CmdParam = Cmd.CreateParameter("@TransID",3,1) 
Cmd.Parameters.Append CmdParam 
Cmd("@TransID") = SelectID 
Cmd.Execute 
'---结束一个输入参数的存储过程调用

Elseif TiggerType = 2 then

'---开始一个输入参数,一个输出参数的存储过程调用 
Cmd.CommandText = "TransCompany2"

Set CmdParamID = Cmd.CreateParameter("@TransID",3,1) 
Cmd.Parameters.Append CmdParamID 
Cmd("@TransID") = SelectID 
Set CmdParamName = Cmd.CreateParameter("@TransName",202,2,50) 
Cmd.Parameters.Append CmdParamName 
Cmd.Execute 
SelectName = Cmd("@TransName") 
'---结束一个输入参数,一个输出参数的存储过程调用

Elseif TiggerType = 3 then

'---开始一个输入参数,一个输出参数,一个返回值的存储过程调用 
Cmd.CommandText = "TransCompany3" 
Set CmdParamReturn = Cmd.CreateParameter("Return_Value",3,4) 
Cmd.Parameters.Append CmdParamReturn 
Set CmdParamID = Cmd.CreateParameter("@TransID",3,1) 
Cmd.Parameters.Append CmdParamID 
Cmd("@TransID") = SelectID 
Set CmdParamName = Cmd.CreateParameter("@TransName",202,2,50) 
Cmd.Parameters.Append CmdParamName

Cmd.Execute 
SelectName = Cmd("@TransName") 
SelectReturn = Cmd("Return_Value") 
'---结束一个输入参数,一个输出参数,一个返回值的存储过程调用

End if

Conn.Close 
Set Conn = Nothing 
Set Cmd = Nothing 
Set CmdParamID = Nothing 
Set CmdParamname = Nothing 
Set CmdParamReturn = Nothing

%>

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值