我有个软件用到sql数据库。多数机都正常,最近出现一二台机连不上,但是它的网络也是通的。提示连接数据库失败。
下面最简单的代码,调试正常,放到那台机也连接不上
Private rsS As ADODB.Recordset '公用变量
Private conS As ADODB.Connection '公用变量
Dim conStrSPrivate Sub Command1_Click()
Set conS = New ADODB.Connection
    conStrS = "Provider=SQLOLEDB.1;Password=*;Persist Security Info=True;User ID=***;Initial Catalog=***;Data Source=ip***"
conS.Open conStrS
MsgBox conS.State
conS.Close
set conS=Nothing
End Sub
不知是什么原因

解决方案 »

  1.   

    客户端远程地方,现在不在这,也试不了,估计不是这问题。因为所有客户端系统一样,系统都是硬盘ghost过来的。昨天还远程调试一下,原来用ado2.5,后来我改成ado2.8,并注册了msado15.dll也不行。不知Provider=SQLOLEDB,改这个不知道有没有效果
      

  2.   

    http://blog.csdn.net/fredrickhu/archive/2009/10/13/4662775.aspx参考
      

  3.   

    http://blog.csdn.net/fredrickhu/archive/2009/09/20/4573228.aspx
      

  4.   

    现在同一公司的有二台机出现这问题。另一台出错信息忘了,下次开其他贴再问,那台一运行软件就出错,不知用dim,还是set时已经出错了。这次出错信息是。dbnetlib connectionopen .... sql server不存在或拒绝访问。但sqlserver是正常的
      

  5.   

    注,我那网络版,同一个软件,还有个数据库连接操作地地数据库是用coC,rsC,他连接本地MS Access,这个操作正常。就是ConC的连接不成功Sql
      

  6.   

    注,我那网络版,同一个软件,还有个数据库连接操作本地数据库是用coC,rsC,他连接本地MS Access,这个操作正常。就是ConS的连接不成功Sql
      

  7.   

    本地sql数据库,排除系统及软件问题。ping服务器ip也通。现在考虑是否他们公司网络限制了1433端口。就这问题还不知道怎么判断。
      

  8.   

    打错了,本地没安装sql数据库
      

  9.   

    有没有装SQL里的MSDE。在控制面板里的管理工具里面有没有拼通ODBC数据源。
      

  10.   

    在客户端做ODBC连接到服务端的SQL试试