Evo koda koji smesta backup sa datumom i vremenom u nazivu
Code:
Private Sub cmdBackup_Click()
If Shell("Z:\winrar\rar a -ag+YYYYMMDDHHMM G:\Backup\Backup.rar Z:\Proba.accdb", vbHide) <> 0 Then
MsgBox ("Uspješan backup!")
Else
MsgBox ("Greška pri izvršavanju backupa!")
End If
End Sub
.Pozdrav.
Private Sub cmdBackup_Click()
If Shell("Z:\winrar\rar a -ag+YYYYMMDDHHMM G:\Backup\Backup.rar Z:\Proba.accdb", vbHide) <> 0 Then
MsgBox ("Uspješan backup!")
Else
MsgBox ("Greška pri izvršavanju backupa!")
End If
End Sub
Potpis
Jednog dana...
