无法打开ADODB连接

我试图打开具有以下功能的连接：无法打开ADODB连接

Public cn1 As New ADODB.Connection 
    'Sub to open connection to database 
    Public Function OpenConnection(ByVal strOpenConnectionString As String, _ 
            Optional ByVal lngOpenConnectionTimeout As Long = 3600) As Long 
     With cn1 
      .CursorLocation = ADODB.CursorLocationEnum.adUseClient 
      .Mode = ADODB.ConnectModeEnum.adModeUnknown 
      .ConnectionTimeout = lngOpenConnectionTimeout 
      .CommandTimeout = lngOpenConnectionTimeout 
      .ConnectionString = strOpenConnectionString 
     End With 
     Try 
      cn1.Open() 
     Catch ex As Exception 
      MsgBox(ex.ToString()) 
     End Try 

     OpenConnection = cn1.State 
    End Function

我使用Windows身份验证我的连接，我的连接字符串是：

"Integrated Security=SSPI;Initial Catalog=Test;Data Source=PEDRAM-PC\PEDRAM"

我可以很容易地连接，当我使用一个SQL连接，但我需要与该ado数据库对象，因为它是我的公司代码。我得到以下异常： enter image description here

谁能告诉我，我做错了什么？

来源

2012-10-22 Disasterkid

我假设你有ommited用户ID和密码故意？ http://www.connectionstrings.com/是一个很好的网站，可能有用。 – Fredrik

没有用户名和密码是必需的我猜，因为我使用Windows身份验证，而不是SQL身份验证。 – Disasterkid

您需要为ADODB使用不同的连接字符串。试试这个

Provider=SQLOLEDB;Initial Catalog=Test;Data Source=PEDRAM-PC\PEDRAM;Trusted_connection=yes;

来源

2012-10-22 14:23:19 PatFromCanada

没有运气。我仍然得到同样的例外。 – Disasterkid

我认为你是对的。再次检查。我的错。 – Disasterkid

无法打开ADODB连接

回答

相关问题