主题：求助，如何获得(windowsXP)所有进程的路径?
powerprefectsoftwate
[专家分：180] 发布于 2009-07-08 13:25:00
求助，如何获得(windowsXP)所有进程的路径?
回复列表 （共2个回复）
沙发
cagd [专家分：410] 发布于 2009-07-10 12:47:00
Declare integer CreateToolhelp32Snapshot in win32api integer,integer
Declare integer Process32First in win32api integer,string @
Declare integer Process32Next in win32api integer,string @
Declare integer CloseHandle in win32api integer
Crea curs Prolists (Proname C(36),Prolist C(254))
lnHand = 0
lnHand = CreateToolhelp32Snapshot(3,0)
If lnHand>0
lcTitle = SPACE(600)
If Process32First(lnHand,@lcTitle) > 0
Do while Process32Next(lnHand,@lcTitle)> 0
Insert Into Prolists (Proname,Prolist) Values (subs(lcTitle,1,36),subs(lcTitle,37))
Enddo
Endif
CloseHandle(lnHand)
Endif
Sele Prolists
Brow
Return
我来回复
您所在位置：社区首页 — Visual Foxpro讨论区 — 求助，如何获得(windowsXP)所有进程的路径?