Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Combo Box Auswahl
Autor: locust
Datum: 15.07.02 09:01
Ich habe folgendes Problem: Ich lese in eine Combobox die Namen von Mitarbeitern aus einer Access Datenbank ein. Jetzt soll noch zusätzlich die MitarbeiterId aus der gleichen Tabelle eingelesen werden, und in ein Textfeld übertragen werden, so das jedesmal wenn ich in der Combobox einen anderen Namen anwähle, die passende Id in der Textbox steht. Mein Code sieht bisher so aus : Public Sub MAAuslesen(frm As Form, sql As String) ' 'läd alle datensätze in recordset On Error Resume Next Dim cmd1 As New Command Dim rs As New Recordset Dim merker As Variant cmd1.CommandText = sql Set cmd1.ActiveConnection = ModAlle.VerbindungPersonal Set rs = cmd1.Execute(, , adCmdText) rs.MoveFirst frm.cmbMitArb.Text = rs("name") frm.txtId.Text = rs("PersonalID") Do Until rs.EOF = True frm.cmbMitArb.AddItem rs("Name") frm.txtId.Text = rs("PersonalID") rs.MoveNext Loop rs.Close Set rs = Nothing End Sub und der SQL-Text so : sql = "SELECT name,PersonalID from Personal order by name"

Combo Box Auswahl	47	locust	15.07.02 09:01
Re: Combo Box Auswahl	178	Dieter	15.07.02 09:13
Re: Combo Box Auswahl	30	locust	15.07.02 09:21

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