VisualBasic2008とMS-Access

質問

はじめまして。ご存じの方いらしたらご教授下さい。

VisualBasic2008 ExpressEditionからAccess2000(mdb)を起動する方法が分かりません。

Excelの場合は、
Dim obj as object
obj = CreateObject("Excel.Application")
Shell(obj.path & "\excel.exe " & "hoge.xls", 1)

で起動できましたが、Accessを起動しようと同様に
Dim obj as object
obj = CreateObject("Access.Application.9")
Shell(obj.path & "\msaccess.exe " & "hoge.mdb", 1)

としたところ「公開メンバ 'path' は型 'Application' に見つかりませんでした。」
とShell命令で中断します。

宜しくお願い致します。

回答No.3

imogasi

Ｇｏｏｇｌｅででも「vb2008 access 接続」で照会すると、出てくる記事で判ります。
http://blog.livedoor.jp/akf0/archives/51192655.html
に載っているコードで、ＶＢ2010Ｅｘｐｒｅｓｓでやってみました。（2008でも同じと思う）
コンソールアプリケーションでおこなう。
Dim FilePath As String = "C:\Documents and Settings\ＸＸＸＸ\My Documents\社員2.mdb"
のようにファイルを指定する。
Debug.WriteLine(reader(3))の０や３はフィールドの指定番号であること。

回答No.2

samtomsan

下記にサンプルプログラムがあります。参考になると思います。

http://support.microsoft.com/kb/317113/ja

回答No.1

piroin654

Dim obj as object
obj = CreateObject("Access.Application")
obj.OpenCurrentDatabase(filepath:="C:\Program Files\hoge.mdb")
obj.Visible = True

では？