要在ASP中查询两个数据库，可以使用ADO连接串来连接不同的数据库，并执行相关的SQL查询语句。
以下是一个简单的示例代码，演示如何在ASP中查询两个数据库：
<%
' 连接第一个数据库
Dim conn1
Set conn1 = Server.CreateObject("ADODB.Connection")
conn1.Open "Provider=SQLOLEDB;Data Source=server1;Initial Catalog=database1;User ID=username1;Password=password1;"
' 查询第一个数据库
Dim rs1
Set rs1 = conn1.Execute("SELECT * FROM table1")
' 输出查询结果
Do While Not rs1.EOF
Response.Write rs1("column1") & "<br>"
rs1.MoveNext
Loop
' 关闭第一个连接
rs1.Close
conn1.Close
' 连接第二个数据库
Dim conn2
Set conn2 = Server.CreateObject("ADODB.Connection")
conn2.Open "Provider=SQLOLEDB;Data Source=server2;Initial Catalog=database2;User ID=username2;Password=password2;"
' 查询第二个数据库
Dim rs2
Set rs2 = conn2.Execute("SELECT * FROM table2")
' 输出查询结果
Do While Not rs2.EOF
Response.Write rs2("column1") & "<br>"
rs2.MoveNext
Loop
' 关闭第二个连接
rs2.Close
conn2.Close
%>在上面的代码中，分别连接了两个数据库，并执行了查询语句。你可以根据实际情况修改连接串和SQL查询语句，以适应你的需求。
在ASP中查询两个数据库的数据，可以通过ADO（ActiveX Data Objects）来实现。首先需要连接两个数据库，在执行SQL语句时分别指定连接到不同的数据库。以下是一个示例代码：
<%
Dim conn1, conn2, rs1, rs2
'连接数据库1
Set conn1 = Server.CreateObject("ADODB.Connection")
conn1.Open "Provider=SQLOLEDB;Data Source=DatabaseServer1;Initial Catalog=DatabaseName1;User ID=Username;Password=Password"
'连接数据库2
Set conn2 = Server.CreateObject("ADODB.Connection")
conn2.Open "Provider=SQLOLEDB;Data Source=DatabaseServer2;Initial Catalog=DatabaseName2;User ID=Username;Password=Password"
'执行查询并输出结果
Set rs1 = conn1.Execute("SELECT * FROM Table1")
While Not rs1.EOF
Response.Write rs1("Column1") & "<br>"
rs1.MoveNext
Wend
Set rs2 = conn2.Execute("SELECT * FROM Table2")
While Not rs2.EOF
Response.Write rs2("Column2") & "<br>"
rs2.MoveNext
Wend
'关闭连接
rs1.Close
Set rs1 = Nothing
rs2.Close
Set rs2 = Nothing
conn1.Close
Set conn1 = Nothing
conn2.Close
Set conn2 = Nothing
%>在上面的代码中，分别创建了两个连接对象 conn1 和 conn2，并分别连接到不同的数据库。然后通过 Execute() 方法执行SQL查询语句，并通过 Response.Write 输出结果。
需要注意的是，在执行完查询后需要关闭结果集和连接对象，以释放资源。另外，示例中使用的是SQL Server数据库作为示例，对于其他类型的数据库需要根据实际情况修改连接字符串。
发布者：luotuoemo，转转请注明出处：https://www.jintuiyun.com/151261.html
