熱點推薦:
您现在的位置: 電腦知識網 >> 編程 >> .NET編程 >> 正文

ASP存儲過程的使用方法

2013-11-13 09:55:28  來源: .NET編程 

  使用Command對象和Parameter對象傳遞參數
  
  本講將主要使用Microsoft SQL Server數據庫先建立一個連接文件AdoSQLasp備用以後用到時不再特別說明
  
  <% AdoSQLasp
  
  Option Explicit
  
  ResponseExpires =
  
  第一部分: 建立連接
  
  Dim Cnn StrCnn
  
  Set Cnn = ServerCreateObject(ADODBConnection)
  
  StrCnn = Provider=sqloledb; User ID=sa; Password=; Initial Catalog=pubs; Data Source=ICBCZJP
  
  CnnOpen StrCnn
  
  %>
  
  注意自己使用時要將Data Source設為你的數據庫服務器所在的機器名
  
  另外以前使用Access數據庫時用Microsoft Access可以很方便的查看字段及數據而使用SQL Server數據庫尤其是並不在數據庫服務器而是在另一台機器上調試ASP腳本時要查看字段及數據便需另外安裝工具這裡向你提供一個工具Msqryexe(Microsoft Query)這個文件隨Office安裝一般位於目錄Microsoft Office\Office
  
  例wufasp
  
  <%@ LANGUAGE=VBSCRIPT %>
  
  <!#include file=AdoSQLasp>
  
  <!#include file=adovbsinc>
  
  <% wufasp
  
  Dim cmdTest prmTest rsTest
  
  創建 Command 對象
  
  Set cmdTest = ServerCreateObject(ADODBCommand)
  
  RecordsetCommand對象都可以通過ActiveConnection屬性來連接Connection對象
  
  cmdTestActiveConnection = Cnn
  
  SQL命令 含兩個參數 用 ? 表示
  
  cmdTestCommandText = Update jobs Set job_desc = ? Where job_id = ?
  
  設命令類型為 SQL 語句
  
  cmdTestCommandType = adCmdText
  
  Prepared 屬性決定是否將 SQL 命令先行編譯將其設為True可以加快運行
  
  cmdTestPrepared = True
  
  
  
  創建 Parameter 對象
  
  Set prmTest=cmdTestCreateParameter(job_descadVarCharadParamInput網絡)
  
  將數據追加到 Parameters 數據集合中
  
  cmdTestParametersAppend prmTest
  
  Set prmTest = cmdTestCreateParameter(job_idadSmallIntadParamInput)
  
  cmdTestParametersAppend prmTest
  
  執行修改 – 不需要返回結果簡單的使用cmdTestExecute 就可以了
  
  cmdTestExecute
  
  重新設置參數運行 – 便可修改另一條數據
  
  cmdTestParameters(job_id) =
  
  cmdTestParameters(job_desc) = 測試
  
  cmdTestExecute
  
  重新設置參數運行
  
  cmdTest(job_id) =
  
  cmdTest(job_desc) = 金融
  
  cmdTestExecute
  
  Set rsTest = CnnExecute(Select job_idjob_desc From jobs)
  
  While Not rsTestEOF
  
  ResponseWrite rsTest() & rsTest() & <br>
  
  rsTestMoveNext
  
  Wend
  
  Cnnclose : Set prmTest = Nothing
  
  Set cmdTest = Nothing: Set Cnn = Nothing
  
  %>
  
  分析
  
  .Command對象的CreateParameter方法用來為SQL命令或存儲過程建立參數對象共有五個參數(五個參數都是可選項)
  
  第一個參數參數對象的名稱
  
  第二個參數參數對象的數據類型種類太多還是參考ADO幫助吧這裡adVarChar(字符串值)adSmallInt( 字節帶符號整型)
  
  第三個參數參數類型可以是adParamInput(指示輸入參數)adParamOutput( 指示為輸出參數)adParamReturnValue(指示為返回值)adParamUnknown(指示參數類型無法確定)adParamInputOutput(指示為輸入/輸出參數)
  
  第四個參數參數的數據長度最好指定為與數據庫中對應字段長度相等以免使用時出錯尤其數據類型為VarChar時如果是整型或日期型則不必提供該值
  
  第五個參數參數的設置初值
  
  .cmdTestParametersAppend方法增加一個Parameter對象到Parameters數據集合中從本例中也可看到如何使用多個參數
  
  .從本例可以看到只需要重新設定輸入參數便可執行對其他數據的修改非常方便這一思路在編程時也是最常用的方法之一
  
  .重設參數既可以使用cmdTestParameters也可以省略為cmdTest(job_id)
  
  在ASP中使用存儲過程
  
  什麼是存儲過程(存儲過程位於數據庫服務器中是一個SQL語句的集合可包含一個或多個SQL語句)怎樣創建存儲過程不屬於本講座的內容本講座主要是舉例說明在ASP中如何調用存儲過程
  
  使用存儲過程的好處是大大的存儲過程比在ASP腳本中運行SQL命令效率更高可以提高整體性能並減輕網絡負載(減少了在網絡服務器和數據服務器之間的交互)可以優化ASP代碼和增強代碼靈活性等等
  
  (一)在存儲過程中使用輸入參數
  
  本例中使用的存儲過程為SQL Server自帶的byroyalty裡面的一條SQL語句非常簡單無非是多了一個CREATE PROCEDURE byroyalty並且有一個輸入參數為@percentage
  
  CREATE PROCEDURE byroyalty @percentage int
  
  AS
  
  select au_id from titleauthor
  
  where titleauthorroyaltyper = @percentage
  
  serve by
  
  例wufasp
  
  <% @LANGUAGE = VBScript %>
  
  <!#include file=AdoSQLasp>
  
  <!#include file=adovbsinc>
  
  <% wufasp
  
  Dim cmdTest prmTest rsTest
  
  Set cmdTest = ServerCreateObject(ADODBCommand)
  
  cmdTestCommandText = byroyalty     存儲過程名
  
  設命令類型為 存儲過程
  
  cmdTestCommandType = adCmdStoredProc
  
  創建 Parameter 對象
  
  Set prmTest = ServerCreateObject(ADODBParameter)
  
  Type屬性對應wufasp中的第二個參數
  
  prmTestType = adInteger     字節的帶符號整型
  
  Direction屬性對應wufasp中的第三個參數
  
  prmTestDirection = adParamInput
  
  Value屬性對應wufasp中的第五個參數
  
  prmTestValue =
  
  cmdTestParametersAppend prmTest
  
  Set cmdTestActiveConnection = Cnn
  
  需要返回一個記錄集故使用Set rsTest = cmdTestExecute
  
  Set rsTest = cmdTestExecute
  
  While Not rsTestEOF
  
  ResponseWrite rsTest() & <br>
  
  rsTestMoveNext
  
  Wend
  
  Cnnclose
  
  Set rsTest = Nothing : Set prmTest = Nothing
  
  Set cmdTest = Nothing: Set Cnn = Nothing
  
  %>
  
  CommandText屬性既可以指定SQL命令也可以指定為存儲過程或者是表名稱
  
  在本例中創建Parameter對象與wufasp略有不同其實仔細看看意思也是差不多的本例還有兩個屬性未用prmTestNameprmTestSize加上TypeDirection和Value對應於wufasp中的五個參數
  
  (二)使用輸出參數
  
  從數據庫表中取得一個記錄或計算一個值時需要使用返回輸出參數的存儲過程為了舉例先在SQL Server的pubs庫中新建一存儲過程OUTemploy該存儲過程需要輸入兩個日期然後輸出一個最大值
  
  CREATE PROCEDURE OUTemploy
  
  (
  
  @job_lvl tinyint OUTPUT
  
  @hire_date datetime
  
  @hire_date datetime
  
  )
  
  AS
  
  select @job_lvl = MAX(job_lvl) from employee
  
  where hire_date >= @hire_date and hire_date <= @hire_date
  
  有多種方法可以建立存儲過程
  
  .使用Microsoft SQL Server的Enterprise Manager打開後在左邊的樹目錄中依次打開Console Root – Microsoft SQL Servers – SQL Server Group – ICBCZJP(Windows NT) – databases – pubs – stored procedure – New stored procedure輸入存儲過程後還可對其進行語法檢測
  
  .使用Microsoft SQL Server的Query Analyzer先連接數據庫服務器並選擇pubs數據庫輸入上面的存儲過程並點擊Execute Query(或按F)
  
  .使用VB打開菜單視圖/數據視圖窗口右鍵單擊數據鏈接/新建數據鏈接
  
  .使用ASP腳本創建存儲過程例wufasp
  
  <% @LANGUAGE = VBScript %>
  
  <!#include file=AdoSQLasp>
   From:http://tw.wingwit.com/Article/program/net/201311/11987.html
    推薦文章
    Copyright © 2005-2013 電腦知識網 Computer Knowledge   All rights reserved.