ADOでカレントデータベース以外に接続する方法
例ではOracleに接続
Dim conn As ADODB.Connection
Set conn = New ADODB.Connection
conn.ConnectionString = "Provider=MSDAORA;" & _
"DATA SOURCE=xxxx;" & _
"USER_ID=xxxx;" & _
"PASSWORD=xxxx;"
conn.Open
MsgBox conn.ConnectionString
conn.Close: Set conn = Nothing