Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

ComboBox füllen
Autor: dano
Datum: 19.11.04 17:56
Hallo Leute vielleicht könnt ihr mir bei einem Problem in Visual Basic 6 helfen. Ich habe eine Access Datenbank und möchte eine ComboBox (Eigenschaft "Style = 2 - Dropdown-Liste") mit dem Inhalt einer Tabellenspalte füllen. Meine Verbindung mit der Datenbank habe ich wie folgt aufgenommen: Dim sSQL As String Dim sDBFileName As String 'Variable für Pfad zur Datenbankdatei *.mdb sDBFileName = App.Path & "\Schleifen.mdb" sSQL = "Select Arbeiter from Arbeiter" Set connArbeiter = New ADODB.Connection Set recArbeiter = New ADODB.Recordset ' *** Connection öffnen With connArbeiter .Provider = "Microsoft.Jet.OLEDB.4.0" .Properties("Data Source").Value = sDBFileName .CursorLocation = adUseClient .Mode = adModeShareDenyNone .Open '.Properties("Data Source").Value = sDBFileName '.CursorLocation = adUseClient '.Mode = adModeShareDenyNone '.Open End With 'Überprüfung, ob eine Verbindung besteht If connArbeiter Is Nothing Then MsgBox "Keine Verbindung vorhanden" ' *** Recordset öffnen With recArbeiter Set .ActiveConnection = connArbeiter .Source = sSQL .CursorLocation = adUseClient .CursorType = adOpenStatic .LockType = adLockOptimistic .Open End With 'Überprüfung, ob ein Recordset besteht If recArbeiter Is Nothing Then MsgBox "Kein Recordset vorhanden" Bei diesem Teil des Programmcodes wird mir kein Fehler gemeldet. Der nächste Teil ist insoweit fehlerfrei, dass er nur funktioniert, wenn die erste Zeile mit eingefügt ist. Lässt man diese weg, kommt ein Fehler cmbArbeiter.DataMember = "connArbeiter" Set cmbArbeiter.DataSource = recArbeiter cmbArbeiter.DataField = "Arbeiter" Wenn ich mir jetzt die ComboBox anschaue, müssten doch eigentlich der Inhalt der Datenbank in der ComboBox stehen? Diese ist aber leer. Muss ich jetz den Inhalt erst via Array einfügen? Wäre super, wenn ihr mir helfen könnten. Vielen Dank schon mal im Voraus. Viele Grüße Daniel

ComboBox füllen	1.564	dano	19.11.04 17:56
Re: ComboBox füllen	1.006	Dieter	19.11.04 21:12
Re: ComboBox füllen	833	dano	20.11.04 16:25

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen