tagCANDY CGI VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板
VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板
[ツリー表示へ]  [ワード検索]  [Home]

タイトル VB6からACCDB形式のACCESSを読み込めない
投稿日: 2019/08/09(Fri) 18:46
投稿者ピッピ

いつも参考にさせていただいてます
VB6のプログラムを改造するように言われたのですが
ACCESSのバージョンが上がっておりすごく基本的なことができません
ファイル拡張子がMDB形式からACCDB形式に変わったため

Micosoft Office nn.n Access Database Engine Object Library
を参照設定にするのとDAO3.6を外すのはわかりました

で試しにaaaという数値が1つだけ入ったACCDBファイルを作成し
以下のサンプルソースをまねして実行してみたのですがオープンで
失敗して先に進めないです
あまりに基本的なことで検索しても出てきません
環境はwindows10(64BIT)+ACCESS2019(64BIT)です
VB6.0でサービスパックやランタイムは入れたつもりです
よろしくお願いします

    
    Dim path As String
    Dim db   As DAO.Database
On Error GoTo proc_err
    '-----------------------------'
    'DBパス'
    path = "C:\aaa\aaa.accdb "

    'DBオープン'
    Set db = OpenDatabase(path)

    'DB接続成功'
    Debug.Print "DB接続成功"
    '-----------------------------'
    GoTo proc_end
proc_err:
    Debug.Print Error
proc_end:
    If Not db Is Nothing Then db.Close
    Set db = Nothing

- 関連一覧ツリー をクリックするとツリー全体を一括表示します)

古いスレッドにレスはつけられません。