關(guān)于VBA連接SQL2008的代碼？

snddzxb

那位高手能不能寫一個關(guān)于VBA同時連接兩個以上的SQL的代碼，謝謝！

smileyoufu

這個需要高手么？？？
我這個菜鳥來回答就行了。

使用ADO讀寫數(shù)據(jù)，然后你直接創(chuàng)建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就可以用來打開需要的內(nèi)容了，比如
rst.Open strSQL, cnA, adLockOptimistic, adLockOptimistic
當然，變量什么的，就自己聲明搞定了

不曉得我這菜鳥說對沒，不曉得你理解沒

好運牛

這個語句連接SQL2000可以嗎？不行應(yīng)該怎么寫？謝謝

sql999

smileyoufu 的方法應(yīng)該可以，還有一種方法就是通過建立鏈接服務(wù)器來實現(xiàn)多SQL SERVER的訪問和操作

smileyoufu

好運牛 發(fā)表于 2013-11-8 19:07
這個語句連接SQL2000可以嗎？不行應(yīng)該怎么寫？謝謝

可以，通吃

好運牛

謝謝。拜讀了