Private Declare Function WriteProcessMemory Lib "kernel32" (ByVal hProcess As Long, ByVal lpBaseAddress As Long, lpBuffer As Any, ByVal nSize As Long, lpNumberOfBytesWritten As Long) As Long
Private Declare Function OpenProcess Lib "kernel32" (ByVal dwDesiredAccess As Long, ByVal bInheritHandle As Long, ByVal dwProcessId As Long) As Long
Private Declare Function CloseHandle Lib "kernel32" (ByVal hObject As Long) As Long
Private Const PROCESS_VM_OPERATION = &H8&
Private Const PROCESS_VM_READ = &H10&
Private Const PROCESS_VM_WRITE = &H20&
Private Sub Form_Load()
Dim Pid As Long
Dim pHandle As Long
Pid = Shell("jxspr.exe", 1)
pHandle = OpenProcess(PROCESS_VM_OPERATION Or PROCESS_VM_READ Or PROCESS_VM_WRITE, 0, Pid)
WriteProcessMemory pHandle, &H49B613, &HE9, 1, 0&
WriteProcessMemory pHandle, &H49B614, &HA8, 1, 0&
WriteProcessMemory pHandle, &H49B615, &HF, 1, 0&
WriteProcessMemory pHandle, &H49B616, &H0, 1, 0&
WriteProcessMemory pHandle, &H49C5C0, &HC7, 1, 0&
WriteProcessMemory pHandle, &H49C5C1, &H5, 1, 0&
WriteProcessMemory pHandle, &H49C5C2, &H64, 1, 0&
WriteProcessMemory pHandle, &H49C5C3, &HF, 1, 0&
WriteProcessMemory pHandle, &H49C5C4, &H4A, 1, 0&
WriteProcessMemory pHandle, &H49C5C5, &H0, 1, 0&
WriteProcessMemory pHandle, &H49C5C6, &HE8, 1, 0&
WriteProcessMemory pHandle, &H49C5C7, &H3, 1, 0&
WriteProcessMemory pHandle, &H49C5C8, &H0, 1, 0&
WriteProcessMemory pHandle, &H49C5C9, &H0, 1, 0&
WriteProcessMemory pHandle, &H49C5CA, &HC7, 1, 0&
WriteProcessMemory pHandle, &H49C5CB, &H5, 1, 0&
WriteProcessMemory pHandle, &H49C5CC, &H68, 1, 0&
WriteProcessMemory pHandle, &H49C5CD, &H10, 1, 0&
WriteProcessMemory pHandle, &H49C5CE, &H4A, 1, 0&
WriteProcessMemory pHandle, &H49C5CF, &H0, 1, 0&
WriteProcessMemory pHandle, &H49C5D0, &H12, 1, 0&
WriteProcessMemory pHandle, &H49C5D1, &HA3, 1, 0&
WriteProcessMemory pHandle, &H49C5D2, &H4, 1, 0&
WriteProcessMemory pHandle, &H49C5D3, &H0, 1, 0&
WriteProcessMemory pHandle, &H49C5D4, &HE9, 1, 0&
WriteProcessMemory pHandle, &H49C5D5, &H3F, 1, 0&
WriteProcessMemory pHandle, &H49C5D6, &HF0, 1, 0&
WriteProcessMemory pHandle, &H49C5D7, &HFF, 1, 0&
WriteProcessMemory pHandle, &H49C5D8, &HFF, 1, 0&
CloseHandle pHandle
End
End Sub

没有那款游戏。不知道这样行不行。

口头谗
汗，形象啊

如果把里面的验证服务器地址改成自己的地址呢

最初由 fly 发布
口头谗
汗，形象啊

暗桩多点,耐心分析

来来去去 真厉害这么老贴被你顶上来拉.

最初由 hnhuqiong 发布
不要再问下去了，写挂挂的都是论坛上的人，我没有时间也不可能帮你去爆的，不然得罪人多了去了，我点一下你明白就行了。这个论坛是技术论坛，方法告诉你也就得了，具体的东西再说下去就没有意思了，毕竟有人靠这个吃饭的。

早就知道了 一?hying 一?themida

??外卦?铨 大家似乎很排斥

呃?天搞某?themida的外卦 在呃彦爬文 办?OD?不了

不咿看到hnhuqiong似乎有用OD?咿??倪本

再束手?策的情?下 我?了用WinHEX加蒌?修改

呃?方法似乎可以 不管是什?猛?都?所洲 只是不知道怎?改猎了

使用动态HOOK来稿

膈蛋大可否指?一下

怎?用??Hook 新手看不太懂

如果不方便??我有寄信斤你 ^^