タイトル : 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 |