i am trying to create a function for the user that
checks every week if the user did a backup for the system or not
if he did then no msgbox will pop out
if he didnt then a msgbox will appear displaying
you system last backup was before 7 days
i tried this code but i am stuck
any help will be appriciated
regards
salsa 31
checks every week if the user did a backup for the system or not
if he did then no msgbox will pop out
if he didnt then a msgbox will appear displaying
you system last backup was before 7 days
i tried this code but i am stuck
Code:
Public Function BackupReminder()
Dim NewID As Long
Dim strSQL As String
Dim rs As New ADODB.Recordset
DateToday = CDate(Date & " 00:01")
Set rs = CN.Execute("SELECT * FROM BackUpLogs ORDER BY BackID")
While Not rs.EOF
If rs!BackDate 7> DateToday Then
End Functionregards
salsa 31