vb中怎样实现sql语句连接两个数据库？？？（在线等待。。。。）

Question

两数据库db1,db2
sql语句：
select db1.dbo.a.number,db2.dbo.b.name from db1.dbo.a,db2.dbo.b如何用ADO在vb中实现两库连接？

Answer 1

这样不行的，设置两个con和两个rs分别连接db1,db2.

Answer 2

两库连接？
连接上服务器后，改变你的当前数据库明就可以呀
cn.execute "use db1"  -->连接db1库cn.execute "use db2"  ---〉连接db2库如果只是为了得到两库中的记录合集
那么这样就可以了
select A.number,B.name from db1.dbo.a as A,db2.dbo.b as B

Answer 3

select a.number,b.name from db1.dbo.a a,db2.dbo.b b

Answer 4

设置两个con和两个rs分别连接db1,db2

Answer 5

1:引用Microsoft Activex Data Objects 2.5 Library
2:
     Dim cn As New ADODB.Connection
     Dim rs as New ADODB.Recordset     cn.Open "Provider=SQLOLEDB;Data Source=servername;User Id=sa;PassWord=***;Initial Catalog=Master"
     cn.Execute "Use db1"
     rs.open "select A.number,B.name from db1.dbo.a as A,db2.dbo.b as B"

Answer 6

或者
1:引用Microsoft Activex Data Objects 2.5 Library
2:
     Dim cn As New ADODB.Connection
     Dim rs as New ADODB.Recordset     cn.Open "Provider=SQLOLEDB;Data Source=servername;User Id=sa;PassWord=***;Initial Catalog=db1"
     rs.open "select A.number,B.name from a as A,db2.dbo.b as B"

Answer 7

cn对象需要set语句来设置吗？
如：Set cn= New ADODB.Connection

Answer 8

Dim cn As New ADODB.Connection
等价于
Dim cn as Adodb.connection
set cn=new adodb.connection若是set cn=nothing 了，就要加set cn=new adodb.connection

Answer 9

select * from db1.table t1,db2..table t2
where
两个点表示跨库。查询分析器中能用的，vb中我没试过