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

11.584 Comentários

  4. Wade Wade

    united kingdom casino guide 2021 review, best deposit bonus betting sites new zealand and
    yukon gold newest online casinos accepting us players (Wade) gambling,
    or casino cornwall ontario united kingdom

    # agosto 30, 2026
  10. Tawanna Tawanna

    united kingdom real money online age to play at morongo casino (Tawanna), 888 poker withdrawal united states and united kingdom friendly online poker
    sites, or uk slot streamers

    # agosto 30, 2026
  21. Milford Milford

    australian brewery poker, united statesn roulette wheel number order and canadian online choctaw casino pocola ok reviews –
    Milford, free signup bonus, or united statesn casino guide coupons

    # agosto 30, 2026
  23. Jestine Jestine

    online casino usa bonus, 20 free spins on registration usa and
    pokies real money australia, or best rated united kingdom online casino

    Feel free to visit my web-site; is trading stock a gambling;
    Jestine,

    # agosto 30, 2026
  26. Davidmut Davidmut

    На первичном приеме нарколог выясняет, как долго человек пьет, насколько часто возникает запой, присутствует ли пивной или иной вариант хронического алкоголизма, были ли попытки самостоятельно отказаться от алкоголя и применялось ли кодирование раньше. Врач уточняет наличие заболеваний сердца, печени, нервной системы и мозга, эпизодов депрессии, неврозов, бессонницы или других психических расстройств. При необходимости назначаются анализы и дополнительная диагностика. Для пациента особенно важно не скрывать информацию о лекарствах и сопутствующем лечении, потому что совместимость средств непосредственно влияет на безопасность процедуры.
    Дополнительная информация – https://2.kodirovanie-ot-alkogolizma-moskva9.ru/

    # agosto 30, 2026
  27. u888.com u888.com

    Hi there are using WordPress for your site
    platform? I’m new to the blog world but I’m trying to get started and create my own. Do
    you require any coding expertise to make your own blog?
    Any help would be really appreciated!

    # agosto 30, 2026
  30. EdwardPat EdwardPat

    В данной статье рассматриваются проблемы общественного здоровья и социальные факторы, влияющие на него. Мы акцентируем внимание на значении профилактики и осведомленности в защите здоровья на уровне общества. Читатели смогут узнать о новых инициативах и программах, направленных на улучшение здоровья населения.
    А есть ли продолжение? – https://peredozirovka.info/service/vyvod-iz-zapoya

    # agosto 30, 2026
  31. Brittny Brittny

    online casino games apps for android (Brittny) games australia
    free, best gambling websites usa and play free games
    for real money uk, or free spins no deposit on registration nz

    # agosto 30, 2026
  34. Bernadette Bernadette

    how many native united statesn casinos are there, difference between european roulette and united kingdom and best slot sites usa 2021, or setting up an online casino
    usa

    Have a look at my page: what does gambling mean in spanish (Bernadette)

    # agosto 31, 2026
  35. mostbet_mxen mostbet_mxen

    Siedze na Mostbecie jakies pol roku, w wiekszosci sloty, sporadycznie cos z live. Wpadlem tam bo kolega z pracy gadal o tym, bez wiekszych oczekiwan. Lobby jest naprawde duzy — gdzies 3 tysiecy pozycji, Pragmatic Play, NetEnt i Play’n GO, Yggdrasil. Sweet Bonanza mam w ulubionych, chociaz ostatnio probuje Big Time Gaming.

    Minus, ktory musze wypisac to nawigacja w kategoriach — potrafi zwrocic bzdury. Poza tym nie mam dramatow. Live casino to glownie Evolution i tu akurat nie ma sie do czego przyczepic — ruletki sa tez PL, a Monopoly Live wciaga bardziej niz klikanie slotow.

    Pakiet powitalny w Mostbet to 125% do pierwszego depozytu i do tego paczka 250 spinow, nie wszystko naraz. Wagering x60 na spinach, czyli standard, ale nie prezent, min. depozyt to jakies 20 zl. Gdyby ktos potrzebowal swiezych ofert, to warto zerknac na [url=https://villa-myma-marrakech.com/mostbet-kod-promocyjny-2026-bez-depozytu-co-warto-wiedziec]Mostbet kod promocyjny 2026 bez depozytu – co warto wiedzieć[/url] przed pierwsza wplata. Sam proces trwala jakies 3 minuty, potwierdzenie dokumentow jeden dzien.

    Cashouty robie najczesciej na Skrilla, leci jakies kilka godzin. Przez karte czekalem do dwoch dni roboczych, crypto ponoc idzie najszybciej, nie testowalem osobiscie. Jest tez Neteller, plus kilka polskich metod.

    Obsluga w Mostbet odpowiada po polsku, choc czasem widac kalki z tlumacza. Raz mialem zgrzyt przy free spinach — zalatwili to dosc sprawnie. Dzialaja na licencji Curacao, to nie jest maltanskie CEG. Apka na Androida dziala bez zarzutu, tylko ze instalka na iPhone to lekka gimnastyka.

    # agosto 31, 2026
  42. Devon Devon

    australia merlot wine slot, mobile poker real money australia and new casino online usa 2021,
    or top aussie casino no deposit bonus codes 2021 (Devon) in united states for real money

    # agosto 31, 2026

Deixe um comentário

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