Question

我试图简单地连接到我的本地SQL Server 2014，但我不断收到运行时错误91

对象变量或未设置块变量

我已经添加了参考ActiveX数据对象库2.8，并且根据https://msdn.microsoft.com/en-us/library/ms131321.aspx，SQL Server Native客户端安装时默认使用SQL Server。

可能是什么问题？

编辑：多么愚蠢，错误来自忘记初始化类对象。

代码

Private Sub ConnectSQL()

    Dim ADODBConnection As ADODB.Connection
    Dim ADORecordset As ADODB.Recordset

    ADODBConnection.ConnectionString = "Provider=SQLNCLI11;" _
         & "Server=(local);" _
         & "Database=Sample1;" _
         & "Integrated Security=SSPI;" _
         & "DataTypeCompatibility=80;"

    ADODBConnection.Open

End Sub

Answer 1

添加＆＃39; new＆＃39;关键字如下：并尝试

 Dim ADODBConnection As new ADODB.Connection 
 Dim ADORecordset As new ADODB.Recordset

尝试连接到本地SQLServer，运行时错误91

1 个答案: