Board logo

标题: 如何用VBS检测进程并得到进程所在位置并改名.已解决 [打印本页]

作者: hackhd     时间: 2008-4-1 19:31    标题: 如何用VBS检测进程并得到进程所在位置并改名.已解决
比如检测到QQ.exe进程。如何判断这个QQ.exe所在的绝对路径!再把得到的文件名改了

Last edited by hackhd on 2008-4-1 at 10:19 PM ]

作者: plp626     时间: 2008-4-1 19:33
作者: abcd     时间: 2008-4-1 19:36
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")

Set colProcessList = objWMIService.ExecQuery _
("Select * from Win32_Process Where Name = 'qq.exe'")

For Each objProcess in colProcessList
MsgBox objProcess.executablepath
Next

作者: hackhd     时间: 2008-4-1 19:44
谢谢。

作者: hackhd     时间: 2008-4-1 21:33
已解决

Last edited by hackhd on 2008-4-1 at 10:18 PM ]