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

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

Ответить
Настройки темы
Любой язык - [решено] Автоматическая отправка файлов на почтовый ящик

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


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

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


Изменения
Автор: shaman18
Дата: 30-10-2018
Всем Добрый вечер!
Подскажите пожалуйста, может у кого есть готовый батник для автоматической отправки файлов на почтовый ящик посредством windows ,,,
вроде всё просмотрел но нет на форуме именно этого, если есть не пинайте, просто подскажите
вот что то типа этого , но этот написан на VBA для Excel и не получается переделать чтобы работал, а вернее не силён сделать это

Скрытый текст
Dim o_Mess, v_Conf
v_Conf = "http://schemas.microsoft.com/cdo/configuration/"
Set o_Mess = CreateObject("CDO.Message")
With o_Mess
.To = "support@apple.com" 'куда отправляем
.From = "Alex <xxx@yandex.ru>" 'имя отправителя + Email
.Subject = "Subj" 'Тема письма
.TextBody = "BodyMail" 'Сообщение
.AddAttachment "C:\RemoveDrive.exe" 'Прикрепить файл
.TextBodyPart.Charset = "windows-1251" 'русская кодировка
With .Configuration.Fields
.Item(v_Conf & "sendusing") = 2 'без использования каталога Server Exchange
.Item(v_Conf & "smtpserver") = "smtp.yandex.ru" 'Адрес SMTP-сервера
.Item(v_Conf & "smtpauthenticate") = 1 'Тип авторизации
.Item(v_Conf & "sendusername") = "xxx" 'здесь имя пользователя без @
.Item(v_Conf & "sendpassword") = "pass" 'пароль
.Item(v_Conf & "smtpserverport") = 25 'порт (альтернативный - 465)
.Item(v_Conf & "smtpusessl") = False 'использовать ли шифрованое подключение SSL
.Item(v_Conf & "smtpconnectiontimeout") = 60 'Время до завершения повторных попыток подключения
.Update
End With
.send
End With
Set o_Mess = Nothing

Отправлено: 20:15, 30-10-2018

 

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


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

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


Цитата Iska:
Цитата shaman18:
E:\Винда>With WScript.CreateObject("Scripting.FileSystemObject")
"With" не является внутренней или внешней
командой, исполняемой программой или пакетным файлом.
Непредвиденное появление: Then.
E:\Винда> IF .FileExists(strSourceFile) Then »
Это скрипт WSH. Сохраните код в файл с расширением .vbs.
Цитата shaman18:
и расширения файлов это rar, zip, будет а также .dt
тут вижу .txt может поэтому не срабатывает »
Указывайте вместо «C:\Мои проекты\0135\Sample.txt» полный путь к Вашему файлу. Если будет несколько файлов — перечислите здесь их полные пути, я адаптирую код. »
Эту ошибку увидел с помощью проги Dr.Batcher
по поводу пути файла вроде полностью указан strSourceFile = "d:\TORRENTS\Исправление шрифтов\Новая папка\themify-icons-font.zip"

Сильно не ругайте это как сделать Это скрипт WSH. Сохраните код в файл с расширением .vbs.
p.s блин торможу, сохранил в .vbs но тогда запускаю и тишина, ни ошибок ничего
и походу даже незапускается

Последний раз редактировалось shaman18, 30-10-2018 в 22:31.


Отправлено: 22:21, 30-10-2018 | #11



Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети.

Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля.


Ветеран


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

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


Цитата shaman18:
Сильно не ругайте это как сделать Это скрипт WSH. Сохраните код в файл с расширением .vbs. »
Выделить код скрипта на форуме. Переключить язык ввода на русский. Скопировать выделенный код в буфер обмена. Нажать Win-R, ввести notepad.exe, нажать Enter. В открывшееся окно Блокнота вставить из буфера обмена ранее скопированный код. Сохранить содержимое Блокнота в файл под потребным именем с расширением .vbs в потребный каталог.
Это сообщение посчитали полезным следующие участники:

Отправлено: 22:26, 30-10-2018 | #12


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


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

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


ой блин, всё давно работает почту тупо не проверил, но так быстро всё происходит что даже незаметно

Спасибо тебе Большое за помощь!
Очень помог, сейчас попробую большие файлы,
и еще через планировщик можно же будет запускать это задание?

Отправлено: 22:38, 30-10-2018 | #13


Ветеран


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

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


Цитата shaman18:
сейчас попробую большие файлы, »
Имейте в виду, что на большинстве бесплатных почтовых серверов тупо стоит ограничение на максимальный объём вложений.

Цитата shaman18:
через планировщик можно же будет запускать это задание? »
Разумеется. "%SystemRoot%\System32\wscript.exe" в качестве исполняемого файла и путь к сохранённому файлу скрипта как аргумент.
Это сообщение посчитали полезным следующие участники:

Отправлено: 23:12, 30-10-2018 | #14


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


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

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


Цитата Iska:
Имейте в виду, что на большинстве бесплатных почтовых серверов тупо стоит ограничение на максимальный объём вложений. »
попробовал сейчас 270 метров , пока жду, вот плохо что не видно что происходит и лога нет ушел файл или нет,,
и проверь пожалуйста личку

Цитата Iska:
Разумеется. "%SystemRoot%\System32\wscript.exe" в качестве исполняемого файла и путь к сохранённому файлу скрипта как аргумент. »
мне в определенное время надо будет запускать этот скрипт

p.s. по ходу большие файлы он не отправляет , до сих пор жду, на почте нет может .dt файлы не хочет?

Последний раз редактировалось shaman18, 30-10-2018 в 23:34.


Отправлено: 23:17, 30-10-2018 | #15


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


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

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


Изображения
Тип файла: jpg Ошибка.jpg
(24.8 Kb, 5 просмотров)

p.s.2 ну вот попробовал в rar. отправить файл и выскочила ошибка, можно как то подправить это дело??

Отправлено: 23:44, 30-10-2018 | #16


Ветеран


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

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


Полагаю, что нет. Ошибка при попытке отправки. Либо ограничение сервера, либо сама библтотека не может отправить такой большой файл. Попробуйте аккаунты на yandex, на google.

В крайнем случае с такими размерами можете попробовать пользовать простое копирование на Яндекс.Диск посредством WebDAV.

Отправлено: 23:53, 30-10-2018 | #17


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


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

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


Цитата Iska:
Либо ограничение сервера, либо сама библтотека не может отправить такой большой файл »
А как узнать библиотека это не дает или сервер, хотя тупо если закинуть на почту то всё отправляет

Отправлено: 23:58, 30-10-2018 | #18


Ветеран


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

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


Цитата shaman18:
хотя тупо если закинуть на почту то всё отправляет »
Да ну? Разве Mail.RU при создании письма с таким большим файлом не помещает его в своё облако, прикладывая к письму ссылку, в результате чего конечный получатель видит «…Вы можете загрузить данный файл по ссылке из облака до такой-то даты»?
Это сообщение посчитали полезным следующие участники:

Отправлено: 00:08, 31-10-2018 | #19


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


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

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


Цитата Iska:
простое копирование на Яндекс.Диск посредством WebDAV. »
за эту подсказку Большое Спасибо!

Цитата Iska:
Да ну? Разве Mail.RU при создании письма с таким большим файлом не помещает его в своё облако, прикладывая к письму ссылку, в результате чего конечный получатель видит «…Вы можете загрузить данный файл по ссылке из облака до такой-то даты»? »
Нет у меня такого, тупо закидываю файл на почту при создании , и получатель не видит такой надписи , сейчас еще раз попробую сам себе закинуть посредством почты, почтовики на mail.ru


p.s 2 Да ты был прав никогда внимания просто не обращал 152 МБ Скачать (ссылка доступна до 30 ноября 2018, 0:16)

Последний раз редактировалось shaman18, 31-10-2018 в 01:44.


Отправлено: 00:08, 31-10-2018 | #20



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

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

Похожие темы
Название темы Автор Информация о форуме Ответов Последнее сообщение
Автоматическая отправка файлов из локального каталога на FTP __sa__nya Хочу все знать 5 09-03-2015 09:19
CMD/BAT - Отправка файла в браузере IE через яндекс-почту sov44 Скриптовые языки администрирования Windows 9 24-06-2014 20:28
CMD/BAT - Удаление непарных файлов в увеличением в фильтре и отправка по почте через Blat NemoSUN Скриптовые языки администрирования Windows 10 29-05-2013 14:17
VBS/WSH/JS - запаковка файлов и отправка архива на почту Anufriev Скриптовые языки администрирования Windows 5 29-10-2012 07:11
отправка файлов через инет Bagle Программное обеспечение Windows 0 22-05-2008 13:14




 
Переход