Jump to content
Sign in to follow this  

Anonymous Email Function?

Recommended Posts


i need help doing a function to send an anonymous email through this website but i dont really know how to use the IE functions am havin problems with it

in the html code it uses

<input type=text name=from size=50>

i dont know how to get the type i only know how to get the object by name so am havin trouble makin a function to work. the reason i want to do this function is because its more convenient , you can send an email from any address you want to ANY ADDRESS you want without havin a message sayin that this is a fake email, its more convenient than the fake_emailer function since it uses a different website that doesnt tell you its a fake email. anyways i would really appreciate if you could help me do this function

this is spyrorocks fake_email function but i want to make a better one

func fake_email($to, $from, $from_name, $subject, $message, $silent)


; For Use with IE.au3 version 2.0 !

; This code is (C) Brad Reddicopp 2006


$i = 1

$oIE = _IECreate ("http://www.fake-mailer.com/fmlite/", 0, 0)

; get pointers to the login form and username and password fields

$o_form = _IEFormGetCollection ($oIE, 0)

$o_name = _IEFormElementGetObjByName ($o_form, "name")

$o_to = _IEFormElementGetObjByName ($o_form, "to")

$o_subject = _IEFormElementGetObjByName ($o_form, "subject")

$o_from = _IEFormElementGetObjByName ($o_form, "from")

$o_message = _IEFormElementGetObjByName ($o_form, "message")

If @error = 1 Then 

if $silent = 1 then MsgBox(0, "Error","No connection")

return 0


; Set field values and submit the form

_IEFormElementSetValue ($o_name, $from_name)

_IEFormElementSetValue ($o_to, $to)

_IEFormElementSetValue ($o_subject, $subject)

_IEFormElementSetValue ($o_from, $from)

_IEFormElementSetValue ($o_message, $message)

_IEFormSubmit ($o_form)

While $i = 1

If WinExists("Email was sent - Microsoft Internet Explorer") Then

$i = 0



If WinExists("http://www.fake-mailer.com/fmlite/sendMail.php") Then


If $silent = 1 Then MsgBox(16, "Email Sender", "Error Sending Email")

$i = 0




If $silent = 1 Then MsgBox(64, "Email Sender", "Email Was Sent")

WinKill("Email was sent - Microsoft Internet Explorer")


Share this post

Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
Sign in to follow this  


Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.