Появилась задача: по расписанию отправлять сообщение с файлами на почту без использования каких-то постоянно работающих служб (исключением является системный планировщик заданий), без необходимости установки программ.
1) Скачиваем OneScript и распаковываем, например, в папку: C:\OneScript.
2) В командной строке вводим и запускаем:
C:\>set PATH=C:\OneScript\bin
C:\>C:\OneScript\bin\opm.bat install InternetMail
ИНФОРМАЦИЯ - Скачиваю файл: InternetMail.ospx
ИНФОРМАЦИЯ - Устанавливаю пакет InternetMail
ИНФОРМАЦИЯ - Установка завершена
C:\>
Средство разработки установлено.
3) Теперь пишем пример скрипта mail.os для отправки файла на почту.
#Использовать InternetMail
Пользователь = "Логин@yandex.ru";
Пароль = "Пароль";
Профиль = Новый ИнтернетПочтовыйПрофиль;
Профиль.АдресСервераSMTP = "smtp.yandex.ru";
Профиль.ПользовательSMTP = Пользователь;
Профиль.ПарольSMTP = Пароль;
Профиль.ИспользоватьSSLSMTP = Истина;
Профиль.АдресСервераIMAP = "imap.yandex.ru";
Профиль.ИспользоватьSSLIMAP = Истина;
Профиль.Пользователь = Пользователь;
Профиль.Пароль = Пароль;
Сообщение = Новый ИнтернетПочтовоеСообщение;
Сообщение.Получатели.Добавить("Логин123@mail.ru");
Сообщение.ОбратныйАдрес.Добавить("Логин321@gmail.ru");
Сообщение.Отправитель = Пользователь;
Сообщение.Тема = "Ошибка архивации!";
Текст = "
|<h3>Server is down !</h3>
|Herry up.<br/>";
Сообщение.Тексты.Добавить(Текст, ТипТекстаПочтовогоСообщения.HTML);
Сообщение.Вложения.Добавить(ИмяСпискаFTPфайлов);
Сообщение.Вложения.Добавить(
Новый ДвоичныеДанные("C:/Вложение 2.doc"),
"Вложение 2.docx");
Почта = Новый ИнтернетПочта;
Почта.Подключиться(Профиль, ПротоколИнтернетПочты.POP3);
Почта.Послать(Сообщение, , ПротоколИнтернетПочты.SMTP);
4) Запуск в командной строке: C:\OneScript\bin\oscript.exe C:\scripts\mail.os
5) Полученную строку запуска сохраняем в bat-файл и добавляем в планировщик заданий.
Готово.
Комментариев нет:
Отправить комментарий