深度zhuzb的《Nod32 2.7 密码获取autoit源代码》

bdrdc

转帖：http://soft.deepin.org/read.php?tid=756463&page=e&#a

1. Global $Array[20] = [0x61, "D6", 0xD4, "E9", 0xDD, "F0", 0xFB, "F2", 0x5B, "64", 0x35, "AD", 0xB7, "C8", 0x19, "75", 0xEC, "31", 0x2B, "BC"]
   
2. 
   
3. ;从网页获取Nod32帐号和密码
   
4. $down = "http://www.nod32sky.com/nod32-key/";打开当ID页面
   
5. $new_file = @TempDir & "\nod32id.txt"
   
6. TrayTip("提示", "请等待,正从网页获取ID", 5, 1)
   
7. InetGet($down, $new_file, 1, 0)
   
8. $file = FileOpen(@TempDir & "\nod32id.txt", 0)
   
9. $line = FileRead($file)
   
10. $account = StringRegExp($line, "[Uu][Ss][Ee][Rr][Nn][Aa][Mm][Ee]:\s{0,}(EAV-\w{7,8})", 3);获取用户名称，ID的正规表达式
    
11. $code = StringRegExp($line, "[Pp][Aa][Ss][Ss][Ww][Oo0][Rr][Dd]:\s{0,}(\w{10})", 3);获取密码，密码的正规表达式
    
12. 
    
13. ;将帐号和密码写入到注册表中
    
14. $result =""
    
15. For $i = 1 to 10
    
16. $result = $result & Hex(BitXOR(Binary(Asc(StringMid($code[0], $i, 1))), $Array[2*$i-2]),2) & $Array[2*$i-1] ;密码的加密算法
    
17. Next
    
18. 
    
19. $Username = $account[0]
    
20. $Password = "0x"&$result
    
21. 
    
22. RegWrite("HKLM\SOFTWARE\Eset\Nod\CurrentVersion\Modules\Update\Settings\Config000\Settings", "Username","REG_SZ",$Username)
    
23. RegWrite("HKLM\SOFTWARE\Eset\Nod\CurrentVersion\Modules\Update\Settings\Config000\Settings", "Password","REG_BINARY",$Password)
    

复制代码

更多资料,可到我网站来查阅http://www.1msoft.com

PS:
以上都是ID获取器的难点，你可以利用这个成果继续完成更详细、更完善的功能，比如自己编个下载病毒库的程序玩玩。
以上代码未经测试

[ 本帖最后由 bdrdc 于 2008-9-27 12:01 编辑 ]

lovehai

#l%55 沙发...
感谢分享咯

hat

看看，不咋懂，深度那个升级器确实很好用，哪位有深度的注册号啊，站内短信给我一个邀请码吧，谢谢

hyly999

深度不是关了吗？

hat

原帖由 hyly999 于 2008-9-27 13:04 发表

                               
登录/注册后可看大图

深度不是关了吗？

这样啊。。

yvzhou3308

是使用源代码获取的额吗？？回楼上不知道不要瞎说，我昨天还上呢

zhyply

不错，值得学习一下