ADOでカレントデータベースのコネクションを取得
Dim conn As ADODB.Connection Set conn = CurrentProject.Connection MsgBox conn.ConnectionString conn.Close: Set conn = Nothing
ADOでカレントデータベースのコネクションを取得
Dim conn As ADODB.Connection Set conn = CurrentProject.Connection MsgBox conn.ConnectionString conn.Close: Set conn = Nothing