title image


Smiley Re: Focus setzen geht nicht
Hallo,leider hat das auch alles nichts geholfen. Hier mal mein Code von Eingabe_AfterUpdate:Dim dbs As DatabaseDim rstBilder As RecordsetDim rstVerb As RecordsetDim strFilter As StringDim lngEvnt As Long Set dbs = CurrentDb ' Bildertabelle öffnen Set rstBilder = dbs.OpenRecordset("SELECT Bild, BildNr, EventNr FROM tabBilder") ' Filter zusammenbauen lngEvnt = Me!subformBestellungen.Form!Event strFilter = "EventNr = " & lngEvnt & " AND Bild = " & Me!Eingabe rstBilder.FindFirst (strFilter) 'Tabelle verbBestellBild öffnen Set rstVerb = dbs.OpenRecordset("Select * From verbBestellBild") With rstVerb 'neuer Datensatz .AddNew ' ... Hier werden die ganzen Feldinformationen gesetzt .Update End With rstVerb.Close rstBilder.Close Me!subformBestelldetails.Requery Me!Eingabe = "" Me!Eingabe.SetFocusÜbrigens: bei DoCmd.GotoControl Me!Eingabe kommt die Fehlermeldung "Objekt unterstützt diese Eigenschaft oder Methode nicht"Any ideas??Martina

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: