ODBCのDSNを使わないでDBへのアクセス
Accessの場合
strProvider = "Driver={Microsoft Access Driver (*.mdb)}; DBQ=xxxxx"
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open strProvider
xxxxxはAccessのDBの物理パスを含むファイル名です。
SQL Serverの場合
strProvider = "Driver={SQL Server};UID=xxxxx;PWS=yyyyy;Server=(local);Database=zzzzz;"
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open strProvider
xxxxxは、ユーザーID名
yyyyyは、パスワード
zzzzzは、DB名