Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
22 ноя 2024, 05:56

программное отправление писем

Автор agusikdeon, 26 дек 2012, 22:50

0 Пользователей и 1 гость просматривают эту тему.

agusikdeon

отправляю письма програмно следующим алгоритмом.





Процедура КнопкаВыполнитьНажатие(Кнопка)
   //для получения доступа к набору свойств для соединения с сервером
    //создадим новый объект
    Профиль = Новый ИнтернетПочтовыйПрофиль;
   
    //Пропишем параметры соединения
    //ip адрес или имя SMTP сервера
    Профиль.АдресСервераSMTP = "smtp.mail.ru";
   
    //Порт SMTP сервера
    Профиль.ПортSMTP = 25;
   
   
   Профиль.АутентификацияSMTP     = СпособSMTPАутентификации.Login;
   Профиль.ПарольSMTP           = "14gu0291";
   Профиль.ПользовательSMTP     = "agusik@mail.ru";


    //Имя пользователя почтового ящика
    Профиль.Пользователь = "agusik";
   
    //Пароль доступа к почтовому ящику
    Профиль.Пароль = "14gu0291";
   
    //При необходимости добавляем аутентификацию
      //
    // Создаем объект для работы с почтой
    Почта = Новый ИнтернетПочта;
   
    //Выполняем подключение, согласно указанный параметров
    Попытка
        Почта.Подключиться(Профиль);
    Исключение
        //При подключении возникла ошибка, сообщим
        Сообщить("Ошибка при подключении к серверу" + ОписаниеОшибки());
        Возврат;
    КонецПопытки;
   
    //Создаем новое письмо (сообщение)
    Сообщение = Новый ИнтернетПочтовоеСообщение;
   
    //Указываем отправителя
    Сообщение.Отправитель = "agusik@mail.ru";
   
    //Заполняем получателя
    Сообщение.Получатели.Добавить("agusik@mail.ru");
   
    //Пишем тему письма
    Сообщение.Тема = "Тема";
   
    //Формируем текст письма,указываем тип письма
    Сообщение.Тексты.Добавить("Привет",ТипТекстаПочтовогоСообщения.HTML);
   
    //При необходимости делаем вложение с файлом
    Сообщение.Вложения.Добавить("C:\Users\Андрей\Desktop\Рабочий стол\кулишова рабочие документы\sklad(заказ у партнера).xls");
   
    //Непосредственно отправка сообщения
    Почта.Послать(Сообщение);
   
    //После отправки закрываем соединение
    Почта.Отключиться();
   
КонецПроцедуры




а как сделать чтобы это отправленное письмо сохранялось на сервере в отправленных?


MuI_I_Ika

А не зависит ли это от настроек самого сервера?

x3m888

Добрый день! Другой вопрос по поводу работы ИнтернетПочта. Как справиться с прокси? Есть обработка загружает данные с ящика яндекса. В организациях где настроено прокси эта обработка не работает. И у ИнтернетПочта нет ничего связанного с прокси. Кто сталкивался? Как решили?

Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск