Имя пользователя:
Пароль:
 

Название темы: Кодировка в письме
Показать сообщение отдельно

Пользователь


Сообщения: 74
Благодарности: 0

Профиль | Отправить PM | Цитировать


такой вариант не подойдет?

Код: Выделить весь код
$SmtpServer = "smtp.123.ru"    ; адрес SMTP сервера
$Port = "25"                  ; Порт SMTP сервера
$FromAddress = "123l@123.ru"   ; адрес отправителя
$ToAddress = "123@123.ru"     ; адрес назначения
$Subject = """текст"""    ; тема письма
$Body = """Текст"""    ; тело письма (сам текст письм
$AttachFiles = "temp.txt"  
$ToCopy    = ""  
$Username = "123@123.ru"      ; имя пользователя аккаунта, с которого отправляется
$Password = "123"               ; Пароль
      
      $objSMTPmail = ObjCreate("CDO.Message")
      $objSMTPmail.From = $FromAddress
      $objSMTPmail.To = $ToAddress
      $objSMTPmail.Cc = $ToCopy      
      $objSMTPmail.Subject = $Subject
      $objSMTPmail.Textbody = $Body
      $objSMTPmail.BodyPart.Charset = "utf-8"
      $objSMTPmail.AddAttachment ($AttachFiles)
      $objSMTPmail.Configuration.Fields.Item _
    ("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
$objSMTPmail.Configuration.Fields.Item _
    ("http://schemas.microsoft.com/cdo/configuration/smtpserver") =  $SMTPSERVER
$objSMTPmail.Configuration.Fields.Item _
    ("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = $SMTPPORT
$objSMTPmail.Configuration.Fields.Item _
    ("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1   
$objSMTPmail.Configuration.Fields.Item _
    ("http://schemas.microsoft.com/cdo/configuration/sendusername") = $Username
$objSMTPmail.Configuration.Fields.Item _
    ("http://schemas.microsoft.com/cdo/configuration/sendpassword") = $Password
$objSMTPmail.Configuration.Fields.Update
$objSMTPmail.Send

Отправлено: 16:20, 17-09-2013 | #10

Название темы: Кодировка в письме