对象_connection的方法打开失败
我正试图连接到Excel中的SQL数据库。 它不断给我:
Method Open of object _connection failed
错误消息,每当它到达Conn.Open
。
我以前从未使用过ADO,所以我不确定发生了什么问题。
以下是我的连接脚本。
Sub SQLCeConnect() Dim Conn As New ADODB.Connection Dim Query As New ADODB.Command Dim ConnStr As String Dim RecordSet As New ADODB.RecordSet Dim i As Integer 'the connection string ConnStr = "Provider=Microsoft.SQLSERVER.CE.OLEDB.3.5;Data Source=X:\ADOTEST\MYDB.sdf;" 'Open ADO Connection Conn.ConnectionString = ConnStr Conn.Open Query.ActiveConnection = Conn Query.CommandText = "SELECT * From DoorLayers" Set RecordSet = Query.Execute RecordSet.Close Conn.Close Conn.ConnectionString = "" Do While Not RecordSet.EOF For i = 0 To RecordSet.Fields.Count - 1 Debug.Print RecordSet.Fields(i).Name, RecordSet.Fields(i).Value Next RecordSet.MoveNext Loop RecordSet.Close End Sub
通常是一个糟糕的连接string,但你看起来不错。 下一个最常见的原因是您的桌面上没有OLEDB提供程序驱动程序。 你可以在这里下载
http://www.microsoft.com/en-us/download/details.aspx?id=5821
您是否在使用WHILE之前closures连接? 使用while指令后,必须closures它。
- ADODB.Connection与Excel访问数据库性能改进
- Excel VBA ADODB访问2003年和2013年
- Excel VBA的ADODBlogging集 – 我可以设置字段数据types(ID和数字,名称为字符,生日为date)?
- 支持> 65k行的Excel VBA SQL驱动程序
- 导入excel文件返回null为现有的数据
- Microsoft.ACE.OLEDB.12.0当前logging集不支持尝试更新访问时收到的更新错误
- VBA – Excelmacros创buildAccess数据库并更新字段属性(date/时间格式)
- Excel VBA,ADO连接,返回date如果存在,或者上一个可用date
- Excel VBA – 如何强制closures一个ADO连接?