Bisher haben Sie bestimmte Ordner immer manuell abgesichert und möchten dies nun automatisiert mit Hilfe eines VBSkripts lösen?
Dazu müssen Sie zuerst einmal das "Scripting.FileSystemObject" anlegen, mit Hilfe der Funktion Copy() können Sie dann den Ordner kopieren.
Falls Sie das folgende Script nutzen, müssen Sie die Inhalte der Variablen "backup_ziel" und "backup_quelle" anpassen.
Set DateiSystem = CreateObject("Scripting.FileSystemObject")
backup_ziel = "C:\backup"
backup_quelle = "C:\arbeiten"
If Not DateiSystem.FolderExists(backup_ziel) Then
DateiSystem.CreateFolder backup_ziel
End If
Set Ordner = DateiSystem.GetFolder(backup_quelle)
Ordner.Copy backup_ziel, true
MsgBox "Backup erledigt.",,"Backup Erfolg"
MEMBERS LOGIN
SEITE DURCHSUCHEN
