
06-12-18, 05:48
|
| Όνομα: ΝΑΣΟΣ Έκδοση λογισμικού Office: Ms-Office 2007, Ms-Office 2016 Γλώσσα λογισμικού Office: Ελληνική | | Εγγραφή: 14-10-2010
Μηνύματα: 455
| |
Καλημέρα Μάρω.
Δοκίμασε Κώδικας: Private Sub Form_Load()
DoCmd.SetWarnings False
On Error Resume Next
DoCmd.OpenQuery "QryWeekScedules3"
[Simera] = Date
DoCmd.SetWarnings True
End Sub
|