以下是連接幾種數據庫的驅動,把用"<%"和"%>"括住的地方保存為文件你就可以直接調用了
連接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 %>