|
这个需要高手么???
我这个菜鸟来回答就行了。
使用ADO读写数据,然后你直接创建N个cn字符串就可以了。比如
Dim cnA As NEW ADODB.Connection
Dim cnB As NEW ADODB.Connection
Dim cnC As NEW ADODB.Connection
cnA.Open "Provider=SQLOLEDB;Data Source=192.168.1.102,1433;Database=DataA", "sa", "sa"
cnB.Open "Provider=SQLOLEDB;Data Source=192.168.1.102,1433;Database=DataB", "sa", "sa"
cnC.Open "Provider=SQLOLEDB;Data Source=192.168.1.105,1433;Database=DataC", "sa", "sa"
然后cnA,cnB,cnC就可以用来打开需要的内容了,比如
rst.Open strSQL, cnA, adLockOptimistic, adLockOptimistic
当然,变量什么的,就自己声明搞定了
不晓得我这菜鸟说对没,不晓得你理解没 |
|