[alex]

Καλησπέρα !!!

Επίσης για να λειτουργεί καλύτερα η βάση σε όσους ενδιαφέρει το θέμα :πρέπει να τοποθετηθεί συμπληρωματικός κώδικας στις βάσεις που περιέχουν τον παρακάτω κώδικα.

Private Sub Form_Open(Cancel As Integer)
    DoCmd.SetWarnings False
        DoCmd.RunSQL ("UPDATE tblParameters set CurrDate=#" & Format(date, "mm/dd/yyyy") & "#")
    DoCmd.SetWarnings True
Me.Form.Requery
End Sub

Η συμπλήρωση θα είναι η γραμμή κώδικα που είναι με κόκκινο.

Φιλικά/Αλέξανδρος