Как я могу отправить электронное письмо из сценария VBS - PullRequest
Новая
       29

Как я могу отправить электронное письмо из сценария VBS

2 голосов
/ 06 марта 2010

Как я могу отправить электронное письмо из сценария vbs - на компьютере, который не может подключиться к Интернету (он находится в моей зоне, не связанной с Интернетом).

Я взломал следующее из моего поиска в Google, но, похоже, требуется звонок на сервер Microsoft. Как насчет ситуации, когда я не могу связаться с microsoft.com?

sch = "http://schemas.microsoft.com/cdo/configuration/" 

Set cdoConfig = CreateObject("CDO.Configuration") 

With cdoConfig.Fields 
    .Item(sch & "sendusing") = 2 ''cdoSendUsingPort 
    .Item(sch & "smtpserver") = "my_internal_mail_server"
    .update 
End With 

Set objEmail = CreateObject("CDO.Message")
set objEmail.configuration = cdoConfig
objEmail.From = "me@example.com"
objEmail.To = "me@example.com"
objEmail.Subject = "Server is down!"
objEmail.Textbody = "Run out the guns!!!"
objEmail.Send

MsgBox "Script Complete"

(у меня есть внутренний SMTP-сервер ... проблема заключается в опросе MS-сервера)

Ответы [ 3 ]

3 голосов
/ 06 марта 2010

Вам нужен SMTP-сервер, доступный из того места, где будет запускаться ваш скрипт, который знает, как отправить электронное письмо туда, куда ему нужно перейти.Вы можете настроить IIS или Exchange для выполнения SMTP (или любого количества проектов с открытым исходным кодом), но его необходимо настроить, чтобы он мог ретранслировать электронную почту туда, куда он должен идти.

РЕДАКТИРОВАТЬ: я находился подСоздается впечатление, что схема была просто пространством имен для полей конфигурации, а не тем, что она на самом деле пыталась загрузить с сервера Microsoft.Когда вы запустите его, присвоив ему свое внутреннее имя SMTP-сервера, что произойдет?Вы получаете ошибку?

0 голосов
/ 06 мая 2012

Я нахожусь в такой ситуации на работе, у нас есть только один SMTP-сервер, который может выполнять рассылку, но повсюду есть сценарии, которым тоже нужно выполнять рассылку. Поэтому я добавляю почту в виде однострочной текстовой строки в файл на SMTP-сервере, где запланирован сценарий VBS, который читает этот файл и отправляет письма. Если вам интересно, я опубликую это здесь завтра. Надеюсь, это поможет ..

0 голосов
/ 06 марта 2010

Альтернативой, если вы хотите быстро и грязно, является blat - утилита командной строки для отправки почты через SMTP. http://www.blat.net

...