8.х Интернет Почта в 1С8.0

Тема в разделе "Конфигурирование на платформе "1С:Предприятие 8"", создана пользователем r18romik, 21 май 2008.

  1. TopicStarter Overlay
    r18romik
    Offline

    r18romik Опытный в 1С

    Регистрация:
    19 фев 2008
    Сообщения:
    129
    Симпатии:
    0
    Баллы:
    26
    Проблема с интернет почтой...хочу организовать отправку писем при редактировании одного документа,без ведома пользователя,для этого как я понял нужно подлючиться на прямую к интернету,fа не через почтового клиента! Но не полчается чего....


    // Сформировать почтовый профиль.
    // При отправке нет необходимости указывать настройки, связанные с POP сервером.
    Профиль = Новый ИнтернетПочтовыйПрофиль;
    Профиль.АдресСервераSMTP = Константы.АдресСервераSMTP.Получить();
    Профиль.ВремяОжидания = Константы.ВремяОжидания.Получить();
    Профиль.Пароль = Константы.Пароль.Получить();
    Профиль.ПарольSMTP = Константы.ПарольSMTP.Получить();
    Профиль.Пользователь = Константы.Пользователь.Получить();
    Профиль.ПользовательSMTP = Константы.ПользовательSMTP.Получить();
    Профиль.ПортSMTP = Константы.ПортSMTP.Получить();

    // Создать сообщение.
    Сообщение = Новый ИнтернетПочтовоеСообщение;
    Сообщение.Получатели.Добавить("romik@line7.ru");
    Сообщение.Отправитель.Адрес = "romik@line7.ru";
    Сообщение.Тема = Номер;
    Сообщение.Тексты.Добавить("Доброе время суток!");

    // Подключиться и отправить.
    Почта = Новый ИнтернетПочта;
    Почта.Подключиться(Профиль);
    Почта.Послать(Сообщение);
    Почта.Отключиться();
  2. TopicStarter Overlay
    r18romik
    Offline

    r18romik Опытный в 1С

    Регистрация:
    19 фев 2008
    Сообщения:
    129
    Симпатии:
    0
    Баллы:
    26
    Всем спасибо за ответы,разобрался я:)))) Хоть ни кто и не ответил ни чего :unsure: B) :D
    Кого интересует данная тема объясню как это осуществить!!!!
  3. lazy
    Offline

    lazy Модераторы Команда форума Модератор

    Регистрация:
    1 сен 2007
    Сообщения:
    2.127
    Симпатии:
    4
    Баллы:
    29
    Ну дык, ты ж расскажи людям :)
  4. TopicStarter Overlay
    r18romik
    Offline

    r18romik Опытный в 1С

    Регистрация:
    19 фев 2008
    Сообщения:
    129
    Симпатии:
    0
    Баллы:
    26
    Для того чтобы осуществить это дело...много думать не пришлось,всё делается хитро и быстро!
    Для этого я создал Три константы..это вполне хватает для подключения к почтовому интернет серверу напрямую!
    Константы.АдресСервераSMTP.Получить();
    Константы.ПарольSMTP.Получить();
    Константы.ПользовательSMTP.Получить();
    Преимущество констант в том,что их можно редактировать в пользовательском режиме!
    Заполнил Адресс SMTP сервера (по другому POP3)
    И Пользователь и Пароль на сервер (в данном случае это является ваше имя ящика и пароль входа на него)
    Пользуйтесь!!!!
    Хорошая Штука для уведомления каких то редактированний базы и тд!

    Код:
    Профиль = Новый ИнтернетПочтовыйПрофиль; 
    Профиль.АдресСервераSMTP = Константы.АдресСервераSMTP.Получить(); 
    Профиль.ПарольSMTP = Константы.ПарольSMTP.Получить(); 
    Профиль.ПользовательSMTP = Константы.ПользовательSMTP.Получить(); 
    
    // Создать сообщение. 
    Сообщение = Новый ИнтернетПочтовоеСообщение; 
    Сообщение.Получатели.Добавить("romik@line7.ru"); 
    Сообщение.Отправитель.Адрес =("romik@line7.ru"); 
    Сообщение.Тема = ~Ваша тема~;
    Сообщение.Тексты.Добавить("~Ваш текст~");
    
    // Подключиться и отправить. 
    Почта = Новый ИнтернетПочта; 
    Почта.Подключиться(Профиль); 
    Почта.Послать(Сообщение); 
    Почта.Отключиться();
    
    PS Все кому пригодилось c того спасибо:)))
  5. LordKim
    Offline

    LordKim Опытный в 1С

    Регистрация:
    11 мар 2008
    Сообщения:
    118
    Симпатии:
    0
    Баллы:
    26
    Константами хранить логин и пасс? о_О

    Жжошь =D
  6. TopicStarter Overlay
    r18romik
    Offline

    r18romik Опытный в 1С

    Регистрация:
    19 фев 2008
    Сообщения:
    129
    Симпатии:
    0
    Баллы:
    26
    А что? У меня личная база...и просмотр и доступ к константам есть только у меня!!!!
    Да и к тому же не трудно всё это део за комментировать,если уж так надо!!!
    Да и напрямую прописать а базу не проблема...так что не вижу в этом ни чего "Жжгущего" :unsure:

Поделиться этой страницей