如何实现本就连接数据库的跨库查询

Question

一下代码是在A库中查询出数据然后打印输出
rs.Source = "select bankaccdsc from clbl where bankacckey = '" & strAccount & "'"
rs.Open
Printer.Print Space(5) & "GCCD 006CBC62  " & strAccount & "  " & Trim(rs.Fields("bankaccdsc")) & Space(20 - LenX(Trim(rs.Fields("bankaccdsc")))) & Space(13 - LenX(strAmount)) & strAmount & Space(9) & strPolNum & Space(4) & strduedate
Casecount = Casecount + 1
Caseamount = Caseamount + Val(strAmount)
rs.Close但现在要求出来的数据先要和B库的某张表做比较，把B库表中已经存在的数据过滤掉再打印输出，这个如何实现？？A库是做了ODBC的，程序可以正常使用，B库连接可否不用ODBC。
B库名：fs001   ID SA 密码 123456 表 test
如果A的bankacckey字段在B的bank001这个字段中有的就不打印输出，谢谢。

Answer 1

用OPENROWDATASET函数，具体用法，网上找

Answer 2

1.B库和A库在同一服务器上!  select a.* from table a,B.dbo.test b where a.bankacckey <> B.bank001
  or
  select * from table  where bankacckey not in (selct bank001 as bankacckey from B.dbo.test)2.B库和A库在不同服务器上!  1)A服务器添加连接服务器,指向B服务器!
  2)A服务器中增加对B.dbo.test的视图,那就当本地表访问了!
    or
    完成第一步别的不管了!    select a.* from table a,BServerName.B.dbo.test...........