不想在伺服器建立系統 DSN?直接在連線字串指定驅動程式、伺服器、資料庫即可。以下是經典 ADO 免 DSN 連線範例。
Dim conn
Set conn = Server.CreateObject("ADODB.Connection")
conn.ConnectionString = "Driver={SQL Server};Server=your_server;Uid=sa;Pwd=your_pwd;Database=pubs;"
conn.Open
' 執行查詢
Dim cmd, rs
Set cmd = Server.CreateObject("ADODB.Command")
Set cmd.ActiveConnection = conn
cmd.CommandText = "SELECT * FROM authors"
Set rs = cmd.Execute
' ... 處理 rs ...
rs.Close
conn.Close
Set rs = Nothing
Set cmd = Nothing
Set conn = Nothing
| 參數 | 說明 |
|---|---|
Driver={SQL Server} | 使用 SQL Server ODBC 驅動程式 (機器需安裝 MDAC) |
Server | 伺服器 IP、主機名或 IP,Port (非預設埠) |
Database | 預設資料庫名稱 |
Uid/Pwd | SQL 驗證帳密;若用 Windows 驗證改 Trusted_Connection=Yes |