Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Suchroutine erstellen
Autor: mille20
Datum: 30.01.03 17:02
Hallo, ich will folgendes erreichen. Ich will von einem Formular in VB eine Tabelle in einer Access Datenbank durchsuchen und will mir dann folgendes anzeigen lassen: 1.Bei exakt einem treffer soll er gesuchte Name in einer picture box (als test für mich) angzeigt werden. 2.Bei mehreren Treffern (d.h. in der Tab. sind z.B. mehrere Müller) sollen alle Treffer angezeigt werden. 3.Bei keinem Treffer soll eine Meldung "keinen Datensatz gefunden" angezeigt werden. Mit unten aufgeführtem Quelltext habe ich Punkt 1 und 3 erreicht !! Aber wie löse ich das Problem mit mehreren Treffern ? Die Tabelle in der Datenbank heißt "Adressen". Der Spaltenname der Tabelle ist "Namen".Der gesuchte Name wird in VB über eine TextBox "Suchnamen" eingegeben und das Ergebnis auf der picture Box "Ausgabe_Suchnamen" angezeigt werden. So das wäre es auch schon. Ich hoffe mir kann jemand weiterhelfen.   Dim Person As New ADODB.Recordset With Person .ActiveConnection = DB .Source = "Adressen" .CursorType = adOpenKeyset .LockType = adLockOptimistic .Open Options:=adCmdTable End With 'Suchen mit der Find Methode Person.MoveFirst Person.Find "Namen= '" & Suchnamen & "'" If Not Person.EOF Then Ausgabe_Suchnamen.Print Person!Namen Person.MoveNext Else Ausgabe_Suchnamen.Print "Nicht gefunden!" End If Person.Close

Suchroutine erstellen	586	mille20	30.01.03 17:02
Re: Suchroutine erstellen	315	Dieter	30.01.03 17:13
Re: Suchroutine erstellen	322	mille20	30.01.03 17:23
Re: Suchroutine erstellen	305	Dieter	30.01.03 17:27
Re: Suchroutine erstellen	298	mille20	30.01.03 17:33

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