我是靠谱客的博主 顺心汉堡,最近开发中收集的这篇文章主要介绍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在网页中显示服务所遇到的程序开发问题。

如果觉得靠谱客网站的内容还不错,欢迎将靠谱客网站推荐给程序员好友。

本图文内容来源于网友提供,作为学习参考使用,或来自网络收集整理,版权属于原作者所有。
点赞(130)

评论列表共有 0 条评论

立即
投稿
返回
顶部