|
SQL Server
適用于
概要
本文介紹了如何使用“ActiveX 數據對象”(ADO) 在 ASP 腳本中建立到 SQL Server 的連接，同時利用 ODBC 3.0 的連接池功能。
更多信息
連接池
啟用 ODBC 連接池。
有關連接池的其他信息以及有關如何啟用連接池功能的說明，請單擊下面的文章編號，以查看 Microsoft 知識庫中相應的文章：
164221 如何在 ODBC 應用程序中啟用連接池
ODBC DSN
使用“ODBC 管理器”，在 Microsoft Internet Information Server (IIS) 安裝在的計算機上創建一個“系統”數據源名稱 (DSN)。一次指定連接屬性，然后在每個頁面上重復使用此屬性。例如，在 Global.asa 文件的 Session_OnStart 事件中，將連接屬性定義為：
Session("ConnectionString") = "dsn=SQLSysDSN;uid=<username>;" & _ "pwd=<strong password>;DATABASE=pubs;APP=ASP Script"
確保下列所有條件都滿足：
“系統 DSN”定義中沒有選中受信任連接框。
SQL Server 安全模式不是“Windows NT 集成”。
在連接屬性中，uid 不為空。
否則，到 SQL Server 的連接可能會失敗，并收到以下錯誤信息：
Microsoft OLE DB provider for ODBC Drivers error '80004005'
[Microsoft][ODBC SQL Server Driver][SQL Server]Login failed- User:_
Reason:Not defined as a valid user of a trusted SQL Server connection.
Global.asa
是否使用 Global.asa 文件是可選的。在其位置上，通常由此文件創建的項目可以放到應用程序調用的第一頁上。假定 ASP 腳本位于一個文件夾中，該文件夾在“Internet 服務管理器”中沒有定義為虛擬目錄，而是位于另一個虛擬目錄下面，那么，包含 Session 變量和 DSN 定義的 Global.asa 文件就必須保留在此虛擬目錄中。否則，將出現以下錯誤信息：
Microsoft OLE DB Provider for ODBC Drivers error '80004005'
[Microsoft][ODBC Driver Manager] Data source name not found and no
default driver specified
ASP 腳本中的連接
通過打開和關閉到每個 Active Server Page 上的數據庫的連接來利用連接池。要打開此連接，請在頁面的 <Body> 部分中鍵入以下語句：
<% Set OBJdbConnection = Server.CreateObject("ADODB.Connection") OBJdbConnection.Open Session("ConnectionString") %>
要關閉此連接，請將以下內容放到 </Body> 標記后：
<% OBJdbConnection.Close Set OBJdbConnection = Nothing %>
如果沒有象本文前面介紹的那樣正確定義連接設置，您可能會收到以下兩條錯誤信息：
Microsoft OLE DB Provider for ODBC Drivers error '80004005'
[Microsoft][ODBC SQL Server Driver][DBNMPNTW]Connection broken.
- 或 -
Microsoft OLE DB Provider for ODBC Drivers error '80004005'
[Microsoft][ODBC SQL Server Driver]Communication link failure
此處是一個包含 Global.asa 和 Authors.asp 文件的示例應用程序。此示例應用程序將返回名為 authors 的 pubs 表中的四列和所有記錄。
注意：您必須先將 UID <用戶名> 和 pwd =<強密碼> 更改為正確的值，然后才能運行此代碼。請確保該 UID 具有在數據庫中執行此操作所需的適當權限。
Global.asa
<SCRIPT LANGUAGE=VBScript RUNAT=Server> Sub Session_OnStart Session("ConnectionString") = "DSN=SQLSysDSN;UID=<username>;PWD=<strong password>;" & _ "DATABASE=pubs;APP=ASP script" Session("ConnectionTimeout") = 15 Session("CommandTimeout") = 30 End Sub
Sub Session_OnEnd
End Sub </SCRIPT>
Authors.asp
<HTML> <HEAD> <TITLE>All Authors</TITLE> </HEAD> <BODY BGCOLOR="#FFFFFF">
<% Set OBJdbConnection = Server.CreateObject("ADODB.Connection") OBJdbConnection.ConnectionTimeout = Session("ConnectionTimeout") OBJdbConnection.CommandTimeout = Session("CommandTimeout") OBJdbConnection.Open Session("ConnectionString") Set SQLStmt = Server.CreateObject("ADODB.Command") Set RS = Server.CreateObject ("ADODB.Recordset") %>
<p> <table border="0" bordercolor="#000000"> <% SQLStmt.CommandText = "select * from authors" SQLStmt.CommandType = 1 Set SQLStmt.ActiveConnection = OBJdbConnection RS.Open SQLStmt
Do While Not RS.EOF %> <TR> <TD Width = 150 ALIGN=LEFT> <FONT SIZE=+1> <%= RS("au_id") %> </FONT></TD> <TD></TD> <TD Width = 150 ALIGN=LEFT> <FONT SIZE=+1> <%= RS("au_lname") %> </FONT></TD> <TD Width = 150 ALIGN=LEFT> <FONT SIZE=+1> <%= RS("au_fname") %> </FONT></TD> <TD Width = 150 ALIGN=LEFT> <FONT SIZE=+1> <%= RS("phone") %> </FONT></TD> </TR> <% RS.MoveNext Loop %> <hr> <p> </BODY> <% OBJdbConnection.Close Set OBJdbConnection = Nothing %> </HTML>
有關 Active Server Pages 的更多信息，請參見 IIS 服務器上 ASP 安裝程序提供的路徑圖 (Roadmap)。
參考
有關 Microsoft Visual Basic .NET 編碼技術的更多信息，請訪問以下 Web 站點：
http://www.microsoft.com/mspress/books/4909.asp
Coding Techniques for Microsoft Visual Basic .NET（Microsoft Visual Basic .NET 編碼技術）
Connell, John
Microsoft Press, 2001.
如果您沒有看到您問題的答案，請訪問 Microsoft SQL Server 新聞組，地址是： Microsoft SQL Server Newsgroups（Microsoft SQL Server 新聞組）
如果您想對本文或其他 Microsoft SQL Server 知識庫文章發表評論，請給我們發郵件，地址是 Q169377
這篇文章中的信息適用于:
Microsoft SQL Server 2000 (all editions)
Microsoft SQL Server 7.0
Microsoft SQL Server 6.5
Microsoft SQL Server 6.0
Microsoft SQL Server 4.2x
Microsoft Internet Information Server 4.0
Microsoft Internet Information Server 3.0
Microsoft Internet Information Server 5.0
最近更新: 2004-5-31 (5.0)
關鍵字: kbenv kbhowto kbinterop kbtshoot KB169377 kbAudDeveloper
|
