vbs列出内网的中计算机(工作组也可以)
更新时间:2011年05月14日 15:09:05 作者:
用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脚本...2007-03-03
Msxml2.XMLHTTP Msxml2.ServerXMLHTTP与缓存
用 VBS 发送 HTTP 请求时,首先想到的一般是 Msxml2.XMLHTTP(Microsoft.XMLHTTP 已经不提倡使用了)。2011-10-10


最新评论