远程汇编模块源码 申请远程内存

.子程序 申请远程内存, 整数型, 公开, 默认申请1024字节的内存
.参数 size, 整数型, 可空
.局部变量 addr, 整数型

.如果真 (size ＝ 0)
size ＝ 1024
.如果真结束
addr ＝ VirtualAllocEx (hProcess, 0, size, 4096, 4) ' 申请内存
返回 (addr)


.子程序 汇编远程执行, 逻辑型, 公开
.参数 Asmcode, 字节集
.参数 wait, 逻辑型, 可空
.局部变量 CallWindowProcA_addr, 整数型
.局部变量 hRemoteThread, 整数型
.局部变量 addr3, 整数型

CallWindowProcA_addr ＝ GetProcAddress (GetModuleHandleA (“user32.dll”), “CallWindowProcA”)
addr3 ＝ 字集远程写入 (Asmcode)
调试输出 (Asmcode)
hRemoteThread ＝ CreateRemoteThread (hProcess, 0, 0, CallWindowProcA_addr, addr3, 0, 0)
.如果真 (wait)
WaitForSingleObject (hRemoteThread, -1)
.如果真结束
返回 (hRemoteThread ≠ 0)