EXCEL VBA 连接SQL SERVER错误问题
代码如下：
Dim cn As New ADODB.ConnectionDim strCn As StringDim strSQL As StringstrCn = "Provider=sqloledb;Server=localhost;Database=RK;Uid=sa;Pwd=;Integrated Security=true;"cn.Open strCncn.Close已经在工具-引用（R）中勾选了Microsoft ActiveX Data Objects 2.8 Library。
这是我在网上看到的代码和做法，都按部就班的做了，可现在还是报错，如图：
请高手们帮个忙，小弟感激不尽！
第1个回答 2013-11-02
Dim cn As ADODB.Connection
Set cn = New ADODB.Connection
Dim strCn As String
Dim strSQL As String
strCn = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;PWD=;Initial Catalog=rk;Data Source=localhos;"
cn.Open strCn
cn.Close
Set cn = New ADODB.Connection
Dim strCn As String
Dim strSQL As String
strCn = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;PWD=;Initial Catalog=rk;Data Source=localhos;"
cn.Open strCn
cn.Close
第2个回答 2013-10-24
cn.Open strCn 这句报错?追问
一运行就出错了，看不到错在哪一行啊
追答那你直接把程序发上来吧
相似回答
