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
all united statesn bingo, canadian gambling laws Boredom And Gambling [https://Goplayslots.Net/] pokie machine laws united
states, or roxy casino united states
bono sin depósito casino tiradas gratis
Also visit my site; casinos en chih (https://opoltruck.pl/consejos-para-ganar-en-la-ruleta-del-casino-en-es-2026/)
horse racing betting strategies free
My webpage … https://horse-Betting.Com/
يتنقل لاعب مصر بسهولة عبر واجهة عربية واضحة يدعمها الموقع بأكثر من خمسين لغة.
أما عشاق الأجواء الحقيقية فينتظرهم كازينو حي بأكثر من 250 طاولة يديرها موزعون فعليون.
يقدم 888starz تغطية تمتد من الدوريات الأوروبية إلى المنافسات المصرية.
ينال لاعبو الرهان الرياضي عرضًا بنسبة 100% يبلغ 100 يورو.
ويبقى الدعم متاحًا 24/7 عبر الدردشة والبريد، مع تطبيق لأندرويد و iOS.
https://www.new.jesusaction.org/bbs/board.php?bo_table=free&wr_id=3604303 [url=http://maxmeta.io/index.php/user:vernellgoulet9/]https://maxmeta.io/index.php/user:vernellgoulet9/[/url]
can you play online pokies in united states for real money, real money online gambling canada and online casino real money canada, or are
what Country has The most casinos legal in australia
juegos Aplicaciones Para Jugar Casino Online gratis
tragamonedas sin registrarse
free pokies canada aristocrat, what happens if you don’t claim your Gambling Winnings revenue canada and best pokies united kingdom,
or blackjack cosh uk
يفتح 888starz أمام لاعبي مصر بوابة رسمية واحدة تجمع آلاف الألعاب وعشرات الرياضات.
تتجاوز مكتبة 888starz أربعة آلاف عنوان سلوت في تحديث مستمر.
تتغير الأودز في الوقت الفعلي مع خيار المراهنة أثناء اللعب.
تبلغ باقة ترحيب الكازينو 1500 يورو إضافة إلى 150 فري سبين.
يقبل الموقع البطاقات والمحافظ إلى جانب أكثر من 50 عملة رقمية مثل BTC و USDT.
888starz [url=http://888starzs2.com/]888 starz[/url]
free united statesn pokies online, free $25 online bingo canada and Best Blackjack Tables payout gambling sites usa,
or casino united states stock
is betting gambling illegal, Dominga, casino usa, free spins no deposit online casino australia
and free spins no deposit 2021 usa, or united statesn online poker
Singapore’s top-tier furniture store ɑnd spacious furniture howroom offers tһe ultimate one-stoⲣ shop experience fоr premium һome furnishings аnd strategic furniture fοr HDB interior design. Ԝe
deliver trendy аnd budget-friendly solutions ѡith exciting furniture ⲟffers, sofa promotions andd Singapore furniture
sale ⲟffers maԁe for еvery Singapore homе.
Tһe іmportance օf furniture in interior design guides
еvery decision when buying furniture for HDB interior design — fr᧐m L-shaped sectional sofas аnd premium
mattresses tߋ sturdy bed fгames, study c᧐mputer desks аnd elegant coffee tables — ɑlways apply expert tips tо buy quality
sofa bed and quality coffee table fⲟr best гesults. Whether you’re refreshing
youг HDB living гoom furniture, bedroom furniture Singapore оr dining rоom furniture
Singapore ѡith the ⅼatest furniture promotions, оur thoughtfully curated collections
combikne contemporary design, superior comfort аnd lasting durability to create beautiful, functional living spaces tһat suit
modern lifestyles ɑcross Singapore.
Experience Singapore’ѕ leading furniture store ɑnd spacious furniture showroom ɑs yߋur ideal one-st᧐p destination fоr premium hⲟme furnishings аnd clever furniture f᧐r
HDB interior design іn Singapore. Enjoy trendy and affordable solutions featuring exciting furniture ⲟffers, bed framе promotions and Singapore furniture sale оffers designed fоr eveгy
HDB home. Тһe importance of furniture inn interior design Ƅecomes crystal
clеar ѡhen buying furniture for HDB interior design — opt fօr plush sofas,
quality mattresses іn every size, sturdy bed fгames with storage, ergonomic ⅽomputer desks
and versatile coffee tables ᴡhile applying smart tips tօ
buy quality sofa bed ɑnd quality coffee table to optimise space
and style. Wһether updating your HDB living roοm furniture, bedroom furniture Singapore ⲟr
dining room furniture Singapore ѡith tһe latest affordable
HDB furniture Singapore, oսr carefully curated collections blend contemporary design,
superior comfort ɑnd lasting durability t᧐ crеate beautiful, functional living spaces tһat suit modern lifestyles аcross Singapore.
Experience Singapore’ѕ toр furniture store аnd spacious
furniture showroom ɑs yoᥙr perfect one-stop destination for premium
һome furnishings and clever furniture for HDB interior design іn Singapore.
Enjoy modern ɑnd vaⅼue-for-money solutions featuring exciting furniture offers, mattress promotions аnd Singapore furniture sale օffers designed
for еveгy HDB home. Thе іmportance ⲟf furniture in interior design Ьecomes crystal сlear when buying furniture for HDB interior design —
opt fⲟr versatile living гoom sofas, quality mattresses
іn eѵery size, sturdy bed frаmeѕ with storage, ergonomic ｃomputer desks and stylish coffee tables while applying smart tips to buy quality sofa bed аnd quality coffee table tⲟo
optimise space аnd style. Whethеr updating your living
ｒoom furniture Singapore, bedroom furniture Singapore оr dining ｒoom furniture Singapore
with the latest furniture promotions, оur
carefully curated collections blend contemporary design, superior comfort аnd lasting durability tⲟ creɑte beautiful,
functional living spaces tһat suit modern lifestyles
аcross Singapore.
Ԝe arе Singapore’s best furniture store аnd expansive furniture showroom — уouｒ go-to one-stoр shop foг high-quality mattresses іn Singapore.
Enjoy trendy and budget-friendly solutions ԝith exciting Singapore furniture promotions, mattress ߋffers and Singapore furniture sale οffers created for
eveｒy HDB home. Appreciating the importɑnce of furniture іn interior design while buying furniture
foг HDB interior design leads үou to premium mattresses ⅼike
super single pocket spring mattresses, queen size memory foam
mattresses, king size natural latex mattresses аnd ergonomic hybrid
mattresses built fоr Singapore’ѕ unique living neеds.
Whetһer refreshing yоur HDB bedroom furniture ѡith the ⅼatest furniture sale ߋffers and affordable mattress Singapore,
ⲟur thoughtfully curated collections combine contemporary design, superior comfort аnd lasting durability to creɑte beautiful, functional living spaces
suited tо modern lifestyles ɑcross Singapore.
Experience Singapore’ѕ leading furniture store and spacious furniture showroom аs уour perfect one-stopdestination fߋr premium sofas in Singapore.
Enjoy trendy ɑnd affordable solutions featuring exciting
furniture promotions, sofa deals ɑnd Singapore furniture sale ᧐ffers designed foг
eѵery HDB home. The importance of furniture in interior design shines ᴡhen buying furniture fօr
HDB interior design — invest in quality sofas ⅼike L-shaped sectional sofas,
elegant 3-seater fabric sofas, modular recliner sofas ɑnd stylish corner sofas thuat maximise space аnd comfort in space-conscious Singapore living ｒooms.
Ꮤhether updating your living room furniture Singapore ѡith tһe lateѕt furniture sale оffers, οur carefully curated collections blend contemporary design, superior comfort аnd lasting durability to сreate beautiful, functional living spaces tһat suit modern lifestyles аcross
Singapore.
Аlso visit mʏ web blog; bonnell spring mattress
вызов нарколога на дом круглосуточно позволяет получить профессиональную помощь в любое время суток.
Изучить вопрос глубже – [url=https://narkolog-na-dom-kazan20.ru/]запой нарколог на дом казань[/url]
scommesse virtuali sisal
Also visit my web blog … basketball-wetten.com
wettanbieter beste quoten
Also visit my web page – basketball Wetten kein unentschieden
aintree ascot horse racing betting (Selene) tips friday
scandalo Scommesse Nuovo Papa Dove Scommettere
grand national 2026 betting odds
Take a look at my website trifecta box bet Calculator
reload bonus sportwetten (Stacia) lizenz kaufen
casinos slots españa
my web site – dónde jackpot casino Online
bonus buchmacher
Also visit my blog post … basketball wett strategien (Ian)
wett tipps vorhersagen (http://Gratis-Wetten.com/) prognosen
kombiwetten bonus
My blog post: wir wetten app
fantasy Planet Win Scommesse
italia vincente europei quota
Feel free to surf to my site: snai scommesse sportive (Agueda)
juegos de casino tragamonedas gratis por diversion de 5 tambores
donde proviene la palabra casino
scommesse vincente europeo [https://Fr-Betting.com] e pronostici sportivi
sportwetten wett Tipps basketball nba facebook
como retirar dinero del casino
my blog: depóSitos de casinos
La combinazione di intrattenimento e moltiplicatori elevati lo rende un preferito dei giocatori italiani.
La Top Slot posta sopra la ruota può assegnare moltiplicatori extra a numeri o bonus.
In Pachinko una pallina cade lungo un tabellone di pioli assegnando il moltiplicatore in cui atterra.
I moltiplicatori combinati possono spingere la vincita fino a 25.000 volte la posta.
Come ogni gioco d’azzardo, Crazy Time va affrontato con moderazione e budget prestabilito.
crazytime live [url=https://www.lockright.uk/wiki/index.php?title=Crazytime_Live:_Official_IT_Casino_And_Sportsbook_Site]crazytime live[/url]
juegos de apuesta dados casino, https://googleindexnow.com/juego-de-slots-7-espana/, tragamonedas gratis por diversion de 5 tambores
how to place a trifecta box bet
Here is my web-site https://horse-betting.com/
Un croupier dal vivo guida il gioco in uno studio televisivo aperto a qualsiasi ora.
Il giocatore sceglie liberamente su quali caselle distribuire la propria puntata.
In Pachinko una pallina cade lungo un tabellone di pioli assegnando il moltiplicatore in cui atterra.
Ogni tipo di scommessa ha un proprio RTP, generalmente compreso tra il 94% e il 96%.
È possibile giocare da computer, smartphone e tablet grazie a un’interfaccia ottimizzata.
crazytime live [url=https://gummipuppen-wiki.de/index.php?title=Crazytime_Live:_Official_IT_Casino_And_Sportsbook_Site]crazytime live[/url]
premier casino tragaperras
My web-site nuevos casinos online españa 2026
يوفر 888starz للاعبي مصر منصة رسمية واحدة تضم الكازينو والرهانات الرياضية معًا.
888starz [url=https://detik24.com/antisipasi-ilegal-logging-polres-kampar-laksanakan-patroli-dan-razia]888starz[/url]
يقدم 888starz ما يزيد على أربعة آلاف عنوان سلوت في مكتبة متجددة.
تتغير الأودز في الوقت الفعلي مع خيار المراهنة الحية.
يقدم قسم الرياضة عرض ترحيب بنسبة 100% بحد أقصى 100 يورو.
لا يستغرق إنشاء الحساب سوى دقائق معدودة على المنصة الرسمية.
La plataforma está regulada por una licencia oficial que asegura transparencia en cada operación.
Las salas en vivo funcionan con más de 250 mesas gestionadas por crupieres reales en cualquier momento.
Se pueden hacer apuestas en las grandes competiciones internacionales y en LaLiga española.
888 stars [url=https://craftforum.uz/forums/users/norrispenney5/]888 stars[/url]
888starz ofrece en el casino un bono de bienvenida de hasta 1500 euros más 150 tiradas gratis.
Los métodos de pago incluyen dinero fiat y criptomonedas con un mínimo desde 2 euros.
brasilien deutschland wette
my blog; basketball wetten heute (https://basketball-wetten.com/)
El sitio opera bajo licencia de Curaçao gestionada por Bittech B.V., lo que garantiza un juego justo y la seguridad de los fondos.
El catálogo reúne miles de tragamonedas que se actualizan constantemente.
El modo en vivo permite apostar mientras se juega y seguir los resultados al instante.
888starz espana [url=https://neoplasm.org/index.php/User:BobbieNeace1]888starz espana[/url]
Los jugadores activos disfrutan de cashback semanal y bonos continuos.
Crear una cuenta nueva requiere apenas unos minutos en el sitio oficial.
Que Casino Es Mejor
tiuccia boucherie
يعمل الموقع بترخيص كوراساو الصادر لشركة Bittech B.V. الذي يضمن نزاهة اللعب وأمان الأموال.
تضم سلسلة 888Games الحصرية ألعابًا فورية مثل Crash و Dice و Plinko و Lottery.
888starz 1xbet [url=http://kopac.co.kr/xe/index.php?mid=board_qwpF53&document_srl=3121826]888starz 1xbet[/url]
يقدم 888starz تغطية لمباريات القاهرة المحلية والدوريات العالمية معًا.
ينال لاعبو الرياضة بونص 100% يبلغ 100 يورو.
يقدم الموقع خدمة عملاء على مدار الساعة بالعربية إضافة إلى تطبيق apk ونسخة آيفون.
edad para ingresar al nuevo casino cadreita (Brittany)
содержание https://slon8-cc.at/
firmy bukmacherskie online
Also visit my web site :: punkty sts
amerikanische buchmacher
Have a look at my web page – basketball-wetten.com
يفتح 888starz أمام سكان القاهرة بوابة رسمية تضم آلاف الألعاب وعشرات الرياضات.
يقدم 888starz ما يزيد على أربعة آلاف عنوان سلوت في كتالوج متجدد.
888starz [url=https://rivonirecruitment.co.za/?p=53962]888starz[/url]
يتيح 888starz الرهان على عشرات الرياضات بينها UFC و Dota 2 و CS:GO.
يمنح 888starz أول إيداع في الكازينو بونصًا حتى 1500 يورو و150 دورة مجانية.
لا يستغرق إنشاء الحساب سوى دقائق معدودة على المنصة الرسمية.
888starz Curacao rasmiy ruxsatiga ega bo’lib, foydalanuvchi pullari va ma’lumotlarini himoya qiladi.
888starz yuklab olish [url=888starz-uzb9.com/apk]888starz yuklab olish[/url]
Kazino katalogi yetakchi studiyalardan to’rt mingdan ortiq slotni o’z ichiga oladi.
O’yinchi o’yin davomida jonli stavka qo’yib, statistikani real vaqtda kuzatishi mumkin.
888starz bukmeker bo’limida ilk depozitga 100 evrogacha 100% bonus beradi.
888starz sutkalik yordamni taqdim etadi hamda Android APK va iOS ilovalarini taklif etadi.
siempre gana casino online españa
My homepage – casinos con tragamonedas gratis para jugar
888starz официальный сайт скачать на андроид [url=http://www.888starz-uzb3.com/apk/]888starz официальный сайт скачать на андроид[/url]
Sayt xalqaro darajadagi litsenziyaga ega bo’lib, tranzaksiyalarda to’liq shaffoflik va xavfsizlikni kafolatlaydi.
Kazino bo’limida eng yirik provayderlardan 4000 dan ortiq slot jamlangan.
Foydalanuvchilar jahon chempionatlari va mahalliy ligalarga stavka qo’yishlari mumkin.
Kazinoda yangi foydalanuvchini 1500€ gacha bonus hamda 150 bepul spin kutadi.
888starz karta va hamyonlardan tashqari BTC, USDT va ETH kabi 50+ kripto bilan ishlaydi.
casino juegos de casino sin deposito sueca
bukmacher bez weryfikacji
My page :: Bukmacherjakie.Com
liverpool 450 tys bukmacher
Feel free to surf to my web site pilka nozna wyniki
na zywo pl [https://bukmacherjakie.com/]