Si perdiste las PASS del usuario anonimo y no te funciona tu sitio, podes obtener las misma con el siguiente script.
Dim IIsObject, SiteObject
Set IIsObject = GetObject ("IIS://localhost/w3svc")
Wscript.Echo Get_IUSR_Password(IIsObject)
Wscript.Echo Get_IWAM_Password(IIsObject)
Function Get_IUSR_Password(IIsObject)
on error resume Next
Dim Out
Out = Out & vbCrLf & "
AnonymousUserName = " & IIsObject.Get("AnonymousUserName")
Out = Out & vbCrLf & "
AnonymousUserPass = " & IIsObject.Get("AnonymousUserPass")
If err=0 [...]
