Il requery e' inserito nella seconda parte di codice, che non ho postato.
14/03/2025 - @Alex ha scritto:
Quindi se il refresh ha dato i suoi risultati, è perchè il Save era già andato a buon fine, in caso di ADDNEW
Se il SAVE era andato a buon fine perche' allora non trovava l'ultimo ID creato, mentre inserendo il refresh lo trova?
Cosi' indice non viene valorizzato con l'ultimo ID generato ma con il penultimo:
Private Sub frmEVcmdsalva_Click()
On Error GoTo Err_handler
Dim indice As Long
Dim ctrl As Access.Control
DoCmd.RunCommand acCmdSaveRecord
indice = Nz(DMax("IDtabEVid", "tblEVelencovociordine"), 0)
Cosi' invece funziona:
Private Sub frmEVcmdsalva_Click()
On Error GoTo Err_handler
Dim indice As Long
Dim ctrl As Access.Control
DoCmd.RunCommand acCmdSaveRecord
Me.Refresh
indice = Nz(DMax("IDtabEVid", "tblEVelencovociordine"), 0)