Ir ao conteúdo

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

Publicado por Matheus (X-warrior) Bratfisch em abril 16, 2012

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

9.749 Comentários

  1. true_wdol true_wdol

    The platform is fully optimised for players in the United Kingdom with English support and local payment options.

    True Fortune offers an extensive range of slots covering every theme and volatility level.

    Regular promotions include reload bonuses, cashback and free spin drops throughout the week.

    True Fortune supports popular payment methods including Visa, Mastercard and e-wallets like Skrill and Neteller.

    A valid licence and secure infrastructure make True Fortune a safe place to play.

    A detailed FAQ and clear terms make it easy for players in the United Kingdom to find answers fast.

    true fortune casino promo codes for existing players [url=http://true-fortune-casino29.com/bonus-codes-for-existing-players/]true fortune casino promo codes for existing players[/url]

    # julho 16, 2026
  11. true fortune casino_xvol true fortune casino_xvol

    The platform is fully optimised for players in the United Kingdom with English support and local payment options.
    Big-money jackpots and trending games are easy to find on the homepage.
    New players in the United Kingdom can claim a generous welcome bonus with free spins on their first deposit.
    truefortune casino no deposit bonus codes [url=https://true-fortune-casino10.com/no-deposit-bonus]truefortune casino no deposit bonus codes[/url]
    Deposits and withdrawals can be made with cards, e-wallets and bank transfer.
    The site offers deposit limits, reality checks and self-exclusion for safer play.
    A detailed FAQ and clear terms make it easy for players in the United Kingdom to find answers fast.

    # julho 16, 2026
  12. true_ljol true_ljol

    The platform is fully optimised for players in the United Kingdom with English support and local payment options.

    Big-money jackpots and trending games are easy to find on the homepage.

    First-time players receive a welcome bonus plus free spins after signing up.

    Deposits and withdrawals can be made with cards, e-wallets and bank transfer.

    A valid licence and secure infrastructure make True Fortune a safe place to play.

    True Fortune works seamlessly on smartphones and tablets straight from the browser.

    true fortune casino no deposit bonus codes 2025 [url=https://www.true-fortune-casino29.com/no-deposit-bonus]true fortune casino no deposit bonus codes 2025[/url]

    # julho 16, 2026
  14. 888starz_humt 888starz_humt

    888Starz rasmiy sayti kazino va sport bo’limlariga to’liq kirish imkonini beradi.

    Foydalanuvchilar rasmiy sayt orqali jonli kazino stollarida istalgan vaqtda o’ynashlari mumkin.

    Rasmiy sayt raqobatbardosh koeffitsiyentlar bilan jonli tikish rejimini taklif etadi.

    888starz logowanie [url=https://www.888stars5.com/]888starz logowanie[/url]

    Yangi foydalanuvchilar ro’yxatdan o’tishda xush kelibsiz bonusi va bepul aylantirishlarga ega bo’ladilar.

    Rasmiy sayt telefon raqami yoki email orqali tezkor ro’yxatdan o’tishni ta’minlaydi.

    # julho 16, 2026
  18. 888starz_dxkn 888starz_dxkn

    888Starz rasmiy veb-sayti foydalanuvchilarga kazino va sport stavkalarini bitta platformada taqdim etadi.

    Rasmiy saytda jonli dilerli kazino bo’limi real dilerlar bilan o’ynash imkonini beradi.

    Rasmiy saytda jonli tikish koeffitsiyentlari o’yin davomida real vaqtda yangilanadi.

    Foydalanuvchilar uchun haftalik keshbek va promo aksiyalar doimiy ravishda mavjud.

    Rasmiy sayt foydalanuvchilarga sutkalik yordamni bir nechta aloqa kanali orqali taqdim etadi.

    зеркало 888starz [url=http://www.888stars4.com]зеркало 888starz[/url]

    # julho 16, 2026
  27. Edwincusly Edwincusly

    Вывод из запоя на дому в Сочи подходит пациентам, у которых нет признаков острого психоза, тяжелого отравления, судорог, потери сознания и других состояний, требующих немедленной госпитализации. Врач нарколог приезжает по адресу, проводит обследование, уточняет, сколько дней длится запой, какие препараты человек принимал, есть ли хронические болезни, аллергии, ограничения по здоровью и документы, подтверждающие прошлое лечение.
    Исследовать вопрос подробнее – [url=https://vyvod-is-zapoya-sochi23.ru/]вывод из запоя капельница в сочи[/url]

    # julho 16, 2026

Deixe um comentário

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