Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  | Правила  

Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » Скриптовые языки администрирования Windows » Любой язык - Разархивирование с FTP на шару

Ответить
Настройки темы
Любой язык - Разархивирование с FTP на шару

Новый участник


Сообщения: 2
Благодарности: 0

Профиль | Отправить PM | Цитировать


Приветствую товарищи!
Имеется скрипт который архивирует файлы и заливает на FTP
Код: Выделить весь код
@Echo off
SetLocal EnableExtensions
SetLocal EnableDelayedExpansion

rem ---Считываем файлы конфигурации из папки Config---
for /F "tokens=*" %%s in (.\Config\text.txt) do set %%s

set TYear=%date:~6,4%
set TMonth=%date:~3,2%
set TDay=%date:~0,2%
set THour=%time:~0,2%
set TMin=%time:~3,2%
set TekDATA=%TYear%.%TMonth%.%TDay%-%THour%.%Tmin%

rem ---Задаем заголовок окна CMD---
Title %Title_Cmd%

call :kill

rem ---Скрываем окно CMD по заголовку---
start /WAIT /MIN .\Tools\nircmd.exe win hide title "%Title_Cmd%"

rem ---Вызываем процедуру архивации всех баз mdb---
call :arch

rem ---Вызываем процедуру копирования на FTP
call :dannietoftp

call :info2


exit

rem ===============
rem ===ПРОЦЕДУРЫ===
rem ===============

rem ---Процедура проверки соответствия версии и языка операционной системы---

:info1
	rem ---Выводим информационное сообщение о начале установки обновлений поверх всех окон со звуковым оповещением---
	start .\Tools\nircmd.exe infobox %Text_InfoBox_2% %Title_InfoBox%
	start /WAIT /MIN .\Tools\nircmd.exe beep 1500 2000
goto :EOF


:info2
	rem ---Выводим информационное сообщение о начале установки обновлений поверх всех окон со звуковым оповещением---
	start .\Tools\nircmd.exe infobox %Text_InfoBox_4% %Title_InfoBox%
	start /WAIT /MIN .\Tools\nircmd.exe beep 1500 2000
goto :EOF


:arch
	rem ---Архивирование---
	.\Tools\fsarchiver.exe /run .\%date:~6,4%\Январь	.\re4ka_%date:~6,4%\01
	.\Tools\fsarchiver.exe /run .\%date:~6,4%\Февраль 	.\re4ka_%date:~6,4%\02
	.\Tools\fsarchiver.exe /run .\%date:~6,4%\Март		.\re4ka_%date:~6,4%\03
	.\Tools\fsarchiver.exe /run .\%date:~6,4%\Апрель 	.\re4ka_%date:~6,4%\04
	.\Tools\fsarchiver.exe /run .\%date:~6,4%\Май		.\re4ka_%date:~6,4%\05
	.\Tools\fsarchiver.exe /run .\%date:~6,4%\Июнь		.\re4ka_%date:~6,4%\06
	.\Tools\fsarchiver.exe /run .\%date:~6,4%\Июль 		.\re4ka_%date:~6,4%\07
	.\Tools\fsarchiver.exe /run .\%date:~6,4%\Август 	.\re4ka_%date:~6,4%\08
	.\Tools\fsarchiver.exe /run .\%date:~6,4%\Сентябрь	.\re4ka_%date:~6,4%\09
	.\Tools\fsarchiver.exe /run .\%date:~6,4%\Октябрь	.\re4ka_%date:~6,4%\10
	.\Tools\fsarchiver.exe /run .\%date:~6,4%\Ноябрь 	.\re4ka_%date:~6,4%\11
	.\Tools\fsarchiver.exe /run .\%date:~6,4%\Декабрь	.\re4ka_%date:~6,4%\12
	DEL .\re4ka_%date:~6,4%\%date:~3,2%\%date:~0,2%.mdb.zip
	DEL .\re4ka_%date:~6,4%\%date:~3,2%\%date:~0,2%.ldb.zip
goto :EOF

:dannietoftp
	rem ---Копируем на FTP
	.\Tools\wput -a log.txt -o "%TekDATA%".txt .\re4ka_2017\ ftp://FTP:alpineftp@адрес_фтп/FTP_Polygons/date/re4ka/
goto :EOF

:kill
	taskkill /f /im "nircmd.exe"
	taskkill /f /im "wput.exe"
goto :EOF
Помогите пожалуйста сделать обратное действие. Мне нужно чтобы файлы с FTP разархивировались на шару из папки 01 в папку Январь из папки 02 в папку Февраль и т.д.. Заранее спасибо за помощь

Отправлено: 08:58, 19-09-2017

 


Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » Скриптовые языки администрирования Windows » Любой язык - Разархивирование с FTP на шару

Участник сейчас на форуме Участник сейчас на форуме Участник вне форума Участник вне форума Автор темы Автор темы Шапка темы Сообщение прикреплено

Похожие темы
Название темы Автор Информация о форуме Ответов Последнее сообщение
CMD/BAT - [решено] Поставить согласие в BAT на разархивирование дубликатов файла antikvarik@vk Скриптовые языки администрирования Windows 2 18-10-2016 20:08
FTP/File - Выход на ftp через шару перестал работать cahes Сетевые технологии 1 21-08-2012 09:52
CMD/BAT - Установить разрешение на шару. The_Immortal Скриптовые языки администрирования Windows 6 03-04-2012 17:34
VBS/WSH/JS - Скрипт на шару Shelm Скриптовые языки администрирования Windows 0 30-03-2012 12:01




 
Переход