【初月無料キャンペーン中】gooドクター

Accessでフォームにボタンを作り、別のmdbファイルのフォームを開く処理を書いてあります。

コードは次のような感じです。

Dim acMDB As Object
Dim isOK
isOK = Shell("MSACCESS.exe \\コンピュータ名\フォルダ名\ファイル名.mdb",vbMaximizedFocus)
set acMDB = GetObject("\\コンピュータ名\フォルダ名\ファイル名.mdb")

この度ファイルを他の人へ配布することになったのですが、パス名を相対パスで書くことは出来ないのでしょうか?
他の人のコンピュータ名も分からない為、
出来たら元ファイルと同じフォルダにある…というような指定が出来れば助かるのですが…。

gooドクター

A 回答 (1件)

Currentproject.Path


で、現在の MDB のフォルダが取得できます。
    • good
    • 0
この回答へのお礼

ありがとうございました。
なんとかうまくいきました。

お礼日時:2010/03/09 20:06

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!


人気Q&Aランキング