Daten auslesen aus Access klappt nicht! HILFE

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
MsgBox


Excel-Version: 9.0 (Office 2000)
nach unten

Betrifft: Daten auslesen aus Access klappt nicht! HILFE
von: Stefan
Geschrieben am: 21.05.2002 - 19:03:53

Folgenden Quelltext hab ich eingegeben


Sub ExcelTabellenErstellen()



Dim arrSI() As Variant

Dim CRSPVerbindung As New ADODB.Connection

Dim CRSPtabSI As New ADODB.Recordset


CRSPVerbindung.Provider = "Microsoft.Jet.OLEDB.4.0"

CRSPVerbindung.Open ("E:\CRSP\CRSP-MFDB-200112.MDB")

CRSPtabSI.Open "tabSI", CRSPVerbindung, adOpenDynamic, adLockOptimistic


arrSI = CRSPtabSI.GetRows(CRSPtabSI.RecordCount)

MsgBox ("SI enthält " & CRSPtabSI.RecordCount & " Einträge")

CRSPVerbindung.Close
Set CRSPVerbindung = Nothing

End Sub

Ich will aus der CRSP-Datenbank mit dem oben angegebenen Pfad aus einer in der Datenbank enthaltenen Tabelle mit dem Namen tabSI alle Werte in das array arrSI schreiben.
Wenn ich mir (als Test) dann die Anzahl der Einträge ansehen will, erhalte ich immer -1, d.h. offenbar hat das einlesen nicht geklappt. Kann mir jemand helfen - wo liegt der Fehler?

nach oben   nach unten

Re: Daten auslesen aus Access klappt nicht! HILFE
von: Michael Stefan
Geschrieben am: 22.05.2002 - 11:30:16

Hallo Stefan,

ich habe Dir funzenden Sourcecode gepostet.

Dein Connection-String sollte sinnvollerweise schon ein SQL-Kommand enthalten. Außerdem sagt die Hilfe zu .count, dass wenn dort -1 steht, das auch mit dem verwendeten Cursor zu tu haben kann.

Gruß

Micha


 nach oben

Beiträge aus den Excel-Beispielen zum Thema "Daten auslesen aus Access klappt nicht! HILFE"