使用ADO存取各種資料庫

一、存取Access資料庫

    ADO如何存取Access資料庫

    若要透過

    ODBC存取Access資料庫，於程式碼中指定所要連結的資料庫
    (1) 使用「    Server.CreateObject("ADODB.Connection")」建立連線的物件後，
    (2)  Driver設定為Access ODBC驅動程式名稱
    (3)使用「    Open」直接連結到待存取查詢資料庫。

    ASP程式碼如下： 

    上面是於

    可以使用Server.MapPath("資料庫檔案名稱") 以取得資料庫的真實路徑檔案如下：

    設定待執行的

    SQL指令為「SELECT * FROM sampleTable」以查詢的資料
    將查詢的資料放置於所定義    rs的Recordset當中，ASP程式碼如下：

    Set rs = Server.CreateObject("ADODB.Recordset")

    SqlStr = "SELECT * FROM sampleTable

    rs.Open SqlStr,cn,1,1

    "

    使用

    Recordset屬性和方法顯示執行的結果：

     

     

     

    其中

    由rs(“欄位名稱”) ，讀取此筆資料指定欄位的資料，
    之後由    rs.MoveNext，將指標移到下一筆。

    使用ADO透過ODBC存取的SQL Server資料庫

    新建立一個叫做SampleDB的Database。

     

    要透過

    使用「Server.CreateObject("ADODB.Connection")」建立連線的物件，

    Driver設定為SQL Server ODBC驅動程式名稱，

    使用「Open」直接連結到待存取查詢資料庫，ASP程式碼如下 三、Excel檔案

    使用ADO存取Excel資料ODBC存取Excel資料，首先直接於ASP程式碼中指定所要連結的對象(xls檔案)

    若要透過

    使用「Server.CreateObject("ADODB.Connection")」建立連線的物件後，

    於Driver設定為Excel ODBC驅動程式名稱，於DBQ設定Excel資料的真實路徑檔案名稱，

    可以使用Server.MapPath("著作.xls") 以取得Excel檔的真實路徑(絕對路徑)檔案

    使用「Open」直接連結到待存取查詢資料庫：

     

    ASP程式碼對Excel資料可以做查詢、新增、和修改，但是無法執行刪除的運算。

    四、dBase

    使用ADO存取dBase資料庫的資料首先直接於ASP程式碼中指定所要連結的資料庫，

     

    使用「Server.CreateObject("ADODB.Connection")」建立連線的物件後，

    Driver設定為dBase ODBC驅動程式名稱，

    DBQ直接設定dBase資料庫檔案的真實路徑譬如c:\ntopsamp\ado或c:\ ntopsamp\ado\，

    使用「Open」直接連結到待存取查詢資料庫：

     

     

     

    五、Text

    DBQ不能夠包括檔案名稱，否則無法執行，dBase並沒有資料表的觀念，SQL指令所指的資料表名稱即為dBase檔案名稱，譬如「sample.dbf」，其資料表名稱為「sample」。

    使用ADO存取Text文字檔案的資料首先直接於ASP程式碼中指定所要連結的資料庫，

     

    使用「Server.CreateObject("ADODB.Connection")」建立連線的物件後

    Driver設定為Text ODBC驅動程式名稱，

    DBQ直接設定Text文字檔案的真實路徑，例如c:\inetpub\wwwroot

    同樣不包括檔案名稱，否則無法執行

    使用「Open」直接連結到待存取查詢資料庫：

    DBQ不能夠包括檔案名稱，否則無法執行，Text文字檔案並沒有資料表的觀念，SQL指令所指的資料表名稱即為Text文字檔案名稱，譬如「sample.txt」，其資料表名稱為「sample」。 對Text文字檔案的資料可以做查詢、新增、和修改，但是無法做刪除

     

     

     

     

     

     

     

     

    二、SQL Server

     

    cn.Open "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("sample.mdb")

     

    Set cn = Server.CreateObject("ADODB.Connection")

    cn.Open "Driver={Microsoft Access Driver (*.mdb)};DBQ=c:\inetpub\wwwroot\sample.mdb"