Accessのリンクテーブルについて質問です。
この度、バックエンドとフロントエンドでのデータベースを作っています。
フロントエンドを会社のPC10台程度で利用しようと考えています。
ただ、作成するのが、自宅のPCと会社のPCで作っているのですが、
リンクテーブルのパスが変わってしまい、非常に困っています。
現在は自宅でデータ系を作成し、会社でフォーム等見た目に関するものを作っている次第です。
リンクテーブルを自動更新させる方法、または、ボタンで全てのリンクテーブルを更新させる方法はないでしょうか?
一つのテーブルをボタンで更新させる方法は、他サイトで見つけたのですが、複数テーブルを一挙に更新させる方法が見当たりません。
また、面倒な話なのですが、テーブル数は現在決まっておらず、今後増える予定です。(現在は7つ。)
出来れば参考サイトやソースコードを教えていただけると、非常に助かります。
何卒よろしくお願いいたします。m(_ _)m
No.2ベストアンサー
- 回答日時:
Access2003であれば、下記コードで
すべてのリンクテーブルのパスを変更
できるハズです。
Sub test()
On Error GoTo Err_test
Dim strFile As String
Dim intResult As Integer
Dim tb As DAO.TableDef
Const ENABLE_WIZHOOK = 51488399
Const DISABLE_WIZHOOK = 0
WizHook.Key = ENABLE_WIZHOOK
intResult = WizHook.GetFileName(0, "", "データベースを指定して下さい", "" _
, strFile, "", "mdbファイル (*.mdb)|*.mdb", 0, 0, 0, True)
WizHook.Key = DISABLE_WIZHOOK
If strFile = "" Then Exit Sub
For Each tb In CurrentDb.TableDefs
If tb.Connect <> "" And tb.Connect <> ";DATABASE=" & strFile Then
tb.Connect = ";DATABASE=" & strFile
tb.RefreshLink
End If
Next tb
MsgBox "リンク更新が正常に終了しました", vbInformation
Exit Sub
Err_test:
MsgBox Err.Description, 16
End Sub
非常にわかりやすいソースありがとうございます。
読解できました。
いじる所も全くないのでこのまま利用させていただきます。
本当にありがとうございました。m(_ _)m
No.1
- 回答日時:
こちらが最適かと。
http://www.nurs.or.jp/~ppoy/access/access/acM020 …
マイクロソフトにもありますが。
http://support.microsoft.com/kb/291264/ja
では。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
-
海外旅行から帰ってきたら、まず何を食べる?
帰国して1番食べたくなるもの、食べたくなるだろうなと思うもの、皆さんはありますか?
-
フォロワー20万人のアカウントであなたのあるあるを披露してみませんか?
あなたが普段思っている「これまだ誰も言ってなかったけど共感されるだろうな」というあるあるを教えてください
-
映画のエンドロール観る派?観ない派?
映画が終わった後、すぐに席を立って帰る方もちらほら見かけます。皆さんはエンドロールの最後まで観ていきますか?
-
海外旅行から帰ってきたら、まず何を食べる?
帰国して1番食べたくなるもの、食べたくなるだろうなと思うもの、皆さんはありますか?
-
天使と悪魔選手権
悪魔がこんなささやきをしていたら、天使のあなたはなんと言って止めますか?
-
Accessのリンクテーブルのパスを相対パスにする方法について教えて頂きたいです
Access(アクセス)
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・街中で見かけて「グッときた人」の思い出
- ・「一気に最後まで読んだ」本、教えて下さい!
- ・幼稚園時代「何組」でしたか?
- ・激凹みから立ち直る方法
- ・1つだけ過去を変えられるとしたら?
- ・【あるあるbot連動企画】あるあるbotに投稿したけど採用されなかったあるある募集
- ・【あるあるbot連動企画】フォロワー20万人のアカウントであなたのあるあるを披露してみませんか?
- ・映画のエンドロール観る派?観ない派?
- ・海外旅行から帰ってきたら、まず何を食べる?
- ・誕生日にもらった意外なもの
- ・天使と悪魔選手権
- ・ちょっと先の未来クイズ第2問
- ・【大喜利】【投稿~9/7】 ロボットの住む世界で流行ってる罰ゲームとは?
- ・推しミネラルウォーターはありますか?
- ・都道府県穴埋めゲーム
- ・この人頭いいなと思ったエピソード
- ・準・究極の選択
- ・ゆるやかでぃべーと タイムマシンを破壊すべきか。
- ・歩いた自慢大会
- ・許せない心理テスト
- ・字面がカッコいい英単語
- ・これ何て呼びますか Part2
- ・人生で一番思い出に残ってる靴
- ・ゆるやかでぃべーと すべての高校生はアルバイトをするべきだ。
- ・初めて自分の家と他人の家が違う、と意識した時
- ・単二電池
- ・チョコミントアイス
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Accessで別mdbのテーブルをコピー
-
手動または分散トランザクショ...
-
HTMLのテーブルの行数が多くな...
-
VB.NETでのAccessテーブルリンク
-
『列名 '担当者CD' があいま...
-
ACCESS2010 実行時エラー 2766
-
ExcelVBAからAccessMDB内のテー...
-
[C#] DataGridViewでコンボボッ...
-
★クリスタルレポートの元になる...
-
他のMDBのテーブルに追加したい
-
エクセルのテーブルを解除する...
-
AccessからExcelへエクスポート...
-
Access2007でアプリケーション...
-
MDBテーブルへの追加変更を教え...
-
ACCESSで項目の一部を取り出し...
-
SQL文で在庫推移を得る。
-
【ADO】「Execute」を使うと...
-
asp.net mvcを利用する場合の複...
-
ヘルプのSQLが動きません
-
SQLを発行とは?クエリの作成と...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
『列名 '担当者CD' があいま...
-
SQLを発行とは?クエリの作成と...
-
VBとアクセスでSQL文に変...
-
Accessで別mdbのテーブルをコピー
-
手動または分散トランザクショ...
-
エクセルのテーブルを解除する...
-
CSVファイルのエクスポートでソ...
-
AccessからExcelへエクスポート...
-
HTMLのテーブルの行数が多くな...
-
ACCESS2010 実行時エラー 2766
-
ExcelVBAからAccessMDB内のテー...
-
Excel複数シートをaccessへ一括...
-
DataGridViewに複数テーブルの...
-
他のMDBのテーブルに追加したい
-
ワークテーブルの作成について
-
★クリスタルレポートの元になる...
-
COBOLのINVALID KEYが理解でき...
-
VBでコンボボックスとテキスト...
-
VB.NETでのAccessテーブルリンク
-
Accessのフォームでリス...
おすすめ情報