Question

有什么用途：

Set objWMIService = GetObject("winmgmts:" _
    & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")

在vbscript代码中。

Answer 1

这将创建一个WMI对象，为您提供与操作系统不同部分通信所需的对象，方法和属性。

因此，使用您的代码段，您可以查询每项服务的状态：

strComputer = "."

Set objWMIService  = GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colRunningServices = objWMIService.ExecQuery("Select * from Win32_Service")

For Each objService in colRunningServices    
  MsgBox objService.Name & " - " & objService.State
Next

您不仅限于服务，还可以访问注册表设置，活动进程等。我经常在工作中使用它来帮助管理我们的Windows环境。

一些资源： http://msdn.microsoft.com/en-us/library/aa394585(v=vs.85).aspx http://technet.microsoft.com/en-us/library/ee176998.aspx

VBScript中以下行的含义是什么？

1 个答案: