CDOConfig = СоздатьОбъект("CDO.Configuration");
CDOMessage = СоздатьОбъект("CDO.Message");
CDOConfig.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing").Value = 2;
CDOConfig.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver").Value = <Имя SMTP-сервера>; // smtp.mail.ru
CDOConfig.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport").Value = <Порт SMTP-сервера>; // 25
CDOConfig.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate").Value = 1;
CDOConfig.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusername").Value = <Валидный почтовый ящик>; //
[email protected]
CDOConfig.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword").Value = <Пароль к этому валидному ящику>; // 123
CDOConfig.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpusessl").Value = 0;
CDOConfig.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout").Value = 60;
CDOConfig.Fields.Update();
CDOMessage.Configuration = CDOConfig;
CDOMessage.From = <Почтовый адрес чтоб юзер видел от кого письмо>; //
[email protected]
CDOMessage.To = <Почтовый адрес куда отправить>; //
[email protected]
CDOMessage.Subject = <Тема письма>; // "Отправлено из 1С"
CDOMessage.TextBody = <Тело письма>; // "Сообщение сформировано автоматически
CDOMessage.AddAttachment(<Путь к твоему xls-файлу>); // "c:\Отчет.xls"
CDOMessage.Send();
как то так