0

次の関数で接続を開こうとしています。

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接続を使用すると簡単に接続できますが、会社のコードであるため、そのadodbオブジェクトを使用して接続する必要があります。次の例外が発生します。 ここに画像の説明を入力してください

誰かが私が間違っていることを教えてもらえますか？

4

1 に答える 1

2

ADODBには別の接続文字列を使用する必要があります。これを試して

Provider=SQLOLEDB;Initial Catalog=Test;Data Source=PEDRAM-PC\PEDRAM;Trusted_connection=yes;
于 2012-10-22T14:23:19.597 に答える