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

13.011 Comentários

  1. spieler_xxkn spieler_xxkn

    Poste selten, lese aber viel, also teile ich mal, wie ich ein Online Casino auswaehle. Nach gut einem Dutzend getesteter Seiten lese ich zuerst das Kleingedruckte.

    Bei mir kommt die Lizenz an erster Stelle: Lizenznummer suchen und nachpruefen, und ob Spieler aus dem eigenen Land ueberhaupt zugelassen sind. Danach Ein- und Auszahlungen: Krypto ist nett, aber kein Muss, und die Bearbeitungszeiten sollten offen genannt sein.

    Niemals eine Seite nur nach dem Bonus bewerten. Umsatzbedingungen und Maximaleinsatz genau lesen, und Live Tische zaehlen oft gar nicht. Einen brauchbaren Testbericht mit allen aktuellen Infos findet man hier [url=https://motoride.sk/?login=PeterNovakb575]Bonus bei Fortuna Casino[/url] bevor man etwas einzahlt.

    Mobil spiele ich meist im Browser, und eine App lade ich nur von der offiziellen Seite. Einfach mal eine kurze Frage an den Support stellen: ein echter Mensch ist besser als ein Bot.

    Das war es im Grunde. Nur mit Geld spielen, das man verlieren kann.

    # outubro 11, 2026
  2. jackpot_qhsl jackpot_qhsl

    Mostly a reader, rarely post, but I figured I would share how I pick an online casino these days. After a few bad experiences I learned to read the small print first.

    I always start with licensing: find the licence number and look it up, and whether they actually accept players from your country. Then payments: I want at least one fast e-wallet option, and the withdrawal limits need to be written clearly.

    Bonuses are the tricky part. Read the wagering and the max bet rule, and some games count less towards it. A useful overview with bonus rules, app info and payment methods is here [url=https://scrapbox.io/solkrypto661f5e/Superbet_Casino_Online_spelen_in_2026_een_praktische_spelersgids]spelen bij Superbet[/url] so you know what you are signing up for.

    On mobile I mostly use the browser version, and a good site loads fast and does not log you out every five minutes. Ask support one simple question first: slow or scripted answers usually mean trouble later.

    That is about it. Only play with money you can afford to lose.

    # outubro 11, 2026
  5. lucky_jast lucky_jast

    Been reading this board for a while, so here is what I look at before signing up anywhere. After getting burned once or twice I learned to read the small print first.

    I always start with licensing: see which authority is listed in the footer, and if your country is on the allowed list. After that I look at banking: crypto is a plus but not a must, and there should be no weird fees on cashouts.

    Bonuses are the tricky part. Read the wagering and the max bet rule, and the bonus usually expires in a week or two. A useful overview with bonus rules, app info and payment methods is worth a read here [url=https://cryptoplaypicks1c316d.forumfree.it/?t=81226790]app Slotshopper[/url] and it saved me some time.

    On mobile I mostly use the browser version, so I check how the lobby works on a small screen. Support matters too: a real human reply beats a bot loop.

    Anyway, that is my routine. Treat it as entertainment, not income.

    # outubro 11, 2026
  7. jackpot_czsl jackpot_czsl

    Mostly a reader, rarely post, so here is how I pick an online casino these days. After trying maybe a dozen sites I stopped going by ads alone.

    First thing is the licence: see which authority is listed in the footer, because some sites quietly block certain regions. After that I look at banking: card, e-wallets and bank transfer should all be there, and cashout times should be listed up front.

    Bonuses are the tricky part. Read the wagering and the max bet rule, and live tables often do not count at all. A good recent review that covers all of this is here [url=https://www.efunda.com/members/people/show_people.cfm?Usr=martinez1f19bf]Slott[/url] so you know what you are signing up for.

    On mobile I mostly use the browser version, and if there is an app I make sure it comes from the official page. Support matters too: if they answer in a couple of minutes that is a good sign.

    Hope this helps someone. Treat it as entertainment, not income.

    # outubro 11, 2026
  9. Calvinparry Calvinparry

    Этот обзор медицинских исследований собрал самое важное из последних публикаций в области медицины. Мы проанализировали ключевые находки и представили их в доступной форме, чтобы читатели могли легко ориентироваться в актуальных темах. Этот материал станет отличным подспорьем для изучения медицины.
    Подробнее можно узнать тут – [url=https://ifonchik.ru/zdorove/lechenie-ot-alkogolizma]лечение от алкоголизма[/url]

    # outubro 11, 2026

Deixe um comentário

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