csFrom = СокрЛП(ОтКогоОтправить); csTO = СокрЛП(КомуОтправить); csSUBJECT = СокрЛП(ТемаПисьма); csTEXT = ТекстПисьма; Если ПустоеЗначение(Вложение) = 0 Тогда csATTACH = СокрЛП(Вложение); Иначе csATTACH = ""; КонецЕсли; Если
ВнКомпонент.ОтправитьПочтуПоSMTP(MailServer, csFrom, csTO,,, csSUBJECT,csTEXT,csATTACH) = 1 Тогда Сообщить("Электронная почта на адрес "+csTO+" отправлена!!!","!!"); Иначе Сообщить(ВнКомпонент.ОшибкаПриОтпракеПочты()); КонецЕсли КонецПроцедуры
ОтправитьПочту(БанкEMail,ОтКогоEMail,"Файл импорта ",,сКатал+сФайл);
--------- Мальчик-извращенец прочел деду Морозу с табуретки всего Пастернака!
Ответ отправил: Strawberry (статус: Студент)
Ответ отправлен: 18.09.2008, 15:25 Оценка за ответ: 5
Отвечает: DERL.KG
Здравствуйте, Оксана/kasy! Я использую внешнюю компоненту ROM-Mail.dll. Данная компонента работает независимо как почтовый клиент, в отличии от встроенного который подгружает Аутлук. код см в приложении Удачи!
Приложение:
Ответ отправил: DERL.KG (статус: 9-ый класс)
Ответ отправлен: 19.09.2008, 07:34 Оценка за ответ: 5
Отвечает: Астафьев Александр Николаевич
Здравствуйте, Оксана/kasy! Работает на стандартной компоненте V7 1С Предприятие 7.7 Удачи
Приложение:
Ответ отправил: Астафьев Александр Николаевич (статус: Студент)
Ответ отправлен: 19.09.2008, 08:54 Оценка за ответ: 5
Вы имеете возможность оценить этот выпуск рассылки. Нам очень важно Ваше мнение!
* Код программы, выдержки из закона и т.п. дополнение к вопросу.
Эта информация будет отображена в аналогичном окне как есть.
Обратите внимание!
Вопрос будет отправлен всем экспертам данной рассылки!
Для того, чтобы отправить вопрос выбранным экспертам этой рассылки или
экспертам другой рассылки портала RusFAQ.ru, зайдите непосредственно на RusFAQ.ru.
Форма НЕ работает в почтовых программах The BAT! и MS Outlook (кроме версии 2003+)!
Чтобы отправить вопрос, откройте это письмо в браузере или зайдите на сайт RusFAQ.ru.