戻る

ADOX で MDB ファイルを作成する

概要

ADOX のデータ定義機能を利用して新しい MDB ファイルを作成します。
使用する OLEDB プロバイダのバージョンによって規定のMDBファイル形式が異なりますが、
Engine Type パラメータを指定することにより特定のファイル形式を指定することができます。

サンプル

[Microsoft ADO Ext 2.1 for DDL and Security ] を使用します。

　ADOX で MDB ファイルを作成する

Option Explicit

' Engine Type を指定することによってデータベースの形式を
' 指定することができます。
' Jet.OLEDB.3.51 を使用した場合、規定のデータベース形式は
' Access97 になります。
Private Sub cmdCreateMDB_Click()

    Dim cat As Object ' New ADOX.Catalog
    
    ' カタログオブジェクト
    Set cat = CreateObject("ADOX.Catalog")
    
    ' 以下のコードは Access97 形式のファイルを作成します
    cat.Create "Provider=Microsoft.Jet.OLEDB.4.0;" & _
                "Data Source=C:\My Documents\db97.mdb;" & _
                "Jet OLEDB:Engine Type=4;"

    ' 以下のコードは Access2000 形式のファイルを作成します
    cat.Create "Provider=Microsoft.Jet.OLEDB.4.0;" & _
                "Data Source=C:\My Documents\db2000.mdb;" & _
                "Jet OLEDB:Engine Type=5;"
    
End Sub


VB で データベース ホームページ

©2000 VBMANIA