522235677

或者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传递参数