批处理之家 - Powered by Discuz! Board

标题: [问题求助] [已解决]VBS如何结束多个进程呢？ [打印本页]

作者: Heykuz 时间: 2014-3-8 18:34 标题: [已解决]VBS如何结束多个进程呢？

一直用以下代码，如果是多个的时候，也只能复制多一次，把exe名字给改了，代码有点儿累赘。能精简一下吗？例如iexplore.exe，QQ.exe，vb6.exe。

strComputer="."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colProcessList=objWMIService.ExecQuery ("select * from Win32_Process where Name='iexplore.exe' ") 
For Each objProcess in colProcessList  
objProcess.Terminate()
Next
复制代码

作者: apang 时间: 2014-3-8 19:06

where Name='iexplore.exe' or Name='QQ.EXE' or Name='vb6.exe'

作者: 522235677 时间: 2014-3-8 19:43

或者cmd

tasklist /f /im qq.exe /im iexplore.exe
复制代码

strComputer="."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colProcessList=objWMIService.ExecQuery ("select * from Win32_Process where Name='wscript.arguments(0)' ") 
For Each objProcess in colProcessList  
objProcess.Terminate()
Next
复制代码

或者vbs传递参数

作者: Heykuz 时间: 2014-3-9 13:47

where Name='iexplore.exe' or Name='QQ.EXE' or Name='vb6.exe'
apang 发表于 2014-3-8 19:06

超级感谢，就是这样。谢谢谢谢谢谢

欢迎光临批处理之家 (http://www.bathome.net/)