Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Recordset bzw. Intelligente Suchabfrage
Autor: Brogi
Datum: 06.03.02 08:44
Hallo Leute, ich habe in einem Programm eine Suchabfrgae integriert. Als Grundlage habe ich die "Intelligente Suchabfrage" unter den Tipps und Tricks genommen. Quellcode: ... ElseIf text_aendern_name.Text <> "" Then Dim SQL As String sname = text_aendern_name.Text SQL = "SELECT kundendaten.kd_nr, kundendaten.name, kundendaten.telefonnr FROM kundendaten WHERE kundendaten.name like '" + sname + "*'" Set Tabelle_kunden = Db.OpenRecordset(SQL) Set Tabelle_anmeldung = Db.OpenRecordset("sms_anmeldung") If Tabelle_kunden.RecordCount > 1 Then While Not Tabelle_kunden.EOF Form_auswahl.Visible = True Form_auswahl.SetFocus Form_auswahl.list_kundenauswahl.AddItem Tabelle_kunden(0) Form_auswahl.kundenauswahl.AddItem Tabelle_kunden(1) Tabelle_kunden.MoveNext Wend ElseIf Tabelle_kunden.RecordCount = 1 Then ... Else .... End if Nun zu meinen Problem: Die Methode Recordcount ergibt bei mir immer das Ergebnis 1. Obwohl sich im Recordset mehrere Informationen befinden. Ich hoffe ihr könnt mir sagen was ich Falsch mache. Brogi

Recordset bzw. Intelligente Suchabfrage	43	Brogi	06.03.02 08:44
Re: Recordset bzw. Intelligente Suchabfrage	200	Dieter	06.03.02 10:14
Re: Recordset bzw. Intelligente Suchabfrage	22	Brogi	06.03.02 15:18

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