Kod:
<%
Function ConnectDB(DBPath)
Set ConnectDB = Server.CreateObject("ADODB.Connection" )
ConnectStr = "Provider='Microsoft.Jet.OLEDB.4.0';" _
& "Data Source='" & Server.MapPath(DBPath) & "';"
ConnectDB.Open ConnectStr
End Function
%>
Kod:
<%
Set oConNew = ConnectDB("/db/NewDB.mdb" )
Set oConLink = ConnectDB("/db/LinkDB.mdb" )
%>Çoklu DB bağlantını bu şekilde yapabilirsin, işine yarar umarım...