Forms

3.13 Confermare il salvataggio dei dati.
  Federico Luciani
(D)
E' possibile far apparire un messaggio che mi chiede se voglio salvare i dati appena modificati in una maschera?

(R)
Ogni volta che Access cerca di salvare un record, viene generato l'evento BeforeUpdate (Prima di aggiornare) prima che il record venga realmente salvato.
Quindi se vogliamo annullare l'aggiornamento del record, ci basta intercettare questo evento.

Il seguente codice fa si che ogni volta che un record sta per essere salvato, ci venga chiesto se vogliamo salvarlo o no; inoltre possiamo anche decidere di annullare l'evento.

Private Sub Form_BeforeUpdate(Cancel As Integer)
   Dim retValue As Integer
   Dim strTtl As String
   Dim strMsg As String
   strTtl = "Salvare il record?"
   strMsg = "I dati sono cambiati." & vbCrLf & _
            "Vuoi salvare le modifiche?"
   retValue = MsgBox(strMsg, vbQuestion + vbYesNoCancel, strTtl)
   Select Case retValue
       Case vbYes
           'non fare nulla
       Case vbNo
           DoCmd.RunCommand acCmdUndo
       Case vbCancel
           Cancel = True
   End Select
End Sub


Se pensate di avere del materiale freeware interessante e volete pubblicarlo, allora leggete qui.