Question

最近，一些已经稳定工作了几个月的代码现在已经停止工作了。我们推出的任何产品都没有升级（Windows或其他）。

下面的代码将数据推送到SQL Server 2008数据库中：

Dim db As New ADODB.Connection
''#Other data manipulation not shown
With db
    ''#On Error Resume Next  ''# With or without this line I still get no indication of the error
    .ConnectionString = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security       Info=True;Data Source=myDB;" & _
            "Use Procedure for Prepare=1;Auto Translate=True; Packet Size=4096; Use Encryption for Data=True;" & _
            "Tag with column collation when possible=false;Initial Catalog=SFM_market"
    .Open
    .Execute query
    .Close
End With

db State字段读为0.我的理解是它在成功连接后应该读为1。

我最近还重新考虑使用ADODB.Command和ADODB.Connection，但最终结果是一样的。状态字段保持为0.我没有错误，数据根本没有进入数据库，因为没有连接。

关于为什么会出现这种情况的任何想法？

Answer 1

我能提出的最佳建议是检查你的连接字符串。你有很多选择，如果其中任何一个错误，连接将失败。尝试将其削减到最低要求的信息，以完成连接并从那里建立起来。

Answer 2

为了完整起见，答案是简单的重启。我连接的方式没有错。

无法通过Excel VB7连接到SQL Server 2008

2 个答案: