获取64位进程的路径

最恨VC · 发表于 2019-5-15 00:33:44

只有一张不完整的截图，谁知道这个API完整的是什么？哪个大神可以把它补成完整源码

り铕靺╮铕樣﹏ · 发表于 2019-5-15 00:33:45

.版本 2

.DLL命令 OpenProcess, 整数型, , "OpenProcess", , 打开进程
.参数 dwDesiredAccess, 整数型
.参数 bInheritHandle, 整数型
.参数 dwProcessId, 整数型

.DLL命令 GetProcessImageFileName, 整数型, "psapi.dll", "GetProcessImageFileNameA"
.参数 hProcess, 整数型
.参数 lpImageFileName, 文本型
.参数 nSize, 整数型

.DLL命令 QueryDosDeviceA, 整数型, "kernel32.dll", "QueryDosDeviceA"
.参数 lpDeviceName, 文本型
.参数 lpTargetPath, 文本型
.参数 ucchMax, 整数型

.版本 2

.子程序进程取路径, 文本型
.参数 PID, 整数型
.局部变量 _局部1
.局部变量 _局部2, 文本型
.局部变量 _局部3, 文本型
.局部变量 _局部4
.局部变量 _局部5, 文本型

_局部2 ＝取空白文本 (256)
_局部5 ＝取空白文本 (256)
_局部1 ＝ OpenProcess (位或 (1024, 16), 0, PID)
.如果真 (_局部1 ＝ 0)
返回 (“打开进程失败”)
.如果真结束
GetProcessImageFileName (_局部1, _局部2, 256)
.计次循环首 (26, _局部4)
_局部3 ＝字符 (64 ＋ _局部4) ＋ “:”
QueryDosDeviceA (_局部3, _局部5, 256)
.如果真 (寻找文本 (_局部2, _局部5, , 假) ≠ -1)
_局部2 ＝子文本替换 (_局部2, _局部5, _局部3, , , 真)
返回 (_局部2)
.如果真结束

.计次循环尾 ()
返回 (_局部2)