*** Для работы компоненты потребуется установленный Microsoft .NET Framework 2.0, который можно скачать отсюда.
http://www.microsoft.com/downloads/details.aspx?displaylang=ru&FamilyID=0856eacb-4362-4b0d-8edd-aab15c5e04f5
и зарегистрировать компоненту в Windows - запустить reg.bat
или использовать совместно с хранилищем внешних компонент: //infostart.ru/projects/2863/
*** Подключение:
http://www.microsoft.com/downloads/details.aspx?displaylang=ru&FamilyID=0856eacb-4362-4b0d-8edd-aab15c5e04f5
и зарегистрировать компоненту в Windows - запустить reg.bat
или использовать совместно с хранилищем внешних компонент: //infostart.ru/projects/2863/
*** Подключение:
Перем ПочтаSSL;
//ПОДКЛЮЧЕНИЕ КОМПОНЕНТЫ В 1С 7.7:
ИмяВК="AddIn.MailSSL";
Попытка
ПодключитьВнешнююКомпоненту(ИмяВК);
Исключение
Сообщить("Не удалось подключить компоненту "+ИмяВК);
КонецПопытки;
Попытка
ПочтаSSL = СоздатьОбъект(ИмяВК);
Исключение
Сообщить("Ошибка создания объекта внешней компоненты: "+ ИмяВК);
КонецПопытки;
//ПОДКЛЮЧЕНИЕ КОМПОНЕНТЫ В 1С 8.x:
ИмяВК="AddIn.MailSSL";
Попытка
ПодключитьВнешнююКомпоненту(ИмяВК);
Исключение
Предупреждение("Не удалось подключить компоненту " + ИмяВК);
КонецПопытки;
Попытка
ПочтаSSL = Новый(ИмяВК);
Исключение
Предупреждение("Ошибка создания объекта внешней компоненты: " + ИмяВК);
КонецПопытки;
//*** Свойства:
//SMTP:
ПочтаSSL.SmtpСервер = "smtp.gmail.com";
ПочтаSSL.SmtpПорт = "465";
ПочтаSSL.SmtpПользователь = "userID@gmail.com";
ПочтаSSL.SmtpПароль = "mysuperpassword";
//POP3:
ПочтаSSL.Pop3Сервер = "pop.gmail.com";
ПочтаSSL.Pop3Порт = "995";
ПочтаSSL.Pop3Пользователь = "userID@gmail.com";
ПочтаSSL.Pop3Пароль = "mysuperpassword";
//*** Методы:
//ОТПРАВИТЬ:
ПочтаSSL.Отправить(ОтКого, Кому, CC, BCC, ТемаСообщения, ТекстСообщения, ФайлыДляОтправки);
//ФайлыДляОтправки - строка, в которой пути к файлам разделены символом |
//ПОЛУЧИТЬ:
ПочтаSSL.ПроверитьПочту(); //возвращает число писем
ПочтаSSL.ПолучитьСообщение(НомерСообщения); //булево
ПочтаSSL.ПолучитьВложение(НомерСообщения, НомерВложения, КаталогКудаСохранять); //булево
//УДАЛИТЬ:
ПочтаSSL.УдалитьСообщение(НомерСообщения);
Вступайте в нашу телеграмм-группу Инфостарт