Buonasera, mi occorrebbe un consiglio circa l'utilizzo della proprietà LastModified.
Per inserire record nei database utilizzo un codice tipo quello indicato di seguito:
Dim frm As Form
Dim id_last_com As Long
Set frm = Form_SM_Main
With frm.RecordsetClone
.AddNew
![ID_Ente] = DLookup("ID_Ente", "Enti", "Denominazione_Ente='" & Me.lbox_mittente.ItemData(0) & "'")
![ID_Tipo_Posta] = Me.cbo_tipo_com.Column(0)
![ID_Posta] = 1 ' in Arrivo
.Update
.Bookmark = .LastModified
id_last_com = !ID_Comunicazioni
End With
strsql = "UPDATE Comunicazioni SET N_Prot_Ente='" & Me.txt_rich.Value & "'"
strsql = strsql & ", Data_Comunicazione=#" & Format(Me.txtdata_rich, "mm/dd/yyyy") & "#"
strsql = strsql & ", N_Prot_Arrivo=" & DCount("*", "Comunicazioni")
strsql = strsql & ", Data_Prot_Arrivo=#" & Date & "#"
strsql = strsql & ", Ogg_Com_Arrivo='" & Me.txt_oggetto & "'"
strsql = strsql & ", Utente_Ins='" & user & "'"
strsql = strsql & " WHERE ID_Comunicazioni=" & id_last_com
DoCmd.SetWarnings False
DoCmd.RunSQL strsql
E' un utilizzo corretto della quello che faccio, oppure ho bisogno di agire in modo diverso?
Grazie.