Ir ao conteúdo

Verificar se um processo está execução e notificar via e-mail no Windows

Olá,

Recentemente meu primo precisou um Visual Basic Script que verifica se um processo está executando e caso esteja envie um e-mail. Ele me pediu ajuda para criar este script e eu resolvi ajudar.

Visual Basic Script para verificação de processo em execução e notificação via E-mail.

Verificar se um processo está em execução com Visual Basic Script e mostrar uma janela se estiver.
[code lang=”vb”]
set service = GetObject (“winmgmts:”)
for each Process in Service.InstancesOf (“Win32_Process”)
If Process.Name = processName then
wscript.echo “Notepad running”
wscript.quit
End If
next
[/code]

Enviar e-mail utilizando Visual Basic Script:
[code lang=”vb”]
Const username = “SENHA”
Const password = “PASSWORD”
Const smtpServer = “smtp.gmail.com”
Const port = 465
Const secure = True
Const userFrom = “FROM”
Const userTo = “TO”
Const emailSubject = “Subject”
Const emailText = “Text”

‘== CODE ==

Const cdoSendUsingPickup = 1 ‘Send message using the local SMTP service pickup directory.
Const cdoSendUsingPort = 2 ‘Send the message using the network (SMTP over the network).

Const cdoAnonymous = 0 ‘Do not authenticate
Const cdoBasic = 1 ‘basic (clear-text) authentication
Const cdoNTLM = 2 ‘NTLM

Set objMessage = CreateObject(“CDO.Message”)
objMessage.Subject = emailSubject
objMessage.From = userFrom
objMessage.To = userTo
objMessage.TextBody = emailText

‘==This section provides the configuration information for the remote SMTP server.

objMessage.Configuration.Fields.Item _
(“http://schemas.microsoft.com/cdo/configuration/sendusing”) = 2

‘Name or IP of Remote SMTP Servesr
objMessage.Configuration.Fields.Item _
(“http://schemas.microsoft.com/cdo/configuration/smtpserver”) = smtpServer

‘Type of authentication, NONE, Basic (Base64 encoded), NTLM
objMessage.Configuration.Fields.Item _
(“http://schemas.microsoft.com/cdo/configuration/smtpauthenticate”) = cdoBasic

‘Your UserID on the SMTP server
objMessage.Configuration.Fields.Item _
(“http://schemas.microsoft.com/cdo/configuration/sendusername”) = username

‘Your password on the SMTP server
objMessage.Configuration.Fields.Item _
(“http://schemas.microsoft.com/cdo/configuration/sendpassword”) = password

‘Server port (typically 25)
objMessage.Configuration.Fields.Item _
(“http://schemas.microsoft.com/cdo/configuration/smtpserverport”) = port

‘Use SSL for the connection (False or True)
objMessage.Configuration.Fields.Item _
(“http://schemas.microsoft.com/cdo/configuration/smtpusessl”) = secure

‘Connection Timeout in seconds (the maximum time CDO will try to establish a connection to the SMTP server)
objMessage.Configuration.Fields.Item _
(“http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout”) = 60

objMessage.Configuration.Fields.Update

objMessage.Send
[/code]

Estes dois scripts foram mesclados para realizar o que precisávamos.

Abraços,
Matheus

Referencias:
http://wiki.imacros.net/send-email.vbs
http://www.techimo.com/forum/applications-operating-systems/117464-need-vbulletin-script-check-see-if-process-running.html

Publicado emwindows

13.701 Comentários

  1. Superb post however , I was wanting to know if you could write a litte more on this subject?
    I’d be very thankful if you could elaborate a little bit more.
    Many thanks!

  2. Ronaldmax Ronaldmax

    Капельница от запоя в Москве применяется для облегчения абстинентного синдрома, восполнения жидкости и поддержки организма при алкогольной интоксикации. Центр «Мед Алко» организует выезд на дому круглосуточно: бригада приезжает по адресу, доктор оценивает самочувствие больного и выбирает оптимальный состав инфузии. Такая помощь особенно востребована, когда запой затянулся на несколько суток, появилась тошнота, дрожь, слабость, бессонница или выраженная головная боль. Капельница ставится только при допустимом уровне риска, а при тяжелом течении требуется стационар клиники.
    Изучить вопрос подробнее – [url=https://1.kapelnica-ot-zapoya-v-moskve14.ru/]капельница от запоя на дому недорого[/url]

  3. Michaelvaw Michaelvaw

    В схему лечения врач может включать растворы для коррекции водного и электролитного баланса, витамины, препараты с седативным действием, гепатопротекторы, кардиопротекторы, ноотропы и другие лекарственные средства по медицинским показаниям. Некоторые препараты применяются только после обследования и при отсутствии противопоказаний. Самостоятельно ставить капельницу, выбирать лекарства или резко увеличивать их дозу опасно. Даже средства, которые хорошо переносились раньше, в конкретном эпизоде запоя могут дать нежелательный эффект.
    Узнать больше – [url=https://vyvod-iz-zapoya-reutov4.ru/]vyvod-iz-zapoya-deshev-reutove[/url]

  4. how old do you have to be to go to firekeepers casino (Darell) to win pokies nz, play real money poker online australia and best casino site canada,
    or australia top casino

  5. las vegas usa casino reviews, usa casinos and win real money online casino
    usa, or australian online gambling legislation

    Here is my web-site: can you gamble in nc – Ezekiel,

  6. mobile slots no deposit bonus usa, legitimate online
    casino in canada and no deposit no credit card huuuge casino level 200 hack
    (Vonnie) bonus usa 2021 nonstop,
    or canadian online casino sign up no deposit bonus

  7. $20 no deposit bonus new zealand, top usa whats a good casino (Dani) sites and new zealandn online pokies
    bonus, or uk gambling statistics 2021

  8. best online slot usa, auto poker dealer and 21dukes casino
    login, or best casino bonuses no deposit uk

    Also visit my blog post: gambling control bill 2022 (Deanne)

  9. buy poker machine united kingdom, best los mejores casinos online colombia [Kathleen] poker games united kingdom and united statesn poker
    95 download, or free spins casino no deposit bonus united states

  10. JamesmoK JamesmoK

    После обращения диспетчер уточняет адрес в Москве или Московской области, возраст человека, длительность запоя, основные симптомы и наличие хронических заболеваний. Затем выездной врач приезжает на дом с набором препаратов и диагностического оборудования. Время приезда зависит от района города, дорожной ситуации и загруженности бригады. Срочный вывод из запоя организуется в круглосуточном режиме, включая выходные дни.
    Ознакомиться с деталями – https://3.vyvod-iz-zapoya-moskva1-13.ru/

  11. Michaelmow Michaelmow

    Домашний вызов нарколога подходит в тех случаях, когда человеку требуется медицинская помощь, но поездка в клинику затруднена или нежелательна. Причиной обращения может стать длительный запой, тяжелое похмелье, абстинентный синдром, наркотическая ломка, ухудшение самочувствия после употребления психоактивных веществ или повторный срыв. Специалист приезжает по адресу в Воронеже, проводит первичный осмотр, уточняет анамнез и определяет, можно ли безопасно оказать необходимую помощь дома.
    Дополнительная информация – [url=https://6.narcolog-na-dom-voronezh0.ru/]врач нарколог на дом Воронеж[/url]

  12. WilliamOrabe WilliamOrabe

    Если дома шумно (ремонт, маленькие дети, гости), организуем краткий «тихий» стационар с отдельным входом и камерными палатами. После стабилизации пациент возвращается домой, а амбулаторное сопровождение продолжается в удобном графике — через короткие очные визиты и дистанционные чек-ины.
    Подробнее тут – [url=https://vivod-iz-zapoya-v-sankt-peterburge16.ru/]вывод из запоя недорого санкт-петербург[/url]

Deixe um comentário

O seu endereço de e-mail não será publicado. Campos obrigatórios são marcados com *