title image


Smiley Re: Wie kann ich folgende VAB-Anweisungen vereinfachen?
Wenn du eh nen Recordset öffnest, mach es doch so:



Dim rs as Recordset



Set rs = Currentdb.OpenRecordset("SELECT* FROM tbl_Kunden where Kundennummer = " & Forms.frm_Uebersicht.txtKundennummer, dbopensnapshot)



Me!Kundenname = rs!Kundenname

Me!Zusatzname =rs!Zusatzname

Me!Postfach = rs!Postfach

Me!PostfachOrt = rs!PostfachOrt

Me!Plz = rs!Plz

Me!Strasse = rs!Strasse

Me!Ort = rs!Ort



rs.close

Set rs = Nothing



Mfg,



PibeY2k



geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: