帶返回記錄集的預存程序-ASP調用預存程序

來源:互聯網
上載者:User
預存程序|記錄集 假設有以下預存程序(本文的目的不在於講述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)


相關文章

E-Commerce Solutions

Leverage the same tools powering the Alibaba Ecosystem

Learn more >

Apsara Conference 2019

The Rise of Data Intelligence, September 25th - 27th, Hangzhou, China

Learn more >

Alibaba Cloud Free Trial

Learn and experience the power of Alibaba Cloud with a free trial worth $300-1200 USD

Learn more >

聯繫我們

該頁面正文內容均來源於網絡整理,並不代表阿里雲官方的觀點,該頁面所提到的產品和服務也與阿里云無關,如果該頁面內容對您造成了困擾,歡迎寫郵件給我們,收到郵件我們將在5個工作日內處理。

如果您發現本社區中有涉嫌抄襲的內容,歡迎發送郵件至: info-contact@alibabacloud.com 進行舉報並提供相關證據,工作人員會在 5 個工作天內聯絡您,一經查實,本站將立刻刪除涉嫌侵權內容。