Modified iisweb.vbs to just list web applications

1. find iisweb.vbs
2. make a copy of iisweb.vbs
3. rename
4. modify

From:
bFirstIteration = True

To:
bFirstIteration = False

From:
line = Server.ServerComment & " (" & Server.Name & ")" & _
Space(firstLen) & strState & _
Space(secLen) & strIP & Space(thirdLen) & strPort & _
Space(fourthLen) & strHost

To:
line = strHost&":"&strPort

5. Save file