Accessでデータベースオブジェクトを開くときにSet db = CurrentDbというのはよく見るのですが,現在開いていないデータベースを開く場合はどうすればよいのでしょうか?たとえば現在開いているデータベースがc:¥tmp¥sample01.mdbである場合に,c:¥sample02.mdbやc:¥tmp¥sample¥sample03.mdbなどを開く場合などです.ご教授お願いします.

回答の条件
  • URL必須
  • 1人2回まで
  • 登録:2003/06/04 18:12:23
  • 終了:--

回答(3件)

id:pahoo No.1

pahoo回答回数5960ベストアンサー獲得回数6332003/06/04 18:19:18

ポイント15pt

http://www2.moug.net/cgi-bin/technic.cgi?acvba+TI01010008

Excel VBA を学ぶなら moug モーグ

ADOを使うと次のようになります。

id:daemon

ADOは資料も結構あるのですけど,DAOを使いたいので...

2003/06/04 18:24:36
id:tatamix No.2

tatamix回答回数2ベストアンサー獲得回数02003/06/04 20:09:46

ポイント20pt

Excel VBAのサンプルですがDAOを使用したサンプルですので使えると思います。

http://www.int21.co.jp/pcdn/magazine/misc/daospeed.html

DAOの高速化を実現する43の技法

DAOを使用する際にとても参考になります。

蛇足ですが、どうぞご活用ください。

id:daemon

参考になりそうです.ありがとうございます.

2003/06/05 02:35:23
id:lenore No.3

lenore回答回数2ベストアンサー獲得回数02003/06/04 22:32:38

ポイント25pt

(以下はAccess2000のヘルプから)

カレント データベースと同時に別のデータベースを処理する必要がある場合は、Workspace オブジェクトの OpenDatabase メソッドを使います。OpenDatabase メソッドは、実際にはデータベースを開かずに、データベースを参照するオブジェクト変数だけを返します。次の例では、カレント データベースと Contacts.mdb という名前のデータベースを参照する変数が返されます。

Dim dbsCurrent As Database, dbsContacts As Database

Set dbsCurrent = CurrentDb

Set dbsContacts = DBEngine.Workspaces(0).OpenDatabase(”Contacts.mdb”)

id:daemon

ばっちりでした!

ありがとうございます.

2003/06/05 05:37:14

コメントはまだありません

この質問への反応(ブックマークコメント)

「あの人に答えてほしい」「この質問はあの人が答えられそう」というときに、回答リクエストを送ってみてましょう。

これ以上回答リクエストを送信することはできません。制限について

絞り込み :
はてなココの「ともだち」を表示します。
回答リクエストを送信したユーザーはいません