找回密码
 注册
搜索
[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
查看: 14006|回复: 2

VBS版Windows系统服务及说明

[复制链接]
发表于 2007-12-12 14:11:33 | 显示全部楼层 |阅读模式
本文来源网络.

  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:56 | 显示全部楼层
死循环啊! 老大,
害我狂点了上百下鼠标,最后还是结束进程。
仍不明白是怎么回事。
 楼主| 发表于 2007-12-12 21:52:48 | 显示全部楼层
晕,不是死循环(如果要提前结束,可以结束wscript.exe进程)

它会把所有的进程、进程说明都用弹出窗口的形式显示出来的,当然会弹出很多次拉
您需要登录后才可以回帖 登录 | 注册

本版积分规则

Archiver|手机版|小黑屋|批处理之家 ( 渝ICP备10000708号 )

GMT+8, 2026-3-16 23:18 , Processed in 0.025224 second(s), 8 queries , File On.

Powered by Discuz! X3.5

© 2001-2026 Discuz! Team.

快速回复 返回顶部 返回列表