Tengo errores de time out aleatorios en IIS

[hyperwin]

Bueno, yo uso frecuentemente este script y cambio el comportamiento de la contraseña anónima de los sitios, pero con la misma lógica puedes cambiar lo que quieras de los sitios.

Código vb:

Set objIIS = GetObject("IIS://" & getComputer() & "/W3SVC")
For Each objWeb in objIIS
    If lCase(objWeb.Class) = "iiswebserver" Then
        Set objVdir = GetObject("IIS://" & getComputer() & "/W3SVC/" & objWeb.Name & "/ROOT")
        If UCase(objVdir.AnonymousPasswordSync) = "TRUE" Then
                objVDir.AnonymousPasswordSync = "FALSE"
            objVdir.SetInfo
        End If
    End If
Next
Set objIIS = nothing
 
Function getComputer()
    Set objNet = WScript.CreateObject("WScript.Network")
    getComputer= objNet.ComputerName
    Set objNet = Nothing
End Function