Отправка почты из 1С

cdoSendPassword = "http://schemas.microsoft.com/cdo/configuration/sendpassword";
cdoSendEmailAddress = "http://schemas.microsoft.com/cdo/configuration/sendemailaddress";
cdoAutoPromoteBodyParts = "http://schemas.microsoft.com/cdo/configuration/autopromotebodyparts" ;
cdoFlushBuffersOnWrite = "http://schemas.microsoft.com/cdo/configuration/flushbufferson;write" ;
cdoHTTPCookies = "http://schemas.microsoft.com/cdo/configuration/httpcookies" ;
cdoLanguageCode = "http://schemas.microsoft.com/cdo/configuration/languagecode" ;
cdoNNTPAccountName = "http://schemas.microsoft.com/cdo/configuration/nntpaccountname" ;
cdoNNTPAuthenticate = "http://schemas.microsoft.com/cdo/configuration/nntpauthenticate" ;
cdoNNTPConnectionTimeout = "http://schemas.microsoft.com/cdo/configuration/nntpconnectiontimeout" ;
cdoNNTPServer = "http://schemas.microsoft.com/cdo/configuration/nntpserver" ;
cdoNNTPServerPickupDirectory = "http://schemas.microsoft.com/cdo/configuration/nntpserverpickupdirectory" ;
cdoNNTPServerPort = "http://schemas.microsoft.com/cdo/configuration/nntpserverport" ;
cdoNNTPUseSSL = "http://schemas.microsoft.com/cdo/configuration/nntpusessl" ;
cdoPostEmailAddress = "http://schemas.microsoft.com/cdo/configuration/postemailaddress" ;
cdoPostPassword = "http://schemas.microsoft.com/cdo/configuration/postpassword" ;
cdoPostUserName = "http://schemas.microsoft.com/cdo/configuration/postusername" ;
cdoPostUserReplyEmailAddress = "http://schemas.microsoft.com/cdo/configuration/postuserreplyemailaddress" ;
cdoPostUsingMethod = "http://schemas.microsoft.com/cdo/configuration/postusing" ;
cdoSaveSentItems = "http://schemas.microsoft.com/cdo/configuration/savesentitems" ;
cdoSendEmailAddress = "http://schemas.microsoft.com/cdo/configuration/sendemailaddress" ;
cdoSendPassword = "http://schemas.microsoft.com/cdo/configuration/sendpassword" ;
cdoSendUserName = "http://schemas.microsoft.com/cdo/configuration/sendusername" ;
cdoSendUserReplyEmailAddress = "http://schemas.microsoft.com/cdo/configuration/senduserreplyemailaddress" ;
cdoSendUsingMethod = "http://schemas.microsoft.com/cdo/configuration/sendusing" ;
cdoSMTPAccountName = "http://schemas.microsoft.com/cdo/configuration/smtpaccountname" ;
cdoSMTPAuthenticate = "http://schemas.microsoft.com/cdo/configuration/smtpauthenticate" ;
cdoSMTPConnectionTimeout = "http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout" ;
cdoSMTPServer = "http://schemas.microsoft.com/cdo/configuration/smtpserver";
cdoSMTPServerPickupDirectory = "http://schemas.microsoft.com/cdo/configuration/smtpserverpickupdirectory";
cdoSMTPServerPort = "http://schemas.microsoft.com/cdo/configuration/smtpserverport";
cdoSMTPUseSSL = "http://schemas.microsoft.com/cdo/configuration/smtpusessl";
cdoURLGetLatestVersion = "http://schemas.microsoft.com/cdo/configuration/urlgetlatestversion";
cdoURLProxyBypass = "http://schemas.microsoft.com/cdo/configuration/urlproxybypass";
cdoURLProxyServer = "http://schemas.microsoft.com/cdo/configuration/urlproxyserver";
cdoUseMessageResponseText = "http://schemas.microsoft.com/cdo/configuration/usemessageresponsetext";
Notification = "urn:schemas:mailheader:disposition-notification-to";
Receipt = "urn:schemas:mailheader:return-receipt-to";

//Set DNS options
cdoDSNDefault = 0; // No DSN commands are issued.
cdoDSNNever = 1; // No DSN commands are issued.
cdoDSNFailure = 2; // Return a DSN if delivery fails.
cdoDSNSuccess = 4; // Return a DSN if delivery succeeds.
cdoDSNDelay = 8; // Return a DSN if delivery is delayed.
cdoDSNSuccessFailOrDelay = 14;// Return a DSN if delivery succeeds, fails, or is delayed.

sFrom = "От кого";

iConf = createObject("CDO.Configuration");

iConf.fields(cdoSMTPServer).value = "smtp.gmail.com";
iConf.fields(cdoSMTPServerPort).value = "465";
iConf.fields(cdoSMTPAuthenticate).value = 1;
iConf.fields(cdoSendUserName).value = "Логин"; // Адрес эл.почты
iConf.fields(CdoSendPassword).value = "Пароль";
iConf.fields(cdoSendEmailAddress).value = "<Логин>";
iConf.fields(cdoSMTPUseSSL).value = 1; //Secure Sockets Layer
iConf.fields(cdoSendUsingMethod).value = 2;
iConf.fields.update();

iMsg=createObject("CDO.Message");
iMsg.configuration = iConf;

iMsg.fields(Notification).value = "<"+Логин+">";
iMsg.fields(Receipt).value = "<"+Логин+">"; iMsg.Fields.Update();

iMsg.to=АдресПолучатель;
iMsg.from=Откуда;
iMsg.subject=ТемаПисьма;

iMsg.textBody=ТекстПисьма;
iMsg.textBodypart.charset="windows-1251"; // "windows-1251"; //???? "iso-8859-5" "koi8-r"

Для Сч=1 По Вложение.РазмерСписка() Цикл
iMsg.addAttachment(Вложение.ПолучитьЗначение(Сч));
КонецЦикла;

iMsg.send();