Home > 即効テクニック > AccessVBA > データベース・データ保護 > 起動パス名とデータベース名を取得する

即効テクニック

データベース・データ保護

起動パス名とデータベース名を取得する

(Access)
ネットワーク上でデータベースを複数のクライアントで使用する場合など、更新したいデータベースかどうかを確認する方法として、起動パス名とデータベース名を取得してフォームに表示することも有効です。
サンプルでは、フォームにラベル「ラベル0」を配置し、フォームを開く際に発生するイベント「開く時」にイベントプロシージャを作成して、ラベルの表題にパス名を設定しています。
●サンプル●
Private Sub Form_Open(Cancel As Integer)
    
    ラベル0.Caption = CurrentDb.Name
    
End Sub
フォームをフォームビューで表示すると、ラベルに「C:\My Documents\db1.mdb」のようにパス名が表示されます。