<em>vba</em> 连接<em>sqlserver</em>出现错

如果使用ODBC连接不百正确,可以尝试改用ADODB连接试试.因为ODBC连接,有时候设置度不匹配或者连接串配置不正确,容易让不熟回练的产生错误.ADODB连接串相对简单一些.
下面给你一个参巧的连接串文答本

声明自己再弄一下好吧:
"Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=student;Data Source=PC2011052917FKB\SQLEXPRESS"

这个机器缺少sqlserver连接驱动
密码为知空就可以了，你可以试试这道两种，应该至少有内一种可以的：
"Driver={SQL Server};Server=192.168.0.50;Database=****;Uid=****;"

"Driver={SQL Server};Server=192.168.0.50;Database=****;Uid=****;password="""";" (VB中用""表示一个容双引号）

是不是引用的版来本不对， 引用 2.5 试试

或者再试试， 创建对象的方法：自
把百Dim cn As New ADODB.Connection 这句删了 换成
Set cn = CreateObject("adodb.connection") '创建度ado对象
====================================================================
'引用法问
'工具--引用---Microsoft Activex..D...O"
'引用后再声明答: Dim conn As New Connection 声明链接对象
' Dim rst As New Recordset 声明记录集对象
'创建法
'使用CreateObject函数创建
Set cn = CreateObject("adodb.connection") '创建ado对象
Set rst = CreateObject("ADODB.recordset") '创建记录集