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

162 Comments

  1. Современное общество и бизнес не могут обойтись без юридических
    услуг. Как компании, так и частные лица обращаются к юристам
    для решения множества правовых вопросов.

    В данной статье мы рассмотрим основные виды юридических услуг и
    их значимость.

    Основные виды юридических
    услуг

    Подготовка и анализ контрактов
    Обслуживание сделок, связанных с продажей и приобретением активов
    Защита интересов клиентов в арбитражных судах
    Взыскание задолженности и защита прав клиента
    Консультации по вопросам корпоративного права

    Преимущества доверения юридических вопросов профессионалам

    Работа с юридической фирмой способствует снижению рисков, связанных с правовыми вопросами.

    Юристы имеют богатый опыт в различных областях права, что позволяет им успешно вести дела клиентов.
    Также юридические фирмы обычно предоставляют ряд
    следующих преимуществ:

    Индивидуальный подход к каждому клиенту
    Доступ к актуальной информации и практикам в области
    права
    Быстрая адаптация к изменениям в правовой среде

    Рекомендации по выбору юридической
    компании

    Подбор юридической фирмы
    – это ключевой момент для эффективного
    решения правовых вопросов. Обратите внимание на следующие аспекты:

    Мнения клиентов о предоставленных юридических услугах
    Профессиональный опыт юристов в специальных областях
    Положительные результаты юридической практики в судебных делах
    Прозрачность условий сотрудничества и стоимость услуг

    Актуальность юридических услуг
    в современных реалиях

    В связи с ростом бизнеса и увеличением конфликтов, юридические
    услуги становятся особенно актуальными.
    В условиях постоянных изменений в
    законодательстве предприятия
    и физические лица требуют надежной юридической помощи.
    Следует помнить, что качественная юридическая
    проверка может избежать многих проблем и сэкономить время.

    Контакты юристов

    Если у вас возникли вопросы или вы нуждаетесь в правовой помощи, не стесняйтесь
    обращаться к специалистам. Юридические фирмы предлагают разнообразные услуги
    и готовы помочь в любых вопросах.
    Не забывайте исследовать репутацию и опыт компании, прежде чем принимать решение.
    Оптимальный выбор юриста обеспечит вам успех в судебных делах и бизнесе. юрист по страховым спорам от кпц ваш юрист Итоговое слово
    В итоге, подбор юридических
    услуг является важным аспектом успешного управления бизнесом и решением личных дел Как бы то
    ни было, требуется ли вам юридическое сопровождение в суде,
    консультация по корпоративному законодательству или помощь в составлении контрактов,
    необходимо доверять профессионалам, обладающим нужной квалификацией и опытом.

    Преимущества обращения к юристам

    Глубокая экспертиза в различных областях права
    Персонализированный подход к каждому заказчику
    Способность представлять интересы клиента в суде и арбитражных органах
    Снижение рисков правовых ошибок и споров
    Помощь в ведении трудных переговоров и сделок

    Службы юридической поддержки способны значительно упростить жизнь как частным лицам, так и компаниям Профессиональные юристы помогут решить
    вопросы, связанные с задолженностями, взысканием долгов, а также предоставят помощь в разрешении споров, что особенно актуально в условиях растущей
    конкурентной среды

    Роль отзывов и репутации
    Выбирая юридическую компанию,
    важно учитывать мнения клиентов и репутацию данной фирмы
    Чем больше успешных дел и положительных откликов, тем выше вероятность того, что
    ваши интересы будут защищены на должном уровне

    В наше время, когда правовые нормы постоянно меняются, наличие надежного юридического партнера становится
    неоценимым Затраты на юридические услуги способны существенно повысить как защиту бизнеса, так и его рентабельность.

    Если у вас возникли вопросы или нужна
    помощь, не стесняйтесь звонить за консультацией Верные юридические решения – это гарантия вашего успеха и охраны интересов на продолжительный период.

    Мы надеемся, что эта информация была вам интересна.

    Следите за обновлениями на нашем сайте, чтобы оставаться в
    курсе всех изменений в области юридических услуг и новых
    практик

  2. My partner and I stumbled over here coming from a different page and thought I might as
    well check things out. I like what I see so i am just following
    you. Look forward to going over your web page again.

  3. I like the helpful information you supply on your articles.
    I will bookmark your weblog and check again here frequently.
    I am moderately certain I’ll learn lots of new stuff proper right
    here! Best of luck for the next!

Leave a Reply

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