1个回答
推荐于2016-03-11
展开全部
版本 2
.子程序 取进程名, 文本型, 公开, 通进进程ID取得该进程文件名
.参数 进程ID, 整数型
.局部变量 快照句柄, 整数型
.局部变量 模块信息, 模块信息型
.局部变量 文件名, 文本型
快照句柄 = _创建快照 (8, 进程ID)
.如果真 (快照句柄 = -1)
返回 (“”)
.如果真结束
模块信息.size = 1024
_第一个模块 (快照句柄, 模块信息)
文件名 = 到文本 (模块信息.模块文件名)
_关闭对象 (快照句柄)
返回 (文件名)
.子程序 取进程名, 文本型, 公开, 通进进程ID取得该进程文件名
.参数 进程ID, 整数型
.局部变量 快照句柄, 整数型
.局部变量 模块信息, 模块信息型
.局部变量 文件名, 文本型
快照句柄 = _创建快照 (8, 进程ID)
.如果真 (快照句柄 = -1)
返回 (“”)
.如果真结束
模块信息.size = 1024
_第一个模块 (快照句柄, 模块信息)
文件名 = 到文本 (模块信息.模块文件名)
_关闭对象 (快照句柄)
返回 (文件名)
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询