Skip to content

Verify if a process is executing and notificate via e-mail on Windows

Hello,

A few days ago my friend need a Visual Basic Script to verify if a process is running and if it is send an e-mail. He asked me for help to code it, and I helped him.

Visual Basic Script to verify if a process is running and notify via e-mail.

Verify if a process is running with Visual Basic Script and shows a window if it is.
[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]

Send an e-mail using Visual Basic Script
[code lang=”vb”]
Const username = “USERNAME”
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]

This two scripts are changed to work together to do what we want and have a config section.

Best Regards,
Matheus

References:
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

Published inwindows

13,701 Comments

  1. Charlessiz Charlessiz

    В этой статье мы говорим о важности поддержки в процессе выздоровления. Рассматриваются семьи, группы поддержки, специалисты и онлайн-ресурсы, которые могут сыграть решающую роль в избавлении от зависимости.
    Продолжить изучение – [url=https://ym-log.ru/zdorove/narkolog-na-dom-nedorogo-reutov]анонимный нарколог на дом реутов[/url]

  2. Запой отличается от единичного эпизода употребления алкоголя тем, что человек несколько дней или дольше регулярно принимает спиртное, испытывая все более тяжелое похмелье при попытке остановиться. Формируется физическая потребность в новой дозе, поэтому самостоятельно выйти из этого состояния становится сложнее. Чем дольше продолжается запой, тем выше вероятность обезвоживания, нарушений сна, тревожных и депрессивных расстройств, обострения болезней сердца, печени, поджелудочной железы и других органов.
    Дополнительная информация – http://www.google.com.hk/url?sa=t&url=https://n.vyvod-iz-zapoya-v-krasnoyarske17.ru

  3. united kingdom online casino blackjack real
    estate bbb (Myra) money no
    deposit bonus, dollar 5 deposit online casino united states and fast withdrawal online casino united states, or australian open gambling

  4. play free online games earn real money (Bobby) casino united states that accept paysafe, bingo
    canada login and casino bonus usa, or new casino canada

  5. 80 free spins no deposit uk, canadian slot machines online and canada bingo sites, or united kingdom online real pokies

    Also visit my site: intertops casino lobby (Eloisa)

  6. pokies online australia reviews, online gambling usa law and united statesn online pokies sign up bonus, or no
    deposit when is soboba casino going to open back up (Leslie) usa

  7. play online poker united states, usa gambling ranking and best
    online poker sites for united kingdoms, or free games win real money no deposit uk

    Here is my homepage: side bet table blackjack [William]

  8. free pokies canada aristocrat, 888 poker app united kingdom and online
    bingo usa, or best real money poker app usa

    my website :: hard rock casino cancun mexico, Brittney,

  9. mobile slots no deposit bonus usa, united kingdom roulette free download and best sign up bonus casino united kingdom, or real money poker apps united states

    Stop by my web page: is trading the same as gambling (Quinn)

  10. do you need a gambling licence for sweepstake (Claribel) affiliates usa, does canada have slot machines and canadian pokies winners, or casino united statesn poker 2

  11. australia casino best online casino games mac (Mariana) state united,
    is it legal to play online slots in australia and gambling times usa, or chukchansi
    gold casino

  12. real money united statesn online win-river casino bingo (Lamont), free spins pokies in canada and free bonus no deposit casino usa, or canadian casino guide 2021 review

Leave a Reply

Your email address will not be published. Required fields are marked *