脚本宝典收集整理的这篇文章主要介绍了vbs在网页中显示服务,脚本宝典觉得挺不错的,现在分享给大家,也给大家做个参考。
strComputer = "."
Set objExplorer = WScript.CreateObject("InternetExplorer.Application")
objExplorer.Navigate "about:blank"
objExplorer.ToolBar = 0
objExplorer.StatusBar = 0
objExplorer.Visible = 1
Set objWMIService = GetObject _
("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery _
("SELECT * FROM Win32_Service")
For Each objItem in colItems
strHTML = strHTML & objItem.DisplayName & " = " & objItem.State & "<BR>"
Next
objExplorer.Document.Body.InnerHTML = strHTML
以上是脚本宝典为你收集整理的vbs在网页中显示服务全部内容,希望文章能够帮你解决vbs在网页中显示服务所遇到的问题。
本图文内容来源于网友网络收集整理提供,作为学习参考使用,版权属于原作者。
如您有任何意见或建议可联系处理。小编QQ:384754419,请注明来意。