Send an email from your friends account!

• Author: Iambetterthanu.com
• Filed under: Computer Pranks
• Date: Oct 11,2007

I don’t know about you but I love pranking my friends. One of my favorite pranks is sending emails from their account to friends, girlfriends or family. But how do you do that? You might be thinking you need to hack into an account or install some spy ware but you don’t.

You can download my copy here (it’s a vbs file, anti virus might call it a virus)
Supplies:

• Note Pad
• That is it

Step1: Open note pad

Step2: Copy this code into note pad

Set objMessage = CreateObject(“CDO.Message”)
objMessage.Subject = “EMAIL ANY ONE”
objMessage.From = “YourFriends@Email.com”
objMessage.To = “HisMothers@Email.com”
objMessage.TextBody = “Funny TEXT”

objMessage.Configuration.Fields.Item _
(“http://schemas.microsoft.com/cdo/configuration/sendusing”) = 2

‘Name or IP of Remote SMTP Server
objMessage.Configuration.Fields.Item _
(“http://schemas.microsoft.com/cdo/configuration/smtpserver”) = “mail.YOURSERVER.com”

‘Server port (typically 25)
objMessage.Configuration.Fields.Item _
(“http://schemas.microsoft.com/cdo/configuration/smtpserverport”) = 25

objMessage.Configuration.Fields.Update

objMessage.Send

Step3: Update the key fields with the appropriate information

• The server field is the first one you should edit, without it this wont work.  Change the mail.youserver.com to be your company websites or your local smtpserver.   It might take some looking around to figure this out.  Call your ISP for information, or if you have a website you can use yours.
  • (“http://schemas.microsoft.com/cdo/configuration/smtpserver”) = “mail.YOURSERVER.com”
• This field is the title of the email. So if you are sending an email to his mother, it could be “It’s a boy”
  • objMessage.Subject = “EMAIL ANY ONE”
• The next field is the email you want it to appear from
  • objMessage.From = “YourFriends@Email.com”
• The next field is the email you want it to go to
  • objMessage.To = “HisMothers@Email.com”
• Last field is what you want the email to say
  • objMessage.TextBody = “Hey Mom, Guess who is going to be a daddy!”

Step4: Save the file as a VBS file. So the name should look something like this, Emailfile.vbs

Step5: When you want to send the email just double click on the file and the email will be off.

If you want to edit the email in the future just right click on the file and click edit.

That is it, your email will be sent and your friend will have no clue.