Многопоточное автокопирование файлов в несколько адресов

[DmitryS]

---

Как организовать процесс автоматизированного копирования файлов со съёмных и иных носителей информации (USB-флешек, карт памяти, внешних жёстких дисков, CD/DVD/Blu-Ray приводов, FDD (Floppy) устройств, сетевых, виртуальных, RAM-дисков и др.) одновременно в несколько адресов в ОС Microsoft Windows?

---

01. Скачиваем на компьютер программу FDFRun.
02. Устанавливаем программу в папку: "C:\Program Files\VRCP Soft\FDFRun\".

03. Скачиваем на компьютер программу FDFSpy.
04. Устанавливаем программу в папку: "C:\Program Files\VRCP Soft\FDFSpy\".

05. Запускаем программу FDFSpy, настраиваем, сохраняем и выходим,
      не добавляя программу в автозапуск с операционной системой!

06. Переименовываем папку "C:\Program Files\VRCP Soft\FDFSpy\"
      в "C:\Program Files\VRCP Soft\FDFSpy1\".

07. Создаём копию папки "C:\Program Files\VRCP Soft\FDFSpy1\"
      в "C:\Program Files\VRCP Soft\FDFSpy2\".

08. Переименовываем в папке "C:\Program Files\VRCP Soft\FDFSpy1\"
      файл "FDFSpy.exe" в "FDFSpy1.exe".

09. Переименовываем в папке "C:\Program Files\VRCP Soft\FDFSpy2\"
      файл "FDFSpy.exe" в "FDFSpy2.exe".

10. Открываем в папке "C:\Program Files\VRCP Soft\FDFSpy2\" файл "FDFSpy.ini"
      и изменяем путь, куда нужно сохранять файлы.

11. Создаём в папке "C:\Program Files\VRCP Soft\FDFRun\"

      a) либо файл: "FDFSpy.vbs" (fdfsmd.zip) со следующим содержимым:

Option Explicit On Error Resume Next Dim WSHShell, PsArgs, PsDrv Set WSHShell = WScript.CreateObject("WScript.Shell") Set PsArgs = WScript.Arguments PsDrv = UCase(Trim(PsArgs(0))) If Len(PsDrv) > 0 Then PsDrv = Trim(Left(PsDrv,1)) If Len(PsDrv) = 1 Then If Asc(PsDrv) > 64 And Asc(PsDrv) < 91 Then WSHShell.Run """" & "C:\Program Files\VRCP Soft\FDFSpy1\FDFSpy1.exe " & """" & PsDrv WSHShell.Run """" & "C:\Program Files\VRCP Soft\FDFSpy2\FDFSpy2.exe " & """" & PsDrv End If End If Set PsArgs = Nothing Set WSHShell = Nothing WScript.Quit 0

      б) либо файл: "FDFSpy.cmd" (или .bat) (fdfsmd.zip) со следующим содержимым:

Код: Выделить всё

@echo off
if "%1" NEQ "" (
start "" "C:\Program Files\VRCP Soft\FDFSpy1\FDFSpy1.exe" %1
start "" "C:\Program Files\VRCP Soft\FDFSpy2\FDFSpy2.exe" %1
)
exit

12. Запускаем программу FDFRun и открываем "Настройки", далее в зависимости от выбранного в п.11 варианта {а} либо {б}, настраиваем программу соответствующим образом, согласно одному из скриншотов ниже:

  

13. Сохраняем настройки программы FDFRun, нажав на синюю кнопочку с изображением дискеты (нижний левый угол окна), добавляем программу в автозапуск с операционной системой, нажав зелёную кнопочку {+} (находящуюся там же в нижнем левом углу окна), сворачиваем программу в системный трей и тестируем проделанное путём подключения съёмных носителей информации и проверки содержимого папок для сохранения файлов, пути к которым указаны в обоих файлах "FDFSpy.ini" (см. п.06 и п.07 выше).

---

P.S.: В данном примере осуществляется одновременное копирование (дублирование) файлов только в две папки. При желании их количество можно увеличить, повторив шаги, указанные выше в п.07, п.09 и п.10 (продолжая создавать дополнительные копии: FDFSpy3, FDFSpy4, FDFSpy5 и т.д.), а также добавив дополнительные аналогичные строки для их запуска в сценариях (скриптах), указанных в п.11.