Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

A2000, Postleitzahlen prüfen und automatisch Ort in Feld eintragen

304 views
Skip to first unread message

Christian Fröhlich

unread,
Dec 17, 1999, 3:00:00 AM12/17/99
to
Hallo zusammen,

ich habe eine Tabelle mit Postleitzahlen, Orten und Kreisen. Wenn nun im
Formular eine Postleitzahl eingegeben wird soll automatisch beim verlassen
des Feldes der Ort und der Kreis in die dementsprechenden Feldern
eingetragen werden.

Wie kann ich das machen ?

Christian

Klaus Rascher

unread,
Dec 17, 1999, 3:00:00 AM12/17/99
to
Hi

>Christian Fröhlich schrieb
>...

Das wird nichts Rechtes werden, weil es zu einer PLZ öfters mehrere Orte
gibt, welchen willst du dann eintragen?

Bye
Klaus


Sascha Münch

unread,
Dec 17, 1999, 3:00:00 AM12/17/99
to
On Fri, 17 Dec 1999 14:23:07 +0100, "Christian Fröhlich"
<ch...@3dgfx.de> wrote:

>Hallo zusammen,
Hi Chris!

>ich habe eine Tabelle mit Postleitzahlen, Orten und Kreisen. Wenn nun im

Ja, haette ich auch gerne ;-) Wo bekommt man die her?


>Formular eine Postleitzahl eingegeben wird soll automatisch beim verlassen
>des Feldes der Ort und der Kreis in die dementsprechenden Feldern
>eingetragen werden.

Du weißt, das es zu einer PLZ mehrere Orte geben kann?

Also hier ein bischen Code der die erste PLZ findet (ohne Gewähr):

function plz_afterupdate
dim rs as recordset
set rs=openrecordset("PLZTabelle",db_Snapshot)
rs.findfirst "[PLZ] = " & PLZFeld
if rs.nomatch then
'Fehlerbehandlung
exit function
end if
Ortsfeld = rs!Ort
Kreisfeld = rs!Kreis
rs.close
set rs=nothing
end function

Wenn Du willst, dann kann man da noch testen ob Ortsfeld oder
Kreisfeld schon einen Inhalt haben, bei mehreren Orten eine
Ortsauswahl zur Verfügung stellen usw.

Hoffe es hat erstmal geholfen.

---
Sascha Münch GSX 550 EU rrr#550
mue...@cs.bonn.edu

Christian Fröhlich

unread,
Dec 17, 1999, 3:00:00 AM12/17/99
to
Hallo,

alle zu verwendenen Postleitzahlen haben einen eindeutigen Ort und Kreis in
einer tabelle gespeichert. Ich möchte nur, wenn eine Postleitzahl (fest
definiert) in ein Feld eingetragen wird, aus dieser Tabelle der Ort und der
Kreis in die dafür definierten Felder automatisch eingetragen werden. Zu
jeder Postleitzahl gehört auch ein fest definierter Ort und Kreis (alle in
der Tabelle gespeichert)
z.B.
Postleitzahl:50000 ; Stadt:Köln ; Kreis:K
Postleitzahl:50111 ; Stadt:Köln ; Kreis:K
Postleitzahl:51645 ; Stadt:Gummersbach ; Kreis:GM
Postleitzahl:51647 ; Stadt:Gummersbach ; Kreis:GM

Wie Du siehst sind all Felder in der Tabelle fest definiert. Wenn ich nun im
Formularfeld Postleitzahl 50000 eingebe soll automatisch im Feld Ort der
Eintrag Köln erscheinen.

Ist das möglich?

Christian

Klaus Rascher <ras...@t-online.de> schrieb in im Newsbeitrag:
83e1tl$h1r$1...@news06.btx.dtag.de...


> Hi
>
> >Christian Fröhlich schrieb
> >...

> > ich habe eine Tabelle mit Postleitzahlen, Orten und Kreisen. Wenn nun im

> > Formular eine Postleitzahl eingegeben wird soll automatisch beim
verlassen
> > des Feldes der Ort und der Kreis in die dementsprechenden Feldern
> > eingetragen werden.

Karl Donaubauer

unread,
Dec 18, 1999, 3:00:00 AM12/18/99
to
Christian Fröhlich schrieb:...
>> > ich habe eine Tabelle mit Postleitzahlen, Orten und Kreisen. Wenn nun
>> > im Formular eine Postleitzahl eingegeben wird soll automatisch beim
>> > verlassen des Feldes der Ort und der Kreis in die dementsprechenden
>> > Feldern eingetragen werden.
>
>...Zu jeder Postleitzahl gehört auch ein fest definierter Ort und Kreis (alle

>in der Tabelle gespeichert) z.B.
>Postleitzahl:50000 ; Stadt:Köln ; Kreis:K
>Postleitzahl:50111 ; Stadt:Köln ; Kreis:K
>...

>Wie Du siehst sind all Felder in der Tabelle fest definiert. Wenn ich nun im
>Formularfeld Postleitzahl 50000 eingebe soll automatisch im Feld Ort der
>Eintrag Köln erscheinen.

Auf das Problem der PLZ für mehrere Orte wurdest du eh schon ausreichend
hingewiesen. Dafür solltest du halt eine Auswahl bieten bzw. z.B. den ersten
Ort anbieten.
Bei uns in A sind die PLZ eindeutig, deshalb verwende ich bei
"Nach Aktualisierung" des PLZ-Feldes im Formular:

If Not IsNull(Me!PLZ) And IsNull(Me!Ort) Then
Me!Ort = DFirst("Ort", "DeinePLZTabelle", "PLZ= '" & Me!PLZ & "'")
End If

PLZ ist dabei als Textfeld in der Tabelle definiert, ansonsten gehören
die Hochkommas weg.
Wenn DFirst zu langsam ist, dann halt mit Recordset wie von Sascha
beschrieben.

Die Prüfung auf Null beim Ort mache ich, damit vom Anwender
eingegebene Sachen nicht überschrieben werden. Ist Geschmacksfrage.

Umgekehrt kannst du bei einer Ortseingabe nach dem gleichen
Schema nach der PLZ suchen lassen.

HTH
Karl
********* Ich beantworte keine Access-Fragen per Email. *********
Access-FAQ: http://members.eunet.at/donkarl/
APP: http://www.AccessProfiPool.com

Christian Fröhlich

unread,
Dec 19, 1999, 3:00:00 AM12/19/99
to
Herzlichen Dank für Eure Hilfe. Beide Varianten haben funktionirt (Karls und
Saschas)

Sascha: Du hast geschrieben


>ich habe eine Tabelle mit Postleitzahlen, Orten und Kreisen.

Ja, haette ich auch gerne ;-) Wo bekommt man die her?

Tja... da war fleißiges eintippen gefragt :-) Waren aber auch nicht viele
Einträge nur etwa 500, das war noch vertretbar

Nochmal Danke und noch einen schönen Sonntag.

Christian

Christian Fröhlich <ch...@3dgfx.de> schrieb in im Newsbeitrag:
83ddfs$beq$1...@news.online.de...
> Hallo zusammen,


>
> ich habe eine Tabelle mit Postleitzahlen, Orten und Kreisen. Wenn nun im
> Formular eine Postleitzahl eingegeben wird soll automatisch beim verlassen
> des Feldes der Ort und der Kreis in die dementsprechenden Feldern
> eingetragen werden.
>

Karl Donaubauer

unread,
Dec 19, 1999, 3:00:00 AM12/19/99
to
Christian Fröhlich schrieb:

> Sascha: Du hast geschrieben
> >ich habe eine Tabelle mit Postleitzahlen, Orten und Kreisen.
> Ja, haette ich auch gerne ;-) Wo bekommt man die her?
>
> Tja... da war fleißiges eintippen gefragt :-) Waren aber auch nicht viele
> Einträge nur etwa 500, das war noch vertretbar

FAQ 1. 23 PLZ, BLZ, VORWAHLEN, TELEFONTARIFE

--

Sascha Münch

unread,
Dec 23, 1999, 3:00:00 AM12/23/99
to
On Sun, 19 Dec 1999 17:20:19 GMT, "Karl Donaubauer"
<don...@chello.at> wrote:

Hi Karl!

>Christian Fröhlich schrieb:
>> Sascha: Du hast geschrieben
>> >ich habe eine Tabelle mit Postleitzahlen, Orten und Kreisen.
>> Ja, haette ich auch gerne ;-) Wo bekommt man die her?
>>
>> Tja... da war fleißiges eintippen gefragt :-) Waren aber auch nicht viele
>> Einträge nur etwa 500, das war noch vertretbar
>
>FAQ 1. 23 PLZ, BLZ, VORWAHLEN, TELEFONTARIFE

Das reicht nur leider nicht. Christian schrieb auch noch was von
Kreisen. Das fände ich interessant, da ich dann mal einen Zusammenhang
zw. Gemeindeschlüssel und Kreisen suchen könnte. Dann könnte man mit
meiner DB (wo ich immer noch nicht das Progammdemo zu geschrieben
habe) auch eine geographische Einordung der Orte vornehmen.
Woher er allerdings zu Zuordnung der Orte zu den Kreisen hat, daß ist
immernoch unklar. Abgetipp, gut aber wovon abgetippt?
BTW: Christian: willste nicht mal die DB als gutes Beispiel für viel
tipperei ins Netz stellen (aber bitte nicht posten !!)

Nochwas zur FAQ: meine Homepage (titan.cs.bonn.edu/~muenchs) ist zur
Zeit nicht erreichbar, da der Support bei und an der Uni jetzt erst
das Y2K-Update vorgenommen hat und doch länger als die veranschlagten
zwei Tage braucht (wir sind jetzt bei 2 Wochen). Sind halt alles
HiWi's, die Informatik mit mir an dieser Uni studieren. Was soll man
da schon erwarten. Die HP soll aber irgendwann mal wieder
funktionieren.

Chris

unread,
Jan 27, 2000, 3:00:00 AM1/27/00
to
Schön,daß Ihr die Lösung gefunden habt.
Ich habe ein ähnliches Problem und habe schon versucht Eure Lösung
umzuwandeln, was aber nciht funktioniert hat.

Und zwar: In meiner Datenbank gibt es eine Tabelle Kunden (Stammdaten
Kunden) und dazugehörende Gespräche (Gespräche ).
Wie kann ich es realisieren, daß in meinem Formular Gespräche, wenn ich die
Kundennummer eingebe automatisch der entsprechende Name (von "des
Kunden.Stammdaten Kunden") aus der Haupttabelle gezogen und ausgegeben wird
??

Ist glaub ich das gleiche wie das Problem von Christian, schaffe es aber
nicht, die Formel umzustellen :-(

Grüße

Chris


Frank Strietzel

unread,
Jan 27, 2000, 3:00:00 AM1/27/00
to
Hi Chris,

ist doch garnicht so schwer.

Du hast ein Feld "PLZ" und ein Kombifeld "Orte"
Desweiteren bruchst Du noch eine Tabelle mit PLZ und den Orten.
Erstelle eine Abfrage:
SELECT [tblPLZ].PLZ, [tblPLZ].ORT FROM [tblPLZ] WHERE ((([tblPLZ].PLZ) Like
[Formulare]!Kunden]![PLZ]));
Realisiert das nur die Orte angezeigt werden, die die PLZ im Kundenformular
enthält.
Das Kombifeld bindest Du an diese Abfrage (nur Orte)

Im Kundenformular:

Wird in [PLZ] ein Wert (Nach Aktualisierung) gehe zu Kombifeld und bei
Fokuserhalt des Kombifeldes: me![kombifeld].dropdown.
Auswahl des Ortes. Weiter zum nächsten Steuerelement.

Falls Du Willst maile ich Dir eine DEMO.Mdb zu

Sollte ich nicht verstanden worden sein, so gebt mir bescheid. Mein Ausdruck
ist nicht der Beste.
Dafür funktioniert das bei mir bestens.

MfG FS

Chris <1024...@online.de> schrieb in im Newsbeitrag:
86ot5t$oa$1...@news00.btx.dtag.de...

0 new messages