Also jetzt habe ich da mal was Programmiert, was nicht läuft.
Dim rs
Dim Angabe(2) as string
Angabe(0) = „7“ 'Gibt den zu suchenden Datensatz an
'Kunden_Nummer ist der Primärschlüssel, nach dem soll gesucht werden,
'nur, wo liegt der Fehler?
'Es wird nämlich immer nur der erste Datensatz gefunden, nicht aber der siebte.
Set rs = CurrentDb.OpenRecordset("SELECT Kunden_Nummer, Firma, Name, Strasse, Nummer, Postfach, PLZ, Ort, Land, Tel, Fax, EMail, Webseite, TelII, FaxII, EMailII, Rabatt " & „FROM Auftrag_Kunden ORDER BY Kunden_Nummer“) 'Öffnet die angegebene Datenbank
With rs
.FindFirst („Kunden_Nummer = '“ & Angabe(0) & „’“)
Form_Auftrag_Kunden_Registrierung.tboxFirma.Value = !Firma
Form_Auftrag_Kunden_Registrierung.comboxAnrede.Value = !Anrede
Form_Auftrag_Kunden_Registrierung.tboxName.Value = !Name
Form_Auftrag_Kunden_Registrierung.tboxVorname.Value = !Vorname
usw…
Danke für jeden Hinweis
Gruss Sebastian
[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]