Главная » Файлы » Программируем в 1С » 1С и E-mail |
Скачивать материалы с сайта, могут только зарегистрированные пользователи.
Для регистрации заполните два поля ниже!
Через минуту Вы получите "Гостевой доступ"
Отправка писем и получение электронной почты с использованием SSL
2009 Январь 13, 10:32 | |
Отправка писем и получение электронной почты с использованием SSL
Внешняя компонента для 1С: Предприятие 8.0, 1С: Бухгалтерия 7.7, 1С: Торговля и склад 7.7, 1С: Зарплата и кадры 7.7, 1С: Предприятие 8.1
Отправляет и получает письма по эл. почте, с серверов, которые используют шифрование SSL (gmail.com и др.)
*** Для работы компоненты потребуется установленный Microsoft .NET Framework 2.0, который можно скачать отсюда.
http://www.microsoft.com/downloads/details.aspx?displaylang=ru&FamilyID=0856eacb-4362-4b0d-8edd-aab15c5e04f5 и зарегистрировать компоненту в Windows - запустить reg.bat *** Подключение:
Перем Почта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.УдалитьСообщение(НомерСообщения); | |
Просмотров: 8093 | Загрузок: 267 | Комментарии: 1 | |
Выразить благодарность - Поделиться с друзьями!
Всего комментариев: 0 | |