Отправка почты через командную строку или powershell

14 Comments

1. didkovskij 02.10.2015 at 07:54

   Аналогичным образом использую blat для отправки уведомлений о наличие свободного места на серверах, их перезагрузки и т.д.

   Reply ↓
2. premierex 02.10.2015 at 09:24

   А у меня почему-то отправка из 1С 8.2 не взлетела….

   Reply ↓
3. jaroslav.h 02.10.2015 at 10:14

   (2) premier, в смысле? тут отправка через 1с-ку не описана, имелось ввиду отправка из ком.строки + повершел

   Reply ↓
4. jaroslav.h 02.10.2015 at 10:23

   (1) didkovskij, поделитесь каким образом вычисляете окончания свободного места?

   Reply ↓
5. ashvik 02.10.2015 at 11:10

   (1) Тоже интересно

   Reply ↓
6. blackhole321 04.10.2015 at 17:45

   $SMTPServer = «127.0.0.1 так как и выше, нужно использовать для отправки stunnel»

   Для использование ssl в случае PowerShell, stunnel не требуется. Используйте $SMTPClient.EnableSsl = $true
   
   https://msdn.microsoft.com/ru-ru/library/system.net.mail.smtpclient.enablessl(v=vs.110).aspx
   

   Reply ↓
7. premierex 05.10.2015 at 13:56

   (3) а какая разница какой будет почтовый клиент? Главное в этой теме то, что stunnel выполняет функцию прокси сервера с SSL шифрованием.
   
   Кстати, покопавшись в настройках, удалось-таки настроить работу с почтой через stunnel из 1С. Может, конечно, не совсем в тему публикации, но, повторюсь: в теме публикации главное — отправка почты с SSL шифрованием. А какой почтовый клиент — не важно.

   Reply ↓
8. BenjaminFranklin 05.10.2015 at 14:10

   (4) в cmd можно так
   

   FOR /F «skip=2 delims=» %a IN (‘fsutil volume diskfree c:’) DO @SET str=%a
   ECHO %str:~32%

   на выходе будет строка с числом определяющим остаток свободного места на диске с: в байтах.
   
   для МБ делим это число два раза на 1024. для ГБ три раза.

   Reply ↓
9. jaroslav.h 05.10.2015 at 22:38

   (7) premier, если вы о ССЫЛКА то где то и на этом ресурсе видел аналогичные способы

   Reply ↓
10. premierex 07.10.2015 at 09:06

    (9) да, в данном случае я об этом. И на инфостарте, кстати, тоже нашёл пример.
    
    В тему публикации: есть ещё один способ отправки электронной почты из командной строки — объект Windows CDO.Message.
    
    С его помощью также можно отправлять почту, используя шифрование. Я, например, делаю это с помощью Windows Script Host.
    
    Пишется скрипт на jscript или vbscript (я предпочитаю jscript). В него в качестве аргументов передаем параметры (в примере они объявлены как переменные, но их можно и как аргументы передавать). И так же, как описано выше, создаем задание в планировщике, где вызываем csript.exe путь_к_нашему_скрипту аргументы. Файл csript.exe находится в системном каталоге Windows, так что полный путь до него можно и не указывать.

    Reply ↓
11. le_ 07.10.2015 at 09:22

    Через CDO.Message, по-моему, удобнее и устанавливать ничего дополнительно не нужно.
    
    Вот пример с шифрованием пароля в скрипте.
    

    Set objMessage = CreateObject(«CDO.Message»)
    objMessage.Subject = «Тема сообщения»
    objMessage.From = «my_acc@gmail.com»
    objMessage.To = «my_acc@gmail.com»
    objMessage.HTMLBody = «Текст сообщения.»
    
    objMessage.Configuration.Fields.Item(«http://schemas.microsoft.com/cdo/configuration/smtpserver»).Value = «smtp.gmail.com»
    objMessage.Configuration.Fields.Item(«http://schemas.microsoft.com/cdo/configuration/smtpserverport»).Value = 465
    objMessage.Configuration.Fields.Item(«http://schemas.microsoft.com/cdo/configuration/sendusing»).Value = 2
    objMessage.Configuration.Fields.Item(«http://schemas.microsoft.com/cdo/configuration/smtpauthenticate»).Value = 1
    objMessage.Configuration.Fields.Item(«http://schemas.microsoft.com/cdo/configuration/smtpusessl»).Value = true
    objMessage.Configuration.Fields.Item(«http://schemas.microsoft.com/cdo/configuration/sendusername»).Value = «my_acc@gmail.com»
    objMessage.Configuration.Fields.Item(«http://schemas.microsoft.com/cdo/configuration/sendpassword»).Value = D(«sЎRЮ¬ЩgT», «‘njghjcnjgfhjkm»)
    
    objMessage.Configuration.Fields.Update
    
    objMessage.Send
    
    Function D(str,key)
    Dim lenKey, KeyPos, LenStr, x, Newstr
    
    Newstr = «»
    lenKey = Len(key)
    KeyPos = 1
    LenStr = Len(Str)
    
    str=StrReverse(str)
    For x = LenStr To 1 Step -1
    Newstr = Newstr & chr(asc(Mid(str,x,1)) — Asc(Mid(key,KeyPos,1)))
    KeyPos = KeyPos + 1
    If KeyPos > lenKey Then KeyPos = 1
    Next
    Newstr=StrReverse(Newstr)
    D = Newstr
    End Function

    Показать

    Reply ↓
12. jaroslav.h 07.10.2015 at 09:27

    (11) le_, отлично, пускай множество вариантов отправки будет приведено, спасибо

    Reply ↓
13. viptextil 06.05.2016 at 09:35

    Ну, тогда в комментах тоже отмечусь. Для отправки использую консольную программу отправки почты Mailsend она умеет работать по ssl без stunnel.

    Reply ↓
14. user966382 27.04.2018 at 10:53

    (11)

    //schemas.microsoft.com/cdo/configuration/sendpassword»).Value = D(«sЎRЮ¬ЩgT», «‘njghjcnjgfhjkm»)

    Я так понял что это не реальный а уже зашифрованный пароль, а как его получить чтобы вбить в эту строку?

    Reply ↓