Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Abfrageergebnis in Combo einfügen
Autor: redo
Datum: 12.10.02 17:19
Hallo zusammen, Ich arbeite mit einer Access Datenbank(97) von VB aus mit Hilfe von DAO. In der Datenbank gibt es eine Tabelle (tblKalibrierdaten) die zwei Felder enthält KdSensorkali und KdKalibrierung. Auf einem Form habe ich 2 ComboBoxen : Combo1 und Combo2. Combo1 enthält Zahlen wie 197,198... diese Zahlen gibt es in dem Feld KdSensorkali. Nun möchte ich daß wenn der Benutzer einen Eintrag d,h ein Zahl z,B 197 aus dem Combo1 auswählt, alle Datensätze in dem Feld KdKalibrierung ( wo KdSensorkali =197) ausgelesen werden und in Combo2 eingefügt werden. Ich bekomme aber mit dem folgenden Code die Felermeldung: Element in dieser Auflistung nicht gefunden. Public Sub FillCboKalicfg(cbo1 As ComboBox, cbo2 As ComboBox) Dim j As Integer Dim DB As Database Set DB = DBEngine.Workspaces(0).OpenDatabase("C:\My_Access\Konfiguration2.MDB") Dim SQL As String Dim RS As Recordset sens1 = cbo1.List(cbo1.ListIndex) SQL = "SELECT KdKalibrierung FROM tblKalibrierdaten WHERE KdSensorkali =" + CStr(sens1) Set RS = DB.OpenRecordset(SQL) For j = 1 To RS.RecordCount cbo2.AddItem RS(j) Next j RS.Close End Sub Vielen Dank im voraus

Abfrageergebnis in Combo einfügen	66	redo	12.10.02 17:19
Re: Abfrageergebnis in Combo einfügen	219	Dieter	12.10.02 17:24
Re: Abfrageergebnis in Combo einfügen	229	unbekannt	12.10.02 17:24
Vielen Dank Ihr guten(oT)	33	redo	12.10.02 21:02

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