Резервное копирование от нескольких папок FTP до локального и ZIP

wget? См. http://www.gnu.org/software/wget/manual/wget.html#Recursive-Retrieval-Options

Это получит дерево каталогов, что можно затем архивировать использование любой из обычных застежек-молний командной строки. Вы только что поместили все это в пакетные файлы и выполнили его из Планировщика задач.

МЛАДШИЙ]

Проверьте Супер Гибкий Синхронизатор Файла. Мы делаем что-то подобное использование тот инструмент. Это не FOSS, но довольно дешевый и имеет много хороших функций.

У Вас есть только доступ FTP к серверу?

Если так, я предлагаю NcFTP и 7z (с 7 zip).

Если можно справиться с входом в систему сервера (как Ваш, и это - операция резервного копирования),

1. войдите в систему к серверу через SSH,
   • запустите сценарий, чтобы заархивировать и сжать каталоги интереса,
   • и, затем просто SCP их везде, где.
     (но, используйте общедоступную аутентификацию с ssh и scp),

Я имел бы, хотя некоторые простые сценарии (пакетный файл) сделают задание. Или ftp или wget и несомненно набор других, могут загрузить файлы. Существует также много программ архивации командной строки. Это может быть выполнено из планировщика задач.

Я имею подобное требование и имею сценарий на сервере, делают большую часть работы. Путем сбора и сжатия их на сервере существует меньше для загрузки. Клиентский сценарий, используя wget, загружает получающиеся архивы, которые уже имеют имена файлов, которые включают дату и время. Так, это - скрипт удара, запущенный через крон на сервере Linux и пакетном файле, выполненном с помощью Планировщика задач на клиенте Windows.

Я имел подобное требование для своего веб-сервера и мысли о FTP, но не любил небезопасные соединения... Так вместо этого я создал резервный сценарий, добавил его к сервису Windows Task Scheduler и затем настроил его для выполнения ночью.

Сценарий выполняет резервное копирование с помощью NTBackup для каждой папки, в которой я нуждаюсь сохраненный. Все файлы резервных копий (.bkf) сохранены в единственную резервную папку.

Call BackupInstance(folderPath, folderName)

Function BackupInstance(fstrFolderPath, fstrFolderName)
    Dim strJobName : strJobName = "Backup_" & fstrFolderName

    Dim strMonth : strMonth = GetMonth(Month(Date))
    Dim strDay : strDay = GetDay(Day(Date))
    Dim strYear : strYear = Year(Date)

    Dim strTimeStamp : strTimeStamp = strMonth & strDay & strYear & "-" & Replace(FormatDateTime(now,vbShortTime),":","")

    Dim strBackupFileName : strBackupFileName = fstrFolderName & "_" & strTimeStamp & ".bkf"
    Dim strBackupOptions : strBackupOptions = "/SNAP:off /M normal /L:f /V:yes /D " & chr(34) & "Backup of " & fstrFolderName & chr(34)
    Dim strSyntax : strSyntax = "presp1-ntbackup.exe backup " & _
                chr(34) & fstrFolderPath & chr(34) & _
                " /J " & strJobName & _
                " /F " & chr(34) & BackupFolder & "\" & strBackupFileName & chr(34) & _
                " " & strBackupOptions

    if blnDebug = True then wscript.echo "Backing up " & strBackupFileName
    objShell.run "cmd /c " & strSyntax, 0, True
end function

Каждый раз, когда резервный сценарий работает, он проверяет на x-количество-дней старые файлы резервных копий и затем удаляет их, мешая резервной папке стать слишком полным.

Call ArchiveFiles(BackupFolder)

Sub ArchiveFiles(strBackupFolder)
    On Error Resume Next
    Dim objFolder : Set objFolder = objFSO.GetFolder(strBackupFolder)
    Dim colFiles : Set colFiles = objFolder.Files

    if blnDebug = True then wscript.echo "Found " & colfiles.count & " blkf file(s) in " & strBackupFolder

    Dim objFile
    For Each objFile in colFiles
        if lcase(Right(objFile.name,3)) <> "bkf" then
            if blnDebug = True then Wscript.Echo "Skipping " & objFile.name & " because it's not a backup file"
        elseif DateDiff("d", objFile.DateLastModified, Now) => intNumberOfDays then
            if blnDebug = True then Wscript.Echo "Removing " & objFile.Name & "  " & objFile.DateLastModified & " (" & DateDiff("d", objFile.DateLastModified, Now) & " days old)"
            objFso.DeleteFile(objFile.path)
        elseif DateDiff("d", objFile.DateLastModified, Now) < intNumberOfDays then
            if blnDebug = True then wscript.echo "Skipping " & objFile.Name & " because it's only " & DateDiff("d", objFile.DateLastModified, Now) & " days old)"
        else
            if blnDebug = True then wscript.echo "Unable to resolve last modified date for " & objFile.name
        end if
    Next
    err.clear
end sub

Для разгрузки файлов резервных копий, я использую Windows Live Sync как услуга для синхронизации резервной папки веб-сервера мой домашний компьютер. Это гарантирует, чтобы мои файлы резервных копий всегда существовали и на веб-сервере и на моем домашнем компьютере. От моего домашнего компьютера я использую Mozy, онлайн копируют для резервного копирования и файлов веб-сервера и моих персональных файлов.

Использование этого в течение некоторого времени без любых проблем. Если бы Вы нуждаетесь в большем количестве информации или хотели бы копию сценария в, он - полнота, просто сообщенная мне...