1 Тема от FADY

  • FADY
  • Участник
  • Неактивен

Тема: Копирование файлов из папки в папку

Здравствуйте уважаемые.
Есть следующая задача:
На рабочем столе есть папка (назовём её Папка1), в которую периодически падают файлы (сканы с мфу), нужно чтобы при появлении нового файла в этой папке, он копировался в Папку2, находящеюся тоже на рабочем столе.
Система Windows 2008 server.
Каким образом можно реализовать сие действо?

2 Ответ от ypppu

  • ypppu
  • Разработчик
  • Неактивен

Re: Копирование файлов из папки в папку

Наверное решений будет очень много. Вам нужно, чтобы скрипт был с видимым окном или скрыто работал? Чтобы устанавливать программу на компьютер, либо без установки, как например bat-файл?

Правила  Поиск  Русский язык  Слова-паразиты
AHK: [ENG] [RUS]

3 Ответ от FADY

  • FADY
  • Участник
  • Неактивен

Re: Копирование файлов из папки в папку

С удовольствием выслушаю все предложения. Лучше конечно, чтобы скрипт работал скрытно (для юзера должно быть всё прозрачно, отсканил документ, открыл папку2, profit). Желательно без установки какого-либо стороннего софта.

4 Ответ от FADY

  • FADY
  • Участник
  • Неактивен

Re: Копирование файлов из папки в папку

Набросал такой батник.
Один только момент, в папке назначения создаётся файл с именем формата "дата_Scan1", следующий файл уже имеет имя "дата_дата_Scan1" и т.д. Что не есть гуд)
Что дописать, чтобы формат был "дата_ScanN+1" ?


:test
:loop
if exist Z:\*.pdf goto go
ping -n 10 localhost
goto test
:go
copy Z:\*.pdf C:\Users\user1\Desktop\Scan\
Set Where=C:\Users\user1\Desktop\Scan\
FOR %%f IN ("%Where%\*.*") DO ren "%%f" "%Date:~6,4%%Date:~3,2%%Date:~0,2% %%~nxf"
del /q Z:\*.pdf
ping -n 10 localhost
goto loop

5 Ответ от ypppu

  • ypppu
  • Разработчик
  • Неактивен

Re: Копирование файлов из папки в папку

Я могу если только на AutoHotkey подсказать.

Правила  Поиск  Русский язык  Слова-паразиты
AHK: [ENG] [RUS]

6 Ответ от Yury

  • Yury
  • Разработчик
  • Неактивен

Re: Копирование файлов из папки в папку

FADY пишет:

Что дописать, чтобы формат был "дата_ScanN+1" ?


@echo off

set Where=C:\Users\user1\Desktop\Scan\

setlocal enabledelayedexpansion
set count=0
for /f %%e in ('"dir /a-d/b "%Where%*_Scan*.pdf" 2>nul"') do (
 set name=%%~ne
 set number=!name:*_Scan=!
 if !number! gtr !count! (
  set count=!number!
  )
 )

:loop
for %%f in ("Z:\*.pdf") do (
 set /a count+=1
 move "%%f" "%Where%%date:~6,4%%date:~3,2%%date:~0,2%_Scan!count!.pdf">nul
 )
ping -n 10 localhost>nul
goto loop

7 Ответ от FADY

  • FADY
  • Участник
  • Неактивен

Re: Копирование файлов из папки в папку

Супер! Спасибо большое!
Ещё один момент, желательно чтобы счётчик каждый день обнулялся.