Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Lost Focus - Bankleitzahl
Autor: gaby
Datum: 04.02.05 08:30
Meine lieben Freunde ! ich habe wieder so ein kleines Problem. Ich möchte nach der Eingabe der Blz das sich das Feld Bank automatisch füllt. Also die Variable Neue_Bank habe ich im Allgemeinen Teil als Dim Boolean angelegt. Im Load steht Neue_Bank = False Im LostFocus der Blz habe ich nun geschrieben 'Schauen, ob die eingegebene BLZ vorhanden ist - oder ob die Bank erst zugeordnet 'werden muss If Val(txtBlz1.Text) > 0 Then Auswahl ("Select * from Banken where Blz = " & Val(txtBlz1.Text)) If RS.BOF = True Or RS.EOF = True Then Neue_Bank = True Else txtBlz1.Text = RS.Fields("Blz").Value Neue_Bank = False End If Else Neue_Bank = False End If 'Label Erklärung wieder False lblErklaerung.Visible = False und im Change der Bank1 'Neue Bank speichern If Neue_Bank = True Then Auswahl ("Insert Into Banken (Blz, Institut) Values('" & txtBlz1.Text & "', '" & _ txtBank1.Text & "')") Neue_Bank = False End If Die Tabelle heißt Banken, das BlzFeld in der Tabelle heißt Blz, und das BankFeld in der Tabelle heißt Institut. Was habe ich nicht gemacht oder was habe ich falsch gemacht ? Vielleicht hat jemand einen Rat auf Lager. Liebe Grüße Gaby im Voraus -------------------------------------------------- LG Gaby Ooh yes, I'm the great Pretender ! Email: gmrb@twin.at

Lost Focus - Bankleitzahl	1.047	gaby	04.02.05 08:30
Re: Lost Focus - Bankleitzahl	548	FenchelT	04.02.05 08:45
Re: Lost Focus - Bankleitzahl	537	gaby	04.02.05 08:49
Re: Lost Focus - Bankleitzahl	575	FenchelT	04.02.05 09:11
Re: Lost Focus - Bankleitzahl	593	gaby	04.02.05 09: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