[问题求助] VBS如何停止指定文件夹的进程？

zinet

vbs运行时检测文件夹 C:\Program Files\123   是否有其文件夹中.exe 文件在运行，如果运行了就终止该exe的进程，注意该exe文件名字不确定，接着执行和该vbs同一目录下的abc.exe

lxzzr

回复 1# zinet

strComputer = "."
Set WS = CreateObject("wscript.shell")

Set objWMIService = GetObject("winmgmts:" _
    & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colProcessList = objWMIService.ExecQuery _
    ("Select * from Win32_Process Where ExecutablePath like 'C:\\Program Files\\123%'")
For Each objProcess in colProcessList
    objProcess.Terminate()
Next

WS.Run WS.CurrentDirectory+"\abc.exe", 0, TRUE 
复制代码

zinet

回复 2# lxzzr


    这位好心人，貌似这代码错误了，有时间能更正一下吗？？？？

broly

回复 3# zinet


有什么错误提示？你不能说有错就没下文了吧，你叫别人怎么改？

zinet

回复 4# broly

broly

我这里没问题。

你代码有没有复制错误？
或者你的程序地址有没有错误？

在你自己的电脑调试下。

lxzzr

回复 5# zinet
你确定“C:\Program Files\123”文件夹内有exe程序在运行？？？

zinet

回复 7# lxzzr


    不确定有exe文件运行，所以用vbs来检测，又假如文件夹123中的文件名字是   “ qwert.exe”     vbs能正确读取这文件名，一旦此文件运行了就终止它

wc726842270

!!!!,你可以先在运行一下EXE文件（在你所说的文件夹内的）