| 
    
     |  | ▼AccessVBA初心者 さん: こんにちは。
 
 ご提示された内容ですと、
 どの辺が行き詰っているのかが解りづらいですね。
 
 
 > 共有ドライブへのデータ接続方法(題名)
 共有ドライブでなかったら接続できますか?
 
 > セキュリティーの関係上パスワードがついております。
 パスワードが付いてなかったら接続できますか?
 
 > クラスモジュールで下記のような書き方だとエラーになります。
 クラスモジュールを使わなければエラーが出ないのですか?
 
 
 > ◇Rドライブ:共有用◇   ←   ◇Gドライブ:個人用◇
 > ABC.mdb             DEF.mdb
 > Const myPath As String = "D:\6108"
 > DBQ=" & Application.CurrentProject.Path & "\database.mdb;"
 
 提示されている情報がバラバラですよね。
 
 そのままご提示されている内容から判断すると、
 ただ単に データMDBのパス名、ファイル名が違う為
 ファイルが存在しないエラーが発生しているだけに思えてしまいます。
 
 
 パスワード付きMDBへADO接続をしたい、という事であれば
 ConnectionString に "PWD=xxxx;" を追加してみて下さい。
 
 
 |  |