Компьютерный форум OSzone.net  

Компьютерный форум OSzone.net (http://forum.oszone.net/index.php)
-   Скриптовые языки администрирования Windows (http://forum.oszone.net/forumdisplay.php?f=102)
-   -   [решено] отправить по e-mail последный сформированный файл из папки (http://forum.oszone.net/showthread.php?t=218097)

HELP 16-10-2011 16:31 1774553

отправить по e-mail последный сформированный файл из папки
 
Всем привет!!! Задача такая: в папке C:\1 каждый день формируется файл *.dbf . Нужно отправить по e-mail только последный сформированный файл из папки 1. У меня получается отправлять либо все файлы, либо только какой-то один конкретный (( я с батниками и скриптами только начинаю разбираться. Такое вообще можно реализовать? если да скиньте скрипт

Anonymоus 17-10-2011 09:25 1775085

Вот вам скрипт, для его работы требуется утилита blat, скачать можно здесь.
Рядом со скриптом должны находиться blat.dll, blat.exe и blat.lib, сам скрипт обязательно сохранить в кодировке 866 DOS.

Код:

@Echo Off
:: Директория с файлами
Set WorkDir=C:\1
:: Тип файла
Set FileType=dbf
:: Получатель
Set EMail=guest@mail.ru
:: Почтовый сервер для отправки
Set Server=smtp.mail.ru
:: Логин
Set Login=script.backup@mail.ru
:: Пароль
Set Password=test123

For /F "tokens=*" %%F In ('Dir "%WorkDir%\*.%FileType%" /A:-D /B /O:-D') Do (
Set File=%%F
GoTo Jump
)
:Jump
blat.exe -server %Server% -u %Login% -pw %Password% -subject "Backup" -body " " -to %EMail% -f %Login% -attach "%WorkDir%\%File%">nul
If %ErrorLevel%==3 (Echo Невозможно прикрепить файл&Pause&Exit)
If %ErrorLevel%==2 (Echo Неверный логин\пароль&Pause&Exit)
If %ErrorLevel%==1 (Echo Сообщение отправить не удалось&Pause&Exit)
Exit


HELP 17-10-2011 20:27 1775579

Спасибо большое. Буду пробовать

HELP 17-10-2011 20:43 1775598

Работает, спасибо!


Время: 20:34.

Время: 20:34.
© OSzone.net 2001-