title image


Smiley Dann würde ich gern folgendes machen
Response = acDataErrAdded

Dim db As DAO.Database

Dim rs As DAO.Recordset

Set db = CurrentDb

Set rs = db.OpenRecordset("Städte_TAB", dbOpenDynaset)



rs.AddNew

rs!Feldname = NewData

rs.Update



rs.Close : Set rs = Nothing

Set db = Nothing



jedoch bekomm ich in der ersten DIM Zeile eine Fehlermeldung

und dann in der zweiten



Fehler beim Kompilieren



Benutzerdefinierter Typ, nicht definiert



was muss ich an dem Code noch ändern um ihn lauffähig zu machen??
Grüße aus Bayreuth und vielen Dank für die Hilfe

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: