Zugriff auf VBA für das Speichern von Daten, die in eingegeben wurden Von

Question

Wenn ein Benutzer das Formular schließt, werden die Daten automatisch in der Datenbank gespeichert. Daher ist es nicht notwendig, eine Speicherschaltfläche zu haben.

Aber, da die meisten Benutzer so gewohnheitsmäßig sind, Save Knopf zu drücken, bestehen sie noch darauf, dass es einen Save Knopf geben sollte.

Welcher Code sollte für die Schaltfläche Save geschrieben werden, um alle im Formular eingegebenen Daten zu speichern.

Es muss auch sorgfältig geprüft werden, ob sich die Daten geändert haben oder nicht. Manchmal öffnen die Benutzer das Formular, um Daten anzuzeigen, und obwohl sie keine Änderungen vorgenommen haben, drücken sie die Taste Save.

Answer 1

Der Code für Click-Ereignis von Save Knopf

Private Sub cmdSave_Click() 
    If Me.Dirty Then 'to check if any data has changed. 
     DoCmd.RunCommand acCmdSaveRecord 
    End If 
End Sub 

Answer 2

Sie auch Dirty nur verwenden können:

von

Private Sub cmdSave_Click() 
    If Me.Dirty = True Then 
     Me.Dirty = False 
    End If 
End Sub 

Answer 3

ich das denke, was wollen Sie basiert auf den gleichen Kommentare, die ich habe meine Kollegen ... Ich beginne immer mit der Frage, ob sie sparen wollen oder nicht, manchmal sind die Benutzer einfach nur verspielt und mit Platten beschäftigt.

If me.dirty = true then 
      If MsgBox("Are you sure you want to save as " & TempVars!gbl_username & "? 
         After saving you will be moved to a new record", _ 
         vbYesNo + vbQuestion, "Save Changes") = vbNo Then 
       'If answer is no 
        'Do nothing 
      Else 
       DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70      
      End If 
    End If