Дата:2013-03-29
'Скрипт VBS для отправки почты
Set objMes = CreateObject("CDO.Message")
'Почтовы сервер или IP адрес
objMes.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver")
= "домен.ru"
'Порт сервера SMTP
objMes.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport")
= 25
'1 означает, что используется базовая аутентификация
'0 – без аутентификации
'2 – аутентификация NTLM
objMes.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate")
= 1
'Имя пользователя
objMes.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusername")
= "пользователь@домен.ru"
'Пароль
objMes.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword")
= "Ваш_Пароль"
objMes.Configuration.Fields.Update
objMes.From = "пользователь@домен.ru" 'От кого письмо
objMes.To = "пользователь@домен.ru" ' Кому письмо
objMes.Subject = "Тема" 'Тема письма
objMes.Textbody = "Тело письма" 'Что будет в теле письма
objMes.AddAttachment "C:\tmp\1.txt" 'Прикрепляем файл
objMes.Send
Количество просмотров: 11185
Комментарии к статье:
Добрый вечер! Никак не получается отправить сообщение с помощью скрипта
Ошибка - строка 20, символ 1. (objMes.Send). Пишет: недопустимое значение конфигурации SendUsing (источник SDO.message.1)
>>Bro. нет файла 1.txt в папке tmp
Добавить комментарий
Автор комментария: artem
Дата: 2018-04-22
Ошибка - строка 20, символ 1. (objMes.Send). Пишет: недопустимое значение конфигурации SendUsing (источник SDO.message.1) - прикрепление файла вовсе убрал