重庆分公司,新征程启航

为企业提供网站建设、域名注册、服务器等服务

如何用vbs将输出内容写到屏幕上-创新互联

这篇文章主要讲解了“如何用vbs将输出内容写到屏幕上”,文中的讲解内容简单清晰,易于学习与理解,下面请大家跟着小编的思路慢慢深入,一起来研究和学习“如何用vbs将输出内容写到屏幕上”吧!

成都创新互联长期为上1000+客户提供的网站建设服务,团队从业经验10年,关注不同地域、不同群体,并针对不同对象提供差异化的产品和服务;打造开放共赢平台,与合作伙伴共同营造健康的互联网生态环境。为华容企业提供专业的成都网站设计、成都网站制作、外贸网站建设华容网站改版等技术服务。拥有十载丰富建站经验和众多成功案例,为您定制开发。
Set objExplorer = CreateObject("InternetExplorer.Application")
objExplorer.Navigate "about:blank"   
objExplorer.ToolBar = 0
objExplorer.StatusBar = 0
objExplorer.Width = 400
objExplorer.Height = 200 
objExplorer.Left = 0
objExplorer.Top = 0
Do While (objExplorer.Busy)
    Wscript.Sleep 200
Loop    
objExplorer.Document.Title = "Process Information"   
objExplorer.Visible = 1  
objExplorer.Document.Body.InnerHTML = "Retrieving process information." 
Wscript.Sleep 2000
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_Process")
For Each objItem in colItems
    objExplorer.Document.Body.InnerHTML = objItem.Name
    Wscript.Sleep 500
Next
objExplorer.Document.Body.InnerHTML = "Process information retrieved."
Wscript.Sleep 3000
objExplorer.Quit

感谢各位的阅读,以上就是“如何用vbs将输出内容写到屏幕上”的内容了,经过本文的学习后,相信大家对如何用vbs将输出内容写到屏幕上这一问题有了更深刻的体会,具体使用情况还需要大家实践验证。这里是创新互联网站建设公司,,小编将为大家推送更多相关知识点的文章,欢迎关注!


文章标题:如何用vbs将输出内容写到屏幕上-创新互联
文章路径:http://cqcxhl.cn/article/ceoheg.html

其他资讯

在线咨询
服务热线
服务热线:028-86922220
TOP