这篇文章给大家分享的是有关vbs如何列出内网的中计算机的内容。小编觉得挺实用的,因此分享给大家做个参考,一起跟随小编过来看看吧。
站在用户的角度思考问题,与客户深入沟通,找到平坝网站设计与平坝网站推广的解决方案,凭借多年的经验,让设计与互联网技术结合,创造个性化、用户体验好的作品,建站类型包括:做网站、成都网站设计、企业官网、英文网站、手机端网站、网站推广、域名申请、虚拟主机、企业邮箱。业务覆盖平坝地区。代码如下:
'Handle Errors
On Error Resume Next
'Get the provider object
Set prov = GetObject("WinNT:")
'Examine the available domains the provider can reach
For each dom in prov
'Examine the objects in the domain and check for Computer objects
For each o in dom
If o.Class = "Computer" Then
'Display properties of the Computer
WScript.Echo o.Class & " " & o.Name
WScript.Echo " Owner: " & o.Owner
WScript.Echo " Division: " & o.Division
WScript.Echo " OperatingSystem: " & o.OperatingSystem
WScript.Echo " OS Version: " & o.OperatingSystemVersion
WScript.Echo " Processor: " & o.Processor
WScript.Echo " ProcessorCount: " & o.ProcessorCount
End If
Next
Next
感谢各位的阅读!关于“vbs如何列出内网的中计算机”这篇文章就分享到这里了,希望以上内容可以对大家有一定的帮助,让大家可以学到更多知识,如果觉得文章不错,可以把它分享出去让更多的人看到吧!
新闻名称:vbs如何列出内网的中计算机-创新互联
当前链接:http://scgulin.cn/article/dpjopj.html