摘要：
1.获得所有站点ID、名称、路径Set ObjService=GetObject("IIS://LocalHost/W3SVC")For Each obj3w In objserviceIf IsNumeric(obj3w.Name) ThensServerName=Obj3w.ServerCommentSet webSite = GetObject("IIS://Localhost/W3SVC/" & obj3w.Name & "/Root")ListAllWeb = ListAllWeb & obj3w.N 阅读全文
