Board logo

标题: VBS版Windows系统服务及说明 [打印本页]

作者: youxi01    时间: 2007-12-12 14:11     标题: VBS版Windows系统服务及说明

本文来源网络.
  1. strComputer ="."
  2. Set objWMIService =GetObject("winmgmts:\\"& strComputer &"\root\CIMV2")
  3. Set colItems = objWMIService.ExecQuery("SELECT * FROM Win32_Service",,48)
  4. For Each objItem in colItems
  5.     Wscript.Echo "-----------------------------------"
  6.     Wscript.Echo "Win32_Service instance"
  7.     Wscript.Echo "-----------------------------------"
  8.     Wscript.Echo "AcceptPause: "& objItem.AcceptPause
  9.     Wscript.Echo "AcceptStop: "& objItem.AcceptStop
  10.     Wscript.Echo "Caption: "& objItem.Caption
  11.     Wscript.Echo "CheckPoint: "& objItem.CheckPoint
  12.     Wscript.Echo "CreationClassName: "& objItem.CreationClassName
  13.     Wscript.Echo "Description: "& objItem.Description
  14.     Wscript.Echo "DesktopInteract: "& objItem.DesktopInteract
  15.     Wscript.Echo "DisplayName: "& objItem.DisplayName
  16.     Wscript.Echo "ErrorControl: "& objItem.ErrorControl
  17.     Wscript.Echo "ExitCode: "& objItem.ExitCode
  18.     Wscript.Echo "InstallDate: "& objItem.InstallDate
  19.     Wscript.Echo "Name: "& objItem.Name
  20.     Wscript.Echo "PathName: "& objItem.PathName
  21.     Wscript.Echo "ProcessId: "& objItem.ProcessId
  22.     Wscript.Echo "ServiceSpecificExitCode: "& objItem.ServiceSpecificExitCode
  23.     Wscript.Echo "ServiceType: "& objItem.ServiceType
  24.     Wscript.Echo "Started: "& objItem.Started
  25.     Wscript.Echo "StartMode: "& objItem.StartMode
  26.     Wscript.Echo "StartName: "& objItem.StartName
  27.     Wscript.Echo "State: "& objItem.State
  28.     Wscript.Echo "Status: "& objItem.Status
  29.     Wscript.Echo "SystemCreationClassName: "& objItem.SystemCreationClassName
  30.     Wscript.Echo "SystemName: "& objItem.SystemName
  31.     Wscript.Echo "TagId: "& objItem.TagId
  32.     Wscript.Echo "WaitHint: "& objItem.WaitHint
  33. Next
复制代码

作者: 随风    时间: 2007-12-12 18:53

死循环啊! 老大,
害我狂点了上百下鼠标,最后还是结束进程。
仍不明白是怎么回事。
作者: youxi01    时间: 2007-12-12 21:52

晕,不是死循环(如果要提前结束,可以结束wscript.exe进程)

它会把所有的进程、进程说明都用弹出窗口的形式显示出来的,当然会弹出很多次拉




欢迎光临 批处理之家 (http://bbs.bathome.net/) Powered by Discuz! 7.2