以下是連線幾種資料庫的驅動，把用"<%"和"%>"括住的地方儲存為檔案你就可以直接呼叫了
連線Access資料庫
<% dim conn,dbpath dim connstr '資料庫目錄 dbpath="data/data.mdb" Set conn = Server.CreateObject("ADODB.Connection") connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(dbpath) conn.Open connstr %>
連線Excel資料庫
<% dim conn,dbpath dim connstr '資料庫目錄 dbpath="data/data.xls" Set conn = Server.CreateObject("ADODB.Connection") connstr="Provider=Microsoft.Jet.OLEDB.4.0;Extended Properties=Excel 7.0; Data Source=" & Server.MapPath(dbpath) conn.Open connstr %>
連線Oracle資料庫
<% dim conn dim connstr Set conn = Server.CreateObject("ADODB.Connection") '資料來源名就是在控制皮膚裡的資料來源ODBC裡設定連線Oracle資料庫的源名 connstr=""Provider=OraOLEDB.Oracle;data source=資料來源名;user id=使用者名稱;password=密碼;" conn.Open connstr %>
連線MS SQL Server
<% dim conn dim connstr Set conn = Server.CreateObject("ADODB.Connection") connstr="Provider=SQLOLEDB;data source=資料來源;initial catalog=庫名;userid=使用者名稱;password=密碼" conn.Open connstr %>