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
Hello there! I could have sworn I’ve been to this website before but
after browsing through many of the posts I realized it’s new to me.
Anyways, I’m certainly happy I discovered it and I’ll be bookmarking it and checking back regularly!
Paragraph writing is also a fun, if you be acquainted with then you can write otherwise it is difficult
to write.
Hey! Do you use Twitter? I’d like to follow you if that would be
ok. I’m absolutely enjoying your blog and look forward to new updates.
Keep on working, great job!
apuestas alaves barcelona online colombia
whoah this blog is wonderful i like reading your posts.
Keep up the good work! You recognize, lots of persons are looking around for this info, you can help them greatly.
argentina colombia apuestas Deportivas la Liga (nomadliving.Cl)
como funcionan las apuestas de sistema
my website – Basketball-wetten.com
Outstanding story there. What occurred after?
Take care!
OMT’s interactive quizzes gamify knowing, mаking mathematics hahit forming fοr Singapore pupils and inspiring tһem to promote impressive examination qualities.
Discover tһe convenience օf 24/7 online math tuition аt
OMT, where engaging resources makｅ learning fun and effective fօr aⅼl levels.
Τhe holistic Singapore Math method, ᴡhich develops multilayered analytical abilities, underscores ԝhy math tuition іs essential for mastering tһe curriculum аnd
getting ready for future careers.
Through math tuition, students practice PSLE-style questions սsually аnd graphs,
enhancing precision аnd speed սnder test conditions.
Βу supplying comprehensive experiment рrevious Ο Level documents, tuition equips trainees ᴡith familiarity ɑnd tһе capability tօ prepare foг
question patterns.
Junior college tuition рrovides access to
extra sources like worksheets аnd video explanations, strengthening A Level curriculum coverage.
OMT’ѕ custom-madе curriculum distinctively enhances the MOE framework
by providing thematic units tһat attach mathematics topics
thｒoughout primary tօ JC levels.
Multi-device compatibility leh, ѕ᧐ switch oѵer fｒom
laptop ｃomputer to phone ɑnd keep improving thosе qualities.
Ӏn Singapore’ѕ affordable education landscape, math tuition ߋffers tһe additional sidе needed for students to succeed in hiɡh-stakes exams ⅼike the PSLE,O-Levels, and A-Levels.
Check օut my web page aspire hub math tutor jobstreet –
Janna,
Heya i’m for the first time here. I came across this board and I find It truly
useful & it helped me out a lot. I hope to give something back and help
others like you aided me.
It’s an amazing post designed for all the web visitors; they will take benefit from it I am sure.
Do you mind if I quote a couple of your posts as long as I provide credit and sources back to your weblog?
My blog is in the very same niche as yours and my visitors would certainly benefit from some of the information you present
here. Please let me know if this okay with you. Thanks!
I’ll immediately seize your rss as I can not find your email subscription link or newsletter service.
Do you’ve any? Kindly permit me realize in order that I may just subscribe.
Thanks.
If you are going for most excellent contents like I do, simply pay a
quick visit this web site daily as it gives quality contents, thanks https://cryptoboss-rcn.top/
mejor casa de ganar apuestas deportivas (https://britthelpt.com/handicap-1-tenis/) online
You should be a part of a contest for one of the most useful sites on the net.
I will highly recommend this site!
May I just say what a relief to uncover a person that genuinely knows what they are discussing over the internet.
You definitely know how to bring a problem to light and make it important.
A lot more people should look at this and understand this side of your story.
I can’t believe you are not more popular because you definitely possess the gift.
Magnificent beat ! I would like to apprentice while you amend your site, how could i subscribe for a blog site?
The account helped me a acceptable deal.
I had been tiny bit acquainted of this your broadcast offered bright
clear concept https://cryptobossmachah.top/
Hey there! This is my first visit to your blog! We are a
collection of volunteers and starting a new
project in a community in the same niche. Your blog provided us useful information to work on. You have done a outstanding job!
โพสต์นี้ มีประโยชน์มาก ครับ
ผม ไปเจอรายละเอียดของ
ข้อมูลเพิ่มเติม
สามารถอ่านได้ที่ Lonna
น่าจะถูกใจใครหลายคน
เพราะอธิบายไว้ละเอียด
ขอบคุณที่แชร์ ข้อมูลที่มีประโยชน์ นี้
และอยากเห็นบทความดีๆ แบบนี้อีก
May I simply say what a relief to discover an individual who genuinely
knows what they’re talking about on the internet.
You actually know how to bring an issue to light and make
it important. More people have to check this out and understand this side of your story.
I can’t believe you’re not more popular because you definitely possess the gift.
Every weekend i used to pay a visit this website, because i wish
for enjoyment, for the reason that this this web site conations genuinely fastidious funny information too.
wettanalysen und wettprognosen
Feel free to visit my page: Wettstrategie gerade ungerade
buchmacher mit paypal
Also visit my web page: Wetten Tipps Heute
บทความนี้ น่าสนใจดี ครับ
ดิฉัน ได้อ่านบทความที่เกี่ยวข้องกับ ข้อมูลเพิ่มเติม
ดูต่อได้ที่ betfliknew
น่าจะถูกใจใครหลายคน
เพราะอธิบายไว้ละเอียด
ขอบคุณที่แชร์ บทความคุณภาพ นี้
และหวังว่าจะมีข้อมูลใหม่ๆ มาแบ่งปันอีก
mejor casa de apuestas baloncesto – Ina,
mundiales
sportwetten tipps gratis
Feel free to surf to my website: Buchmacher In deutschland
wett tipps heute net
Feel free to visit my web-site basketball Wetten system
I was recommended this web site by my cousin. I am not sure whether this post is
written by him as no one else know such detailed
about my trouble. You’re wonderful! Thanks!
handicap bedeutung Tipico Live Wetten Basketball
sportwetten profi tipps (https://www.magetitans.es/)
anbieter ohne lugas
Hi there, i read your blog from time to time and i own a similar one and i was just wondering if you get a lot of spam responses?
If so how do you reduce it, any plugin or anything you can recommend?
I get so much lately it’s driving me mad so any assistance is very much appreciated.
sportwetten paysafecard
my blog buchmacher online
I used to be suggested this web site via my cousin. I’m no longer certain whether
this post is written by him as no one else realize such targeted approximately my difficulty.
You are wonderful! Thanks! https://offerwall.admitad.com/wall/offers/?w=2815536&c=35929&r=3&d=3&g=NL&x=259d76c08a24c71cb571db6f2e12beb4&y=8925d110a6b4fa56862b7c0284091f86
Your style is unique in comparison to other people I’ve read stuff from.
I appreciate you for posting when you’ve got the
opportunity, Guess I’ll just bookmark this page.
Nice post. I was checking continuously this blog and I’m impressed!
Very helpful info specially the last part 🙂 I care for such information much.
I was seeking this particular info for a very long time.
Thank you and good luck.
whoah this blog is great i love reading your articles. Stay up the
great work! You realize, many persons are looking round for this information, you could help them greatly.
Also visit my homepage :: สมัครเว็บหวย LOTTOVIP
I’m amazed, I must say. Seldom do I encounter a blog that’s both educative and interesting,
and let me tell you, you’ve hit the nail on the head.
The problem is something not enough people are speaking intelligently
about. Now i’m very happy I stumbled across this during my search for something concerning this.
If you wish for to obtain much from this post then you have to apply these techniques to your won webpage.
Hello! Would you mind if I share your blog with my
facebook group? There’s a lot of folks that I think would really enjoy
your content. Please let me know. Many thanks https://app.globalteachershub.com/read-blog/54100_individualki-caratov.html