Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: Listbox mit Daten füllen
Autor: Prian0815
Datum: 18.03.04 12:46
dim Hersteller as string dim db as database dim rs as recordset dim sql as string dim pathdb as string pRIVATE SUB COMBO1_DBLCLICK() Hersteller = combo1.value pathdb = Pfad derDatenbank, z.B: "C:/Datern/mydb.mdb" Set db = OpenDatabase(pathdb) sql = "select * from Tabelle where (((tabelle.Hersteller) = " & Hersteller & "));" set rs = db.openrecordset(sql) rs.movefirst do while rs.eof = false list1.additem rs!Modell rs.movenext loop Bei dem List1.additem bin ich mir unsicher was die Syntax anbetrifft, aber das müßtest du hinkriegen denke ich. Wenn nun jemand in List1 ein Modell auswählt, kriegst du auf die selbe Art und Weise die bzw. den passenden Datensatz raus, und kannst mit den Werten deine Textfelder bestücken. Ich hoffe das hilft dir jetzt weiter. Gruß Armin P.S.: always look on the bright side of Life!

Listbox mit Daten füllen	1.373	firemike	18.03.04 11:01
Re: Listbox mit Daten füllen	800	Prian0815	18.03.04 12:46
Re: Listbox mit Daten füllen	848	firemike	18.03.04 13:20
Re: Listbox mit Daten füllen	771	Prian0815	18.03.04 13:45
Re: Listbox mit Daten füllen	699	firemike	18.03.04 13:54
Re: Listbox mit Daten füllen	666	Prian0815	18.03.04 14:41
Re: Listbox mit Daten füllen	619	firemike	18.03.04 15:08
Re: Listbox mit Daten füllen	737	firemike	18.03.04 15:43

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