一
ASP (Active Server Pages) 是服務器端的腳本編寫環境
二
如圖
ASP提供了一個在HTML頁中使用現有腳本語言如 Microsoft VBScript 和 Microsoft JScript 的框架
ASP提供內建對象
三
ASP和後台數據庫連接使用微軟的ADO(ActiveX Data Objects)
ADO包含
四
在一般的MIS應用中
在創建數據庫腳本之前
訪問數據庫信息的第一步是和數據庫源建立連接
<%
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 '生成查詢結果
%>
此時
<%
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
<%
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使用的詳細信息
五
在B/S結構的開發中
From:http://tw.wingwit.com/Article/program/SQLServer/201311/22230.html