一样的连接语句，为什么一条能连上，另一条却不行？
都是放在同一个工程里，同一个窗体里面，却出现不同的情况。而且是早上还好好的，下午出现这种情况了，这是什么问题
这条能连上：
Set db = New ADODB.Connection
Set rs = New ADODB.Recordset
db.ConnectionString = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=weryuk;Data Source=" & "192.168.10.2"
db.Open

用下面的却连接不上：
private sub main_load()
  Dim IPstr As String, DSstr As String
  IPstr = "192.168.10.2"
  DSstr = "weryuk"
  Dim flag As Boolean
  flag = testconn(Trim(IPstr), Trim(DSstr))
  If Not flag Then
  MsgBox "数据库连接失败！", vbExclamation
  Exit Sub
  End If
end sub
Public Function testconn(IPstr As String, datastr As String) As Boolean
  connstr = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=" & datastr & ";Data Source=" & IPstr '全局变量connstr 、conn
  Set conn = New ADODB.Connection
On Error GoTo err:  
  conn.ConnectionTimeout = 1
  conn.CommandTimeout = 0
  conn.Open connstr  
  If conn.State = adStateOpen Then
  testconn = True
  Exit Function
  End If
err:
  testconn = False
End Function

------解决方案--------------------
如果早上可以下午却不可以，那可能你有服务关闭了或者改动了，又或者是用于启动的服务账号刚好下午密码过期了，启动不了，你多从这方面去检查一下。
------解决方案--------------------

探讨

你上面的是C#、下面的是VB是吧？我觉得前提是你没动过任何东西，而以前都能用的话，就检查一下VB和C#的连接功能是否有什么比较隐蔽的机关，我很久没弄过编程语言了。帮不上忙。但是连接数据库一般都是服务、密码的问题。

------解决方案--------------------
你的连接字符串中Integrated Security没有设置，默认值是false，也就是你必需提供
你的账号和密码，把你的密码写入到你的连接字符串就可以了