建立两个不用的连接对象conn1和conn2,分别用来连接数据库1和数据库2，我写的例子是ACCESS数据库，可以根据你的需要修改为SQL Server的。

set conn1=server.CreateObject("adodb.connection")
set conn2=server.CreateObject("adodb.connection")
conn1.open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("data1.mdb") '第一个数据库的连接conn1
conn2.open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("data2.mdb") '第而个数据库的连接conn2
'…………
set rs1=server.CreateObject("recordset")
set rs2=server.CreateObject("recordset")
sql1="select * from 表1"
sql2="select * from 表1"
rs1.open sql1,conn1,1,3‘打开conn1连接数据库文件data1.mdb中的表1
'…………
rs1.close

rs2.open sql2,conn2,1,3‘打开conn2连接数据库文件data2.mdb中的表1
'…………
rs2.close
'…………