Hallo
Ich habe nicht vor diesen Forum mit meine Fragen zu bombardieren, die stelle ich wirklich wenn ich nicht mehr weiter weiss ;)
also
Ich habe einen Feld PLZ und Ort, wenn ich PLZ eingebe soll eine SQL Abfrage starten und suchen ob schon so eine PLZ vorhanden ist, wenn ja dann das Ergebnis im Feld Ort ausgeben.
Hallo,
Fragen kannst du ruhig stellen, dazu ist das Forum ja da!
Für dein Problem solltest du mal nach "abhängige Kombinationsfelder" suchen.
Es wird nicht gehen, das zu einer PLZ den Ort auszugeben, da es mehrere Orte mit gleicher PLZ gibt u. auch ein Ort r mehrere PLZ besitzen kann.
Gruß Oma
hmm... :-X stimmt, ist selten dass PLZ mehrere Orte hat aber kommt vor.
OK dann die selbe Frage mit anderen Feldern.
Vorname und Geschlecht.
ich brauche sowas wie feld_Geschlecht = DoCmd.RunSQL "Abfrage"
Hallo,
ich weiss immer noch nicht, was du eigentlich brauchst.
Wenn du einen Vornamen eingibst, soll das Geschlecht erscheinen?
Dazu bräuchtest du eine Tabelle in der zu Vornamen das Geschlecht steht! Ich habe so eine Tabelle (für einen anderen Zweck) mit 10750 Datensätze u. die ist sicher noch nicht vollständig!!
also, was ist dein genaues Anliegen?
Gruß Oma
ZitatIch habe einen Feld PLZ und Ort, wenn ich PLZ eingebe soll eine SQL Abfrage starten und suchen ob schon so eine PLZ vorhanden ist, wenn ja dann das Ergebnis im Feld Ort ausgeben.
Dazu bedarf es nicht SQL
DLookup mit einem Vergleich würde reichen.
If Dlookup("Postleitzahlenfeld", "TabellePostleitzahlen", "Postleitzahlenfeld = Eingabe") > 0 Then
suche den Ort raus
Else
mach halt was anderes
End IfNatürlich muss noch mit NZ gearbeitet werden, aber ich wollte es nicht zu kompliziert darstellen.
Viel Erfolg Andi
Hallo Andi,
mal von der Korrektheit des Codes abgesehen:
wie schon angemerkt: Es gibt zu einer PLZ auch mehrere Orte!
Gruß Oma
Hi Oma,
Eben mal aus dem Zug geschrieben :-) , klar, aber mit der Replik vom TO wollte er ein universelles Beispiel, mit dem er wohl etwas probieren wollte. Ich glaube es geht ihm nicht so sehr um PLZs und Orte.
Viele Grüße
Andi, der es jetzt hoffentlich bald mal nach Berlin geschafft hat...
zu dem Thema gibt es eine schöne Vorlage:
http://www.team-moeller.de/?Downloads (http://www.team-moeller.de/?Downloads)
die Beispieldatenbank: TM-PLZundOrtSuchen
Dorian
Hallo,
ZitatIch glaube es geht ihm nicht so sehr um PLZs und Orte.
das denke ich ja auch und bitte immer um das genaue Anliegen.
Der Link zum Beispiel für PLZ Orte zeigt, dass man dafür eine Tabelle mit 25338 DS benötigt die aber keinesfalls vollständig ist.
Gruß Oma
@Andi: viel Freude in Berlin....
Na also, geht doch voran und hier nun der nicht unbedingt sinnige aber hoffentlich stimmige Code:
If Nz(DLookup("* oder ein Feld der Tabelle", "Postleitzahlentabelle", "Postleitzahlenfeld = " & Me.EingabefeldPostleitzahl),0) Then
...Mache etwas, da es wohl bereits einen Ort zur PLZ gib
Exit Sub
End If
Es geht aber auch mit DCount beispielsweise für eine Textsuche, sofern die führende Null mit verwendet wird:
If DCount("*", "Postleitzahlentabelle", "PLZ-Feld = '" & Me!txtEingabe & "'") > 0 Then
...
Viele Grüße
Andi
WOW so viele Experten auf einmal...GUUUT!
Ich versuche die Frage nochmal zu stellen.
Ich habe eine Tabelle tbl_Kontakte
Tabelle tbl_Kontakte hat folgende Spalten:
Vorname, Nachname, Straße, PLZ, Ort, Geschlecht ...
Ich habe ein Formular frm_Hauptformular
frm_Hauptformular : Ungebunden
Felder: Vorname, Nachname, Straße, PLZ, Ort, Geschlecht ...
Schaltflächen:
Speichern: wird per SQL Abfrage gespeichert
Löschen: wird per SQL Abfrage gelöscht
Neu: Felder werden geleert
Wenn ich im Feld Vorname ,,Stefan" eingebe und das Feld verlasse, dann soll in der Tabelle tbl_Kontakte geprüft werden ob so ein Vorname schon gibt, wenn ja was hat er für ein Geschlecht und das Ergebnis soll im Feld Geschlecht erscheinen.
Hallo,
dann könntest du ins Ereignis AfterUpdate des Feldes Vorname folgenden Code schreiben:
Private Sub Vorname_AfterUpdate()
Me!Geschlecht = Nz(DLookup("Geschlecht","tbl_Kontakte","Vorname='" & Me!Vorname & "'"),"")
End Sub
;D
Danke sehr, funktioniert prima