Как можно отправит  почту крытно от пользователя из 8.1? скажем через почтовик бесплатный mail.ru?



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


Функция ОтправитьПисьмо (Письмо, МассивАдресов, Ссылка, ТекущаяЗадача, РегистрироватьОшибки = Истина) Экспорт
   
   Если не Константы.ИспользоватьУведомления.Получить() Тогда
       Возврат Ложь;
   КонецЕсли;
   
   Если СокрЛП(Константы.ОтключатьДоставкуПриУсловии.Получить()) = "" Тогда
       Возврат Ложь;
   КонецЕсли;
   
   Если СокрЛП(Константы.ОтключатьДоставкуПриУсловии.Получить()) <> "" Тогда
       Если ВРЕГ(СокрЛП(Константы.ОтключатьДоставкуПриУсловии.Получить())) <> ВРЕГ(СтрокаСоединенияИнформационнойБазы())  Тогда
           Возврат Ложь;
       КонецЕсли;
   КонецЕсли;
   
   Если МассивАдресов.Количество() = 0 Тогда
       Возврат Ложь;
   КонецЕсли;
   
   
   Попытка
       ТемаПисьма         = СобратьЭлементПочтовогоСообщения(Письмо.Тема, Ссылка, ТекущаяЗадача);
       СообщениеПисьма = СобратьЭлементПочтовогоСообщения(Письмо.Сообщение, Ссылка, ТекущаяЗадача);
       
       Профиль = Новый ИнтернетПочтовыйПрофиль;
       Профиль.АдресСервераSMTP     = Константы.АдресСервераSMTP.Получить();
       Профиль.АутентификацияSMTP  = СпособSMTPАутентификации[Константы.СпособSMTPАутентификацииК.Получить()];
       Профиль.АдресСервераPOP3     = Константы.АдресСервераPOP3.Получить();
       Профиль.АутентификацияPOP3  = СпособPOP3Аутентификации[Константы.СпособPOP3АутентификацииК.Получить()];
       Профиль.ПортSMTP             = Константы.ПортSMTP.Получить();
       Профиль.ПортPOP3             = Константы.ПортPOP3.Получить();
       Профиль.Пользователь         = Константы.Пользователь.Получить();
       Профиль.Пароль                 = Константы.Пароль.Получить();
       Профиль.ПользовательSMTP     = Константы.Пользователь.Получить();
       Профиль.ПарольSMTP             = Константы.Пароль.Получить();
       
       Сообщение = Новый ИнтернетПочтовоеСообщение;
       Сообщение.Тема             = ТемаПисьма;
       Сообщение.Отправитель     = Константы.СистемнаяПочта.Получить();
       
       ТипСообщения = ТипТекстаПочтовогоСообщения[Константы.ТипПочтовыхУведомлений.Получить()];
       Если ТипСообщения = Неопределено Тогда        
           ТипСообщения = ТипТекстаПочтовогоСообщения.ПростойТекст;
       КонецЕсли;
       
       Для Каждого Почтовый______________Адрес из МассивАдресов Цикл
           Сообщение.Получатели.Добавить(Почтовый______________Адрес );
       КонецЦикла;
       Сообщение.Тексты.Добавить(СообщениеПисьма, ТипСообщения);
       
       Почта = Новый ИнтернетПочта;
       Почта.Подключиться(Профиль);
       Почта.Послать(Сообщение);
       Почта.Отключиться();
   Исключение
       
       Если РегистрироватьОшибки Тогда
           Запись = РегистрыСведений.ОшибкиДоставкиПочты.СоздатьМенеджерЗаписи();
           Запись.СписокОтправки     = ЗначениеВСтрокуВнутр(МассивАдресов);
           Запись.ОписаниеОшибки     = ОписаниеОшибки();
           Запись.БизнесПроцесс     = Ссылка;
           Запись.Задача           = ТекущаяЗадача;
           Запись.ШаблонПисьма     = Письмо;
           Запись.Записать();
       КонецЕсли;
       
       Возврат Ложь;
   КонецПопытки;
   
   Возврат Истина;
КонецФункции

а адрес где бить и порты?

а если конфа самописная?никаких констант и регистров из примера..

(3) Справочник УчетныеЗаписиЭлектроннойПочты есть? Вот туда бей :)

OFF: на тему слова "скрытно":
Как, как... программно разумеется - это и есть "скрытно"...
Если сами в алгоритме об этом пользователю не будете трезвонить, он и не догадается. Особенно если регламентным заданием воспользуетесь - оно вообще на сервере выполняется :)

(5) Я же говорю-конфа самописная, таэ этого справочника нет...

посмотреть как сделано в несамописной.

Самописная? Религия не поволяет использовать типовой функционал? Совсем плохо :))

Да нет, просто конфу маленькую наваял, нужна простая обработа по отправке почты...Конфа то-3 документа, 2 регистра:)))

(9) не поверишь, но пример (2) то-же из маленькой самописной конфы.

делай всегда сразу нормальные механизмы!

попробовал вот так-

Процедура ОтправитьПисьмо() Экспорт
   Кому="tilchik@mail.ru";
   Копия="";
   СкрКопия="";
   Вложения="";
   Тема="tilchik";
   Текст="tilchik";
АдресСервераSMTP="smtp.mail.ru";
       ПортSMTP=25;
       ПользовательSMTP="tilchik@mail.ru";
       ПарольSMTP="pass";
       УведомитьОДоставке=Истина;
       ИПП=Новый ИнтернетПочтовыйПрофиль;
       ИПП.АдресСервераSMTP="smtp.mail.ru";
       ИПП.ПортSMTP=2525;
       ИПП.ПользовательSMTP="tilchik@mail.ru";
       ИПП.ПарольSMTP="pass";
       Письмо=Новый ИнтернетПочтовоеСообщение;
       Письмо.Получатели.Добавить("tilchik@mail.ru");
       Письмо.Тема="tilchik";
       Письмо.Тексты.Добавить("tilchik");
       Письмо.УведомитьОДоставке=УведомитьОДоставке;
       Почта=Новый ИнтернетПочта;
       Почта.Подключиться(ИПП);
       Почта.Послать(Письмо);
       Почта.Отключиться();
КонецПроцедуры


все равно не может подключиться...

(11) ты свой код хоть читаешь ?
ИПП.ПортSMTP=2525;

я по разному пробовал- и 25 и 2525 и 587- с сайта mail.ru настройки взял...все равно..

ап

Из др почтовика работает?

из какого например?...я не пробовал...

OutlookExpress например.

(16) да хоть telnet-ом

мне надо чтобы пользователь не видел что у него письмо уходит

я вот думаю что может быть что нибудь со способом аудентификации.....я нашел оператор-

ИПП.АутентификацияSMTP=СпособSMTPАутентификации.Login;

тоже не канает:(;

(19) чтобы проверить настройки

(20) -
Mail.Ru:
<В настройках почтовой программы необходимо указать,  что сервер исходящей почты (или сервер SMTP) требует авторизации. При отправке писем через наш SMTP-сервер содержимое поля From: должно совпадать с именем почтового ящика, в котором была осуществлена SMTP-авторизация: если в настройках почтовой программы указан почтовый ящик mailname@mail.ru  ( listname@list.ru,  bkname@bk.ru или inboxname@inbox.ru), то именно это имя почтового ящика должно указываться в поле From:.>

ИнтернетПочтовоеСообщение (InternetMailMessage)
Отправитель (From)
Использование:
Чтение и запись.
Описание:
Тип: Строка адреса, ИнтернетПочтовыйАдрес. Отправитель сообщения.

а у меня что не так я не пойму?

Отправитель не указан

а тгде мне его вставить?

Письмо.Отправитель="tilchik@mail.ru";

блин:( точно:(...все нормально. заработало:)) спасибо

зря радовался работает через раз- одна попыток из 6-10....может рановато жму-сессия еще не отвалилась?В коде то ничего сложного...

       ИПП=Новый ИнтернетПочтовыйПрофиль;
       ИПП.АдресСервераSMTP="smtp.mail.ru";
       ИПП.ПортSMTP=2525;
       ИПП.ПользовательSMTP="tilchik@mail.ru";
       ИПП.ПарольSMTP="pass";
       ИПП.АутентификацияSMTP=СпособSMTPАутентификации.ПоУмолчанию;
       Письмо=Новый ИнтернетПочтовоеСообщение;
       Письмо.Отправитель="tilchik@mail.ru";
       Письмо.Получатели.Добавить(Получатель);
       Письмо.Тема="tilchik";
       Письмо.Тексты.Добавить("tilchik");
       Почта=Новый ИнтернетПочта;
       Почта.Подключиться(ИПП);
       Почта.Послать(Письмо);
       Почта.Отключиться();

апчик

Вообще то, я остановился на внешнем почтовом клиенте. 1С подготовила слила внешнему почтовому клиенте и пользователь работает дальше,а при прямой отправке и проблемами с Инетом все виснет и пользователи начинают перегружать 1С, компы,

есть пример?

ИПП.АутентификацияSMTP=СпособSMTPАутентификации.Login;

(32)-спасибо, работает