title image


Smiley Delete button
Hallo Forum

ich arbeite mit Access2000

was stimmt hier nicht?



ich bekomme folgenden Fehler:

Laufzeitfehler - 2147352567(800200009) Das Formular ist schreibgeschützt, da die Einstellung "eindeutige Tabelle" nicht eingestellt ist.



Das ist der code



'Delete Button

Private Sub cmd_delete_Click()

Dim varMsgBox



varMsgBox = MsgBox(("Do you really want to delete this entry?"), vbYesNo + vbQuestion)



'If yes, set this entry inactive and close this form

If varMsgBox = vbYes Then

Me.active = False

MsgBox "Entry deleted", vbOKOnly, "Deleted"

DoCmd.Close

End If



End Sub

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: