Fehler 3709, wenn die Verbindung thru ADODB.Verbindung zum SQL Server 2008 in Excel

Ich versuche zu öffnen ein recordset in einer SQL-Server in Excel mit dem folgenden code, bekomme aber eine 3709 - The connection cannot be used to perform this operation. It is either closed or invalid in this context. Fehler. Wo mache ich falsch?:

EDIT:

Es funktioniert jetzt, ich werde aktualisieren Sie den code unten:

'Declare variables'
    Set objMyConn = New ADODB.Connection
    Set objMyRecordset = New ADODB.Recordset
    Dim strSQL As String

'Open Connection'
    objMyConn.ConnectionString = "Driver={SQL Server};Server=SERVER\SERVER; Database=we_ci_db; Trusted_Connection=Yes"
    objMyConn.Open

'Set and Excecute SQL Command'
    strSQL = "select * from tblUsers"

'Open Recordset'
    Set objMyRecordset.ActiveConnection = objMyConn
    objMyRecordset.Open strSQL

'Copy Data to Excel'
    ActiveSheet.Range("A1").CopyFromRecordset (objMyRecordset)
Der string an sich war nicht falsch, ich habe versucht, mehrere Kombinationen, die sind völlig Verschieden, aber alle arbeiten. Es war die rst.open Linie, dass ich nicht Recht. Ich brauchte, um die anderen Attribute, cnn, adOpenStatic, etc...

InformationsquelleAutor aSystemOverload | 2012-08-08

Schreibe einen Kommentar