推薦：ASP子程序的簡單入門
在 ASP 中，你可通過 VBScript 和其他方式調用子程序。 實例： 調用使用 VBScript 的子程序 html head % sub vbproc(num1,num2) response.write(num1*num2) end sub % /head body p您可以像這樣調用一個程序：/p p結果：蔿l vbproc(3,4)%/p p或者，像這樣：/

一、前言

ASP (Active Server Pages) 是服務器端的腳本編寫環境，它由微軟公司的IIS3.0以上版本支持。它可用來創建動態 Web 頁或生成功能強大的 Web應用程序。ASP頁是包括 HTML 標記、文本和腳本命令的文件。ASP頁可調用ActiveX組件來執行任務，例如連接到數據庫或進行商務計算。通過ASP，可為您的Web頁添加交互內容或用HTML頁構成整個Web應用程序，這些應用程序使用HTML頁作為您的客戶的界面。

二、ASP模型

瀏覽器從Web服務器上請求 .asp文件時，ASP 腳本開始運行。然后Web服務器調用ASP，ASP全面讀取請求的文件，執行所有腳本命令，并將Web頁傳送給瀏覽器。

ASP提供了一個在HTML頁中使用現有腳本語言如 Microsoft VBScript 和 Microsoft JScript 的框架。

ASP提供內建對象，這些對象使用戶更容易收集通過瀏覽器請求發送的信息、響應瀏覽器以及存儲用戶信息。包括Application、Request、Response、Server、Session 和ObjectContext 對象。其中最為常用的為Request、Response 和Server三個對象，它們分別用于從瀏覽器請求信息、向瀏覽器發送信息和訪問服務器上對象的屬性和方法。

三、ADO

ASP和后臺數據庫連接使用微軟的ADO(ActiveX Data Objects)，ADO是一項容易使用并且可擴展的將數據庫訪問添加到Web頁的技術。可以使用ADO去編寫緊湊簡明的腳本以便連接到Open Database Connectivity(ODBC)兼容的數據庫和 OLE DB兼容的數據源。

ADO包含7個內置對象，它們分別為Connection、Command、RecordSet、Fields、Error、Parameters和Properties。通過這些對象，ASP可以完成對后臺數據庫的所有操作。

四、ASP調用視圖和存儲過程

在一般的MIS應用中，會有大量的報表，此時我們可以在后臺數據庫編寫相應的視圖或存儲過程，用ASP通過ADO調用以完成報表工作。下面用一個例子說明相應的操作過程。

1.創建 ODBC DSN 文件

在創建數據庫腳本之前，必須提供一條使ADO定位、標識和與數據庫通訊的途徑。數據庫驅動程序使用Data Source Name (DSN) 定位和標識特定的ODBC兼容數據庫，將信息從 Web 應用程序傳遞給數據庫。

2. 在ASP中調用SQL Server數據庫視圖

訪問數據庫信息的第一步是和數據庫源建立連接。ADO提供Connection對象，可以使用該對象建立和管理應用程序和 ODBC數據庫之間的連接。

以下為引用的內容： <% Set Dataconn = Server.CreateObject("ADODB.Connection") '建立連接對象 Dataconn.Open "DSN=SinoTrans;SERVER=APP_SERVER; UID=sa;PWD=;APP=Microsoft (R) Developer Studio;WSID=APP_SERVER;Regional=Yes" Set cmdTemp = Server.CreateObject("ADODB.Command") '建立命令對象 Set rst= Server.CreateObject("ADODB.Recordset") '建立記錄集對象 cmdTemp.CommandText = "Customers " cmdTemp.CommandType = 2 Set cmdTemp.ActiveConnection = DataConn rst.Open cmdTemp, , 1, 3 '生成查詢結果 %>

此時，Customers為視圖，從視圖中查詢數據與從基表中查詢數據的方法是相同的。

3.在ASP中調用SQL Server數據庫存儲過程

以下為引用的內容： <% Set Dataconn = Server.CreateObject("ADODB.Connection") '建立連接對象 Dataconn.Open "DSN=SinoTrans;SERVER=APP_SERVER;UID=sa; PWD=;APP=Microsoft (R) Developer Studio;WSID=APP_SERVER;Regional=Yes" Set cmdTemp = Server.CreateObject("ADODB.Command") '建立命令對象 Set rst = Server.CreateObject("ADODB.Recordset") '建立記錄集對象 cmdTemp.CommandText = "dbo.pd_test" '存儲過程名稱 cmdTemp.CommandType = 4 '命令類別為4,表示為存儲過程 Set cmdTemp.ActiveConnection = Dataconn Set tmpParam = cmdTemp.CreateParameter("Return Value", 3, 4, 4) cmdTemp.Parameters.Append tmpParam Set tmpParam = cmdTemp.CreateParameter("@BeginDate", 135, 1, 16, riqi) '創建輸入參數對象 cmdTemp.Parameters.Append tmpParam rst.Open cmdTemp, , 1, 3 '生成查詢結果 %>

這里調用的存儲過程為pd_test，這種是ADO中提供的標準方法，但存在一個問題，就是當在存儲過程中有兩個以上的SELECT語句，但從邏輯上又不可能同時執行的時候，ADO會提示你存儲過程中SELECT語句太多，解決方法是直接用ADO的CONNECTION對象的EXECUTE方法直接執行存儲過程，如下：

以下為引用的內容： <% Set Dataconn = Server.CreateObject("ADODB.Connection") '建立連接對象 Dataconn.Open "DSN=SinoTrans;SERVER=APP_SERVER;UID=sa;PWD=; APP=Microsoft (R) Developer Studio;WSID=APP_SERVER;Regional=Yes" ss = "EXECUTE dbo.pd_test " & "'" & riqi1 & "'" Set rs = dataconn.Execute(ss) %>

有關ASP和ADO使用的詳細信息，請參閱 Microsoft ActiveX Data Objects (ADO) 和Active Server Pages（ASP）的詳細參考。

五、在ASP中調用SQL Server視圖和存儲過程結束語

在B/S結構的開發中，我們可以把一些商業規則或復雜查詢用存儲過程在DBMS中編寫，然后用ASP中的ADO對象調用，完成原來C/S結構中的傳統功能。

分享：怎樣用ASP編寫圖片計數器
在Internet上，用ASP編寫的計數器到處都是，本人覺得再在這里談ASP編寫計數器已沒有多大意義。后來想想還是有必要談一下，因為這不僅僅只是在談計數器的編寫，而是在向大家介紹ASP的知識與應用技巧。 程序原代碼如下： $#@60;％countlong=8 countlong定義計