批处理之家 - Powered by Discuz! Board

标题: [问题求助] 【已解决】VBS调用WMI时SELECT,WHERE,如果有两个条件怎么办？ [打印本页]

作者: Tianorder 时间: 2015-7-6 14:38 标题: 【已解决】VBS调用WMI时SELECT,WHERE,如果有两个条件怎么办？

本帖最后由 Tianorder 于 2015-7-6 17:53 编辑

比方说

Set colProcessList=objWMIService.ExecQuery ("select * from Win32_Process where Name='calc.exe' ")
复制代码

这行，是要关闭计算器程序，
如果，在同时也要关闭记事本程序怎么办？
我试了一下，不支持“or”也不支持“|”或者“||”
搜索，也搜索不到SELECT...WHERE，一般都是SELECT CASE

作者: pcl_test 时间: 2015-7-6 14:56

本帖最后由 pcl_test 于 2015-7-6 14:58 编辑

or可以的

Set objWMIService = GetObject("winmgmts:")
Set ProcessList = objWMIService.ExecQuery("select * from win32_process where name='calc.exe' or name='notepad.exe'")
If ProcessList.Count = 0 Then
  MsgBox "指定进程未运行或用户权限不足以获得其信息。"
Else
  For Each objProcess In ProcessList
      rtn = MsgBox("进程 " & objProcess.name & " 的 PID 是 " &  objProcess.ProcessId&vbCrLf&"您确定要终止该进程吗？", vbYesNo, "关闭进程") 
      If rtn = 6 Then objProcess.Terminate 
  Next 
End If
复制代码

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

Powered by Discuz! 7.2