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

8.206 Comentários

  1. Thomasthift Thomasthift

    В этой медицинской статье мы погрузимся в актуальные вопросы здравоохранения и лечения заболеваний. Читатели узнают о современных подходах, методах диагностики и новых открытий в научных исследованиях. Наша цель — донести важную информацию и повысить уровень осведомленности о здоровье.
    Изучить рекомендации специалистов – [url=https://dettka.com/ekstrennaya-pomoshh-pri-alkogolnoj-intoksikaczii-priznaki-riski-i-vernye-shagi/]неотложная наркологическая помощь на дому[/url]

    # junho 22, 2026
  2. Kendrick Kendrick

    usa android casino bonus, best online slot sites new zealand and online casino united states review, or
    united statesn free slots no download

    My blog :: games that give you real money fast (Kendrick)

    # junho 22, 2026
  4. Melva Melva

    gambling regulations uk, canadian pokie machines for sale
    and new no deposit casino bonus uk, or best online is casino bangbet legit (Melva) in united kingdom top reviewed

    # junho 22, 2026
  9. Vilma Vilma

    Through real-life situation studies, OMT shoԝs math’s impact, assisting Singapore trainees develop ɑ profound love ɑnd
    exam motivation.

    Enroll t᧐day in OMT’ѕ standalone e-learning programs ɑnd watch youг grades skyrocket tһrough endless access tߋ high-quality, syllabus-aligned ｃontent.

    In Singapore’s strenuous education system, wһere
    mathematics іѕ required and takes in arоսnd 1600 hоurs of
    curriculum tіmе іn primary school and secondary
    schools, math tuition Ƅecomes imⲣortant tо hеlp students construct ɑ strong structure for lifelong success.

    Math tuition іn primary school bridges gaps іn class learning,
    guaranteeing trainees comprehend complicated topics
    ѕuch as geometry and infоrmation analysis Ьefore tһe PSLE.

    Math tuition teaches reliable tіme management methods, helping secondary trainees ⅽomplete O Level tests wіthin the allocated period ԝithout rushing.

    Individualized junior college tuition assists connect tһe void fгom O Level to A
    Level math, ensuring pupils adapt tⲟ the increased roughness ɑnd deepness neeԀed.

    Ƭhе exclusive OMT curriculum stands ɑpart by incorporating MOE
    syllabus components ᴡith gamified quizzes ɑnd difficulties tⲟ make discovering more enjoyable.

    Aesthetic һelp likе layouts aid imagine pгoblems lor, boosting understanding and examination efficiency.

    Ӏn Singapore, wheｒе adult involvement iѕ key, math tuition ⲣrovides structured
    support fօr home support tⲟward exams.

    Alѕo visit mʏ site; kenneth math tuition – Vilma,

    # junho 22, 2026
  10. rentall.ro rentall.ro

    new zealandn no deposit bonus pokies, legal canadian online pokies and win real money online Casino Betting strategies [rentall.ro] usa, or best online casino sites for real money canada

    # junho 22, 2026
  11. Sylvia Sylvia

    united statesn free pokies games, united kingdom online casino real money free bonus and free
    usa cash bingo, or top 5 online all lightning pokies (Sylvia) united states

    # junho 22, 2026
  12. Jake Jake

    top online casino asia (Jake) uk bingo reviews, united statesn original slot machine game and free no deposit spins usa, or casino united
    states stock

    # junho 22, 2026
  13. Buddy Buddy

    gold coast casino australia, canadian blackjack online free and the largest casino french
    card games played in casinos (Buddy) australia, or how to
    play united statesn poker

    # junho 22, 2026
  14. Kendra Kendra

    best pokies app united kingdom, casino offers no deposit usa and united kingdom original with 100 free spins play for free, or united states online
    casino news

    Visit my page – roulette pronounce in french – Kendra,

    # junho 22, 2026
  15. Eric Eric

    online poker that takes united statesn express, download uk bingo game
    and best usa online casino reviews, or legal age for gambling in australia

    Feel free to surf to my web-site; vegas rush no deposit bonus (Eric)

    # junho 22, 2026
  16. Sabina Sabina

    dollar 10 no deposit mobile casino united states, roulette
    layout usa and usa casino fast withdrawal, or usa online casino lists

    my web blog; is draftkings blackjack legit [Sabina]

    # junho 22, 2026
  17. Suzanne Suzanne

    legitimate australian online casinos, canadian star casino x no deposit codes (Suzanne)
    kansas city and are there casinos in new united states, or free
    chips no deposit bonus united states

    # junho 22, 2026
  18. Virgil Virgil

    best no deposit casinos in new zealand, australia rust casino trick (Virgil)
    where and top online pokies and casinos canadian dollars, or online casinos
    usa friendly

    # junho 22, 2026
  20. Kellye Kellye

    all united statesn bingo, poker site usa and no deposit casino offers
    usa, or canadian is live casino open in arundel
    mills, Kellye, guide slot
    payback info

    # junho 22, 2026
  21. homepage homepage

    Really when someone doesn’t be aware of afterward its up to other users that they will help,
    so here it takes place.

    Take a look at my web-site … homepage

    # junho 22, 2026
  31. Cheri Cheri

    play free pokies usa, how many miles to pechanga casino (Cheri) united kingdom bonus sans depot and poker for real money
    in usa, or online casino no deposit bonus keep what you win united states 2021

    # junho 23, 2026
  36. Emely Emely

    are pokies open in new zealand, new zealandn poker online free game
    and no deposit slots usa, or how old do you have to go
    into a casino (Emely) to win on the pokies
    in united states

    # junho 23, 2026
  37. Aleisha Aleisha

    pokie machine laws canada, online what is casino night
    (Aleisha) instant withdrawal uk and
    bonausaa slot volatility, or big poker tournaments in australia

    # junho 23, 2026
  38. Stewart Stewart

    usa online casinos new, advanced roulette uk
    and casinos that accept paypal in australia, or online uk
    time square casino payouts (Stewart) woth 24 hours payout

    # junho 23, 2026
  39. Colby Colby

    best gambling website canada, canadian pokie machines for sale and online bingo usa, or roxy casino united
    states

    my web blog: gordon count blackjack, Colby,

    # junho 23, 2026
  43. Edwardelode Edwardelode

    В этой статье мы обсудим процесс восстановления после зависимостей, акцентируя внимание на различных методах и подходах к реабилитации. Читатели узнают, как создать план выздоровления и использовать полезные ресурсы для достижения устойчивых изменений.
    Как это работает — подробно – [url=https://soapy.net.ru/2026/06/16/myagkiy-detoks-i-perezagruzka-kak-vernut-yasnost-uma-i-sily-dlya-lyubimyh-del-posle-zatyazhnyh-prazdnikov/]нарколог анонимно[/url]

    # junho 23, 2026
  44. fixSutty fixSutty

    Особенно понравился раздел про Южный футбол: межсезонные сборы и успех команд.

    Смотрите сами:

    [url=https://krasnodarfan.ru]https://krasnodarfan.ru[/url]

    # junho 23, 2026
  49. Ara Ara

    gala bingo usa, where can i play poker online in australia and leo vegas blackjack casino edge calculator – Ara – nz,
    or best online casinos australia 2021

    # junho 23, 2026

Deixe um comentário

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