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 |
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 |
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 |
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 |
C:¥> CScript //Nologo Hello.vbs
実行結果
Message
--------------------------
Hello, ACE Database World! |
Message
--------------------------
Hello, ACE Database World!
Tags: ACE Database
Categories: Access, ACE Database, SQL, VBScript
