Имеется здоровый файл-сервер под Windows (400 Гб). Требуется организовать его резервирование в реальном времени. Можно, конечно, сделать и RAID1, или использовать ntbackup... Но как-то все это... Особенно если диск зашифрован, например, TrueCopy и монтируется вручную. Меня лично вполне устроил robocopy
а чтобы процесс не завершался при выходе из системы (наверняка вы будете запускать его в терминальном сеансе) использую vbs скрипт:
Set oShell = WScript.CreateObject("WScript.Shell")
Set fso1 = WScript.CreateObject("Scripting.FileSystemObject")
FileDelete "c:\robocopy_D.log"
oShell.Run "robocopy.exe D:\ E:\ /E /PURGE /COPY:DAT /NP /LOG+:C:\robocopy_D.log /ZB /MON:1 /MOT:1 /IPG:100 /R:10 /W:30", 0, False
Sub FileDelete(sFile)
On Error Resume Next
fso1.DeleteFile (sFile)
If Err.Number <> 0 Then
WScript.Echo "Error deleting file: " & sFile
End If
End Sub
Параметры для robocopy разумеется - по вашему вкусу. Кстати, полезно, если нужно запустить robocopy от имени другого пользователя. Для этого прописываем скрипт в "назначенные задания" и указываем нужного пользователя.
а чтобы процесс не завершался при выходе из системы (наверняка вы будете запускать его в терминальном сеансе) использую vbs скрипт:
Set oShell = WScript.CreateObject("WScript.Shell")
Set fso1 = WScript.CreateObject("Scripting.FileSystemObject")
FileDelete "c:\robocopy_D.log"
oShell.Run "robocopy.exe D:\ E:\ /E /PURGE /COPY:DAT /NP /LOG+:C:\robocopy_D.log /ZB /MON:1 /MOT:1 /IPG:100 /R:10 /W:30", 0, False
Sub FileDelete(sFile)
On Error Resume Next
fso1.DeleteFile (sFile)
If Err.Number <> 0 Then
WScript.Echo "Error deleting file: " & sFile
End If
End Sub
Параметры для robocopy разумеется - по вашему вкусу. Кстати, полезно, если нужно запустить robocopy от имени другого пользователя. Для этого прописываем скрипт в "назначенные задания" и указываем нужного пользователя.
Комментариев нет:
Отправить комментарий