mdbファイルの新規作成

解決

いち 2002-09-21 01:12:19 No: 76130

ADODBを使用してアクセスのmdbファイルを参照／編集するソフトを作っています。既にあるmdbファイルを操作する方法は、わかっているのですが、新規にmdbファイルを作成し、フィールド名などを設定する方法が分かりません。ご存知の方がいらっしゃいましたらご教授願います。また、それが記載されているＨＰなどもあればご紹介願います。

Say 2002-09-21 05:31:09 No: 76131

ヘルプを参照してください。
ADOXを用いたデータベース作成例が載ってます。

いち 2002-09-24 19:09:41 No: 76132

下記のコードでできました。
ありがとうございました。

    'データベースファイルの新規作成
    Dim cat    As New ADOX.Catalog
    Dim tbl    As New ADOX.Table
    Dim col    As New ADOX.Column

Dim strConnect As String

    ' ADOコネクション文字列の指定
    strConnect = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & sFile & ";Jet OLEDB:Engine Type=5;"

    'データベースの作成
    cat.Create strConnect

    '新規テーブルの作成
    tbl.Name = "アイテムリスト"
    cat.Tables.Append tbl