植物大战僵尸3破解版破解版161的内存

来源：蜘蛛抓取(WebSpider) 时间：2016-08-04 05:03 标签： 植物大战僵尸2破解版0
植物大战僵尸2破解版50内存_百度知道植物大战僵尸修改器，读取内存问题_vb吧_百度贴吧
&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&签到排名：今日本吧第个签到，本吧因你更精彩，明天继续来努力！
本吧签到人数：0成为超级会员，使用一键签到本月漏签0次！成为超级会员，赠送8张补签卡连续签到：天&&累计签到：天超级会员单次开通12个月以上，赠送连续签到卡3张
关注：93,701贴子：
植物大战僵尸修改器，读取内存问题收藏
这是我写的植物大战僵尸的 修改器源码。但是 到 读取内存那里。就读取不到了。。读取的是0我写的那里错了呢。我找了半天。郁闷死了。大家帮帮忙。我哪里写错了。。Option ExplicitPrivate Declare Function GetLastError Lib "kernel32" () As Long Private Declare Function OpenProcess Lib "kernel32" (ByVal dwDesiredAccess As Long, ByVal bInheritHandle As Long, ByVal dwProcessId As Long) As LongPrivate Declare Function GetWindowThreadProcessId Lib "user32" (ByVal hwnd As Long, lpdwProcessId As Long) As LongPrivate Declare Function GetWindowText Lib "user32" Alias "GetWindowTextA" (ByVal hwnd As Long, ByVal lpString As String, ByVal cch As Long) As LongPrivate Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As LongPrivate Declare Function ReadProcessMemory Lib "kernel32" (ByVal hProcess As Long, lpBaseAddress As Any, lpBuffer As Any, ByVal nSize As Long, lpNumberOfBytesWritten As Long) As LongPrivate Declare Function WriteProcessMemory Lib "kernel32" (ByVal hProcess As Long, lpBaseAddress As Any, lpBuffer As Any, ByVal nSize As Long, lpNumberOfBytesWritten As Long) As LongPrivate Declare Function CloseHandle Lib "kernel32" (ByVal hObject As Long) As LongPrivate Const STANDARD_RIGHTS_REQUIRED = &HF0000Private Const TOKEN_ASSIGN_PRIMARY = &H1Private Const TOKEN_DUPLICATE = (&H2)Private Const TOKEN_IMPERSONATE = (&H4)Private Const TOKEN_QUERY = (&H8)Private Const TOKEN_QUERY_SOURCE = (&H10)Private Const TOKEN_ADJUST_PRIVILEGES = (&H20)Private Const TOKEN_ADJUST_GROUPS = (&H40)Private Const TOKEN_ADJUST_DEFAULT = (&H80)Private Const TOKEN_ALL_ACCESS = (STANDARD_RIGHTS_REQUIRED Or TOKEN_ASSIGN_PRIMARY Or _TOKEN_DUPLICATE Or TOKEN_IMPERSONATE Or TOKEN_QUERY Or TOKEN_QUERY_SOURCE Or _TOKEN_ADJUST_PRIVILEGES Or TOKEN_ADJUST_GROUPS Or TOKEN_ADJUST_DEFAULT)Private Sub Command1_Click()Call drawEnd Sub Private Sub Command2_Click()Dim hw&, cnt&, lpdwProcessId&, hProcess&, Succeed&, AA&Dim Base As Long, Base2 As LongDim rttitle As String * 256cnt = GetWindowText(WortHwnd, rttitle, 255)Print WortHwndhw = GetWindowThreadProcessId(WortHwnd, lpdwProcessId)Print lpdwProcessIdhProcess = OpenProcess(TOKEN_ALL_ACCESS, False, lpdwProcessId)Print hProcessAA = ReadProcessMemory(hProcess, ByVal &H6A9EC0 + &H768, Base, 4, 0&) '这里base就是读取的0Print AA, BaseAA = ReadProcessMemory(hProcess, ByVal Base + &H5560, Base2, 4, 0&)Print AA, Base2Succeed = WriteProcessMemory(hProcess, Base2, 999, 4, 0&)Print SucceedCloseHandle hProcessEnd Sub
三叔正版授权网游公测！
建议检查令牌权限，有点忘了……
权限应该没有问题的。。OpenProcess
已经成功了。。就是读取内存的时候。AA = ReadProcessMemory(hProcess, ByVal &H6A9EC0 + &H768, Base, 4, 0&) '这里base就是读取的0
太深奥了我要努力啊
你确定那个地址是正确的？
Const PROCESS_VM_READ = &H10OpenProcess(PROCESS_VM_READ, False, GamePid)
上面的代码都没有问题的。。
OpenProcess
打开进程 是成功的。。常量我也换过。。还是到哪里就是0了。。基址和偏移。我保证是正确的。。
我看了下，那段内存是不可写入的资源数据啊
登录百度帐号推荐应用
为兴趣而生，贴吧更懂你。或后使用我的收藏没有帐号？
关注：1193
所属分类： &
查看: 23|回复: 1
植物大战僵尸2高清破解版的运行内存是多少
发表于 7&天前
植物大战僵尸2高清破解版的运行内存是多少
点这里&&&&
196245金币
TA的勋章：
发表于 7&天前
512足够了。最好买运存有1g的玩的更流畅！希望对你有所帮助，祝你游戏愉快！更多详情请密切关注
指尖每日首次回帖可以赚5金币（）收起回复展开回复
点这里&&&&
今日EVA出击！参与送ipadmini4！
注册账号后积极发帖的各位会员(注册10天内发20贴以上)
经常在论坛发帖，且发帖量较大（发帖量4000以上）
限量十二星座勋章：天蝎座
花费1500论坛金币在勋章商店中购买植物大战僵尸内存多大！_百度知道植物大战僵尸破解版无需sd卡下载_百度知道

我要回帖

更多关于 植物大战僵尸2破解版0 的文章

 

随机推荐