スキルアップ・問題解決なら、モーグにおまかせ！

他のデータベース内のテーブルにリンクしたテーブルを作成します。

●準備●
ここでは他のデータベース「出席者名簿1.mdb」内のテーブル「量子力学」を自データベース「NorthWind.mdb」にリンクさせます。

テーブル「量子力学」
　学生番号　　　出席者名
　　0002　　　　田中 和明
　　0003　　　　平野 彩子
　　0004　　　　葛城 孝史
　　0006　　　　新田 哲也
　　0007　　　　山本 雅治
　　0008　　　　内野 義昭
　　0010　　　　稲垣 友子

●サンプルプログラム●
Private Sub Dao_Link1()
  'リンクの作成
  Dim DB As Database
  Dim tbl As TableDef
  
  Set DB = OpenDatabase("D:\NorthWind.mdb")
  'リンクテーブル「量子力学出席者」を作成
  Set tbl = DB.CreateTableDef("量子力学出席者")
  'リンク元の設定
  tbl.Connect = ";DATABASE=D:\出席者名簿1.mdb"
  tbl.SourceTableName = "量子力学" 'リンク元テーブル名
  DB.TableDefs.Append tbl

  DB.Close

  Set DB = Nothing
  Set tbl = Nothing
    
End Sub

NorthWind.mdb」内にリンクテーブル「量子力学出席者」が作成されていることを確認してください。