wish浏览量总是0:高手帮忙看一下这些脚本

来源:百度文库 编辑:杭州交通信息网 时间:2024/05/05 19:32:53
on error resume next
dim obj,display
set server=getObject("WinNT://.")
for each obj in server

If Wscript.Arguments.Count > 0 Then
display = Wscript.Arguments(0)
else
wscript.echo "servername:"&obj.Name&chr(10)&"displayname:"&obj.DisplayName&chr(10)&"path:"&obj.path
end if

if obj.DisplayName=display then
wscript.echo "servername:"&obj.Name&chr(10)&"displayname:"&obj.DisplayName&chr(10)&"path:"&obj.path
end if

next
set server=nothing

帮忙看一下 这些脚本 是干什么用的`` 速度。。。