Функция ОтправкаПоПочте_ВБС(ВложениеПисьма, АдресПолучателя, ТемаПисьма, ТекстПисьма = "") Экспорт
Попытка
loConfig = CreateObject("CDO.Configuration");
loCdoMessage = CreateObject("CDO.Message");
loCdoMessage.Configuration = loConfig;
loCdoMessage.From = "web@domenname.ru";
loCdoMessage.To = АдресПолучателя;
loCdoMessage.Subject = ТемаПисьма;
loCdoMessage.textbody = "";
loCdoMessage.AddAttachment(ВложениеПисьма);
loConfig.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver").Value = "192.168.0.1";
loConfig.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate").Value = 1;
loConfig.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword").Value = "Pasword";
loConfig.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout").Value = 60;
loConfig.Fields.Update();
loCdoMessage.Send();
Возврат 1;
Исключение
Возврат 0;
КонецПопытки;
КонецФункции
Отправка почты с использованием CDO-компоненты (встроенная в Win2K и выше)
К сайту microsoft.com не обращается.
См. также
Отправка счет-договора по email 1С 7.7 ТиС с помощью Python
1 стартмани
23.12.2022 5414 1 Drfreeman 5
Отправляем почтой печатную форму любого документа (в формате xls)
1 стартмани
01.11.2022 2534 5 Sancha 6
Обработка отправки документов по почте напрямую из 1С7.7 в файле EXCEL
1 стартмани
16.11.2014 39707 101 etmarket 20