Archive for 3月 10th, 2012

  1. Hello, ACE Database World!

    Posted on 3月 10th, 2012 by cx20

    ACE Database

    ACE Database Engine(Access データベースエンジン) は Jet データベースエンジンの後継の DBMS エンジンである。Access 2007 以降 のデータベース(.accdb)のエンジンとしても使用されている。

    クライアントアプリケーション データベースエンジン 推奨されるデータベース形式
    Access 2007 ACE 12.0 (32bit) *.accdb (ACE 12.0)
    Access 2010 (32bit) ACE 12.0 (32bit) *.accdb (ACE 12.0)
    Access 2010 (64bit) ACE 12.0 (64bit) *.accdb (ACE 12.0)
    DA0 12 (32bit) ACE 12.0 (32bit) *.accdb (ACE 12.0)
    DA0 12 (64bit) ACE 12.0 (64bit) *.accdb (ACE 12.0)
    Microsoft.ACE.OLEDB.12.0 (32bit) ACE 12.0 (32bit) *.accdb (ACE 12.0)
    Microsoft.ACE.OLEDB.12.0 (64bit) ACE 12.0 (64bit) *.accdb (ACE 12.0)

    ソースコード(VBScript + DAO + ACE データベース)

    Set dbe = CreateObject("DAO.DBEngine.120")
    Set db = dbe.OpenDatabase("Hello.accdb")
    Set rs = db.OpenRecordset("SELECT 'Hello, ACE Database World!' AS Message")
    WScript.Echo rs(0).Name
    WScript.Echo "--------------------------"
    WScript.Echo rs(0).Value

    ソースコード(VBScript + ADO + OLEDB + ACE データベース)

    Set cn = CreateObject("ADODB.Connection")
    cn.Open "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=Hello.accdb"
    Set rs = cn.Execute("SELECT 'Hello, ACE Database World!' AS Message")
    WScript.Echo rs(0).Name
    WScript.Echo "--------------------------"
    WScript.Echo rs(0).Value

    ソースコード(VBScript + ADO + ODBC + ACE データベース)

    Set cn = CreateObject("ADODB.Connection")
    cn.Open "Provider=MSDASQL;Driver={Microsoft Access Driver (*.mdb, *.accdb)};DBQ=.\hello.accdb"
    Set rs = cn.Execute("SELECT 'Hello, ACE Database World!' AS Message")
    WScript.Echo rs(0).Name
    WScript.Echo "--------------------------"
    WScript.Echo rs(0).Value

    実行方法(Windows)

    C:¥> CScript //Nologo Hello.vbs

    実行結果

    Message
    --------------------------
    Hello, ACE Database World!