"Доброго дня! Обработка отправки файла через компоненту ROM-mail не отправляет письмо, если присутствует "Вложения", если же убрать, тогда отправляет без проблем<br>вот код:<br><br>Процедура Отправить(ИмяФайла,Тема)<br> <br> //Пытаемся подключить компоненту. она должна находится в каталоге программы или каталоге базы<br> Если ЗагрузитьВнешнююКомпоненту("ROM-Mail.dll")=0 Тогда<br> Сообщить("Не удалось загрузить внешнюю компоненту ROM-Mail.dll");<br> Возврат;<br> Конецесли; <br> <br> //Подключаемся к почте с указанными параметрами<br> Почта = СоздатьОбъект("AddIn.AddInMail"); <br> Почта.СерверОтправки = "smtp.mail.ru";<br> Почта.ПортОтправки = "2525"; <br> Почта.Логин = "хххххх@mail.ru"; //при необходимости<br> Почта.Пароль = "ххххх";//при необходимости<br> <br> <br> //Если подключение не удачное прерываем обработку<br> Если Почта.Соединение = 0 Тогда<br> Если Почта.Подключиться("Отправка")=0 Тогда<br> Сообщить("Не удалось подключиться к почтовому серверу","!");<br> Возврат;<br> Конецесли;<br> Конецесли; <br> <br> //Формируем сообщение<br> Почта.Важность = 0;<br> Почта.Кодировка = "windows-1251";<br> Почта.АдресОтправителя = "хххххххх@mail.ru"; <br> Почта.ИмяОтправителя = "кое-кто";<br> <br> //указываем получателей письма<br> Почта.ДобавитьАдрес("АдресПолучателя","""",СокрЛП(Кому)); //кому - это реквизит на форме<br> <br> //если необходимо добавляем вложения<br> Почта.Вложения = ИмяФайла;//************************* ВОТ ЭТА СТРОКА!!!!!!!!!!<br> <br> Почта.Тема = Тема;<br> Почта.Тело = """"; <br> <br> //Пытаемся отправить<br> Если Почта.Соединение=0 Тогда<br> Сообщить("Соединение потеряно","!");<br> ИначеЕсли Почта.Отправить()=1 Тогда<br> Сообщить("Почтовое сообщение отправлено","i");<br> Иначе<br> Сообщить("Не удалось отправить сообщение","!");<br> Конецесли; <br> <br> //Отключаемся<br> Почта.Отключиться();<br>КонецПроцедуры "