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.113 Comentários

  4. dgitalDoIt dgitalDoIt

    http://d-gital.fr/
    La societe D Gital est une structure experimentee focalisee sur le public en France, qui met a disposition une approche complete aux entreprises et particuliers, en se distinguant par sur la confiance et la transparence. Decouvrez davantage sur le site officiel.

    # junho 2, 2026
  9. dasilvaconsultingDoIt dasilvaconsultingDoIt

    http://dasilvaconsulting.fr/
    Le projet Dasilvaconsulting se positionne comme une structure experimentee implantee sur le cadre national francais, qui propose des services de qualite a ceux qui recherchent des resultats, avec un accent sur l’excellence du service. En savoir plus sur le site officiel.

    # junho 2, 2026
  10. CharlesBet CharlesBet

    В данном материале представлены ключевые тенденции в сфере медицинской науки и практики. Вы узнаете о последних открытиях, инновационных подходах к терапии и важности профилактики заболеваний. Особое внимание уделено практическому применению новых методов в клинической практике.
    Погрузиться в научную дискуссию – [url=https://coollib.in/node/580813]вывод из запоя владимир[/url]

    # junho 2, 2026
  36. Jamespella Jamespella

    Публикация посвящена жизненным историям людей, успешно справившихся с зависимостью. Мы покажем, что выход есть, и он начинается с первого шага — принятия проблемы и желания измениться.
    Перейти к полной версии – [url=http://savepic.ru/news-102-kak-kapelnitsa-pomogaet-pri-pohmele-sostav-i-dejstviya-rastvorov-dlya-vosstanovleniya-organizma.html]tver clinica plus[/url]

    # junho 2, 2026
  40. Nhà Cái Uy Tín Nhà Cái Uy Tín

    Hi, I do believe this is an excellent blog. I stumbledupon it
    😉 I’m going to return once again since i have book-marked
    it. Money and freedom is the greatest way to change, may you be rich and continue to help others.

    # junho 2, 2026
  41. Goodinidat Goodinidat

    В этой публикации мы обсуждаем современные методы лечения различных заболеваний. Читатели узнают о новых медикаментах, терапиях и исследованиях, которые активно применяются для лечения. Мы нацелены на то, чтобы предоставить практические знания, которые могут помочь в борьбе с недугами.
    Связаться за уточнением – [url=https://magiyabelya.ru/vyvod-iz-zapoya-na-domu-v-borisoglebske-reshenie-problemy-alkogolizma/]clinica plus в борисоглебске[/url]

    # junho 2, 2026
  45. RichardNaino RichardNaino

    Текст посвящён распространённым мифам о зависимости и их развенчанию. Мы предоставим научно обоснованную информацию и дадим рекомендации по выбору эффективного способа борьбы с зависимым поведением.
    Погрузиться в детали – [url=https://tyatya.ru/9122-narkologicheskaya-klinika-put-k-novoj-zhizni.html]наркологическая клиника в твери[/url]

    # junho 2, 2026
  46. RichardRealk RichardRealk

    В этом обзоре мы обсудим современные методы борьбы с зависимостями, включая медикаментозную терапию и психотерапию. Мы представим последние исследования и их результаты, чтобы читатели могли быть в курсе наиболее эффективных подходов к лечению и поддержке.
    Открыть полностью – [url=https://good-promo.ru/kompleksnaya-narkologicheskaya-pomoshh-v-tveri-2/]анонимная наркологическая клиника[/url]

    # junho 2, 2026
  47. sppk_tfEr sppk_tfEr

    Как измерить окупаемость вложений в [url=https://seo-prodvizhenie-pod-klyuch.ru]SEO продвижение под ключ[/url]?

    # junho 2, 2026
  48. sppk_yxEr sppk_yxEr

    Какой результат реалистично ожидать через 6 месяцев работы по схеме [url=https://seo-prodvizhenie-pod-klyuch.ru]SEO продвижение под ключ[/url]?

    # junho 2, 2026
  49. CoreyTus CoreyTus

    Мы рассмотрим современные вызовы здравоохранения и пути их решения с помощью технологий и научных исследований. В статье собраны данные о новых лекарствах, методах диагностики и системном подходе к улучшению здоровья населения.
    Прочесть всё о… – [url=https://nashinogi.ru/novosti/metody-i-osobennosti-lecheniya-alkogolizma.html]детокс24 рыбинск[/url]

    # junho 2, 2026
  50. Matthewkat Matthewkat

    В этой статье мы говорим о важности поддержки в процессе выздоровления. Рассматриваются семьи, группы поддержки, специалисты и онлайн-ресурсы, которые могут сыграть решающую роль в избавлении от зависимости.
    Это стоит прочитать полностью – [url=https://promedonline.net/novosti/kogda-nuzhna-narkologicheskaya-pomoshh]сайт наркологической клиники[/url]

    # junho 3, 2026

Deixe um comentário

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