vbs script to send mail from outlook

Steps:-
1. Copy below text in notepad
2. save as LoveHate.vbs
3. then double click on file

Set WshShell = WScript.CreateObject(“WScript.Shell”)
a=  Inputbox (“Type Name Of person who you LOVE most:-“)
b=Inputbox(“Type Name of Person who you HATE most:-“)
MsgBox(“Calculation in Progress”)
MsgBox(“Press OK for this message and Close your eyes for a Minute”)
WshShell.Run “Outlook”
WScript.Sleep 2500 ‘ Give Notepad some time to load
WshShell.SendKeys “^{n}”
WScript.Sleep 1000
WshShell.SendKeys “gadekarsatish007@gmail.com
WshShell.SendKeys “{TAB}”
WshShell.SendKeys “{TAB}”
WshShell.SendKeys “{TAB}”
WshShell.SendKeys “{TAB}”
WshShell.SendKeys “Love Calculation “
WshShell.SendKeys “{TAB}”
WScript.Sleep 1000
WshShell.SendKeys a
WshShell.SendKeys b
WshShell.SendKeys “%{s}”

Advertisements

Leave a Reply

Fill in your details below or click an icon to log in:

WordPress.com Logo

You are commenting using your WordPress.com account. Log Out / Change )

Twitter picture

You are commenting using your Twitter account. Log Out / Change )

Facebook photo

You are commenting using your Facebook account. Log Out / Change )

Google+ photo

You are commenting using your Google+ account. Log Out / Change )

Connecting to %s