Síntomas
En un servidor que ejecuta Microsoft Internet Security and Acceleration (ISA) Server 2004 con Service Pack 2 o Windows Essential Business Server 2008, deshabilita los siguientes dos filtros web:
-
Filtro de compresión
-
Filtro de contenido comprimido de almacenamiento en caché
Después de hacerlo, ISA Server 2004 o Windows Essential Business Server 2008 bloquean las solicitudes que incluyen el encabezado Accept-Encoding HTTP cuando se usa un proxy de reenvío.
Estos filtros web se introdujeron en ISA Server 2004 Service Pack 2 o en Windows Essential Business Server 2008. Puede deshabilitar estos filtros web debido a problemas de compatibilidad de programas que implican algunos servidores web.Solución
Información del Service Pack
Para resolver este problema, instale ISA Server 2004 Service Pack 3 (SP3) y, a continuación, ejecute el script de Microsoft Visual Basic que se menciona en esta sección.
Después de instalar el Service Pack, ejecute el script siguiente para habilitar un nuevo parámetro de configuración. Este nuevo parámetro permite que el servidor ISA reenvíe las solicitudes que incluyen la Accept-Encoding encabezado HTTP si los filtros de compresión están deshabilitados en un escenario de proxy adelante. Para ello, siga estos pasos. Microsoft proporciona ejemplos de programación solo con fines ilustrativos, sin garantía expresa ni implícita. Esto incluye, entre otras, las garantías implícitas de comerciabilidad e idoneidad para un fin determinado. En este artículo se da por supuesto que ya conoce el lenguaje de programación que se muestra, así como las herramientas empleadas para crear y depurar procedimientos. Los ingenieros de soporte técnico de Microsoft pueden ayudar a explicar la funcionalidad de un procedimiento determinado. Sin embargo, no modificarán estos ejemplos para proporcionar funcionalidad adicional o construir procedimientos para cumplir con sus requisitos específicos.-
Haga clic en Inicio, elija Todos los programas, Accesorios y, a continuación, haga clic en Bloc de notas.
-
Pegue el código siguiente en el documento del Bloc de notas.
Const SE_VPS_GUID = "{143F5698-103B-12D4-FF34-1F34767DEabc}" Const SE_VPS_NAME = "AccessRuleSendAcceptEncodingHeader" Const SE_VPS_VALUE = true Sub SetValue() ' Create the root obect. Dim root ' The FPCLib.FPC root object Set root = CreateObject("FPC.Root") 'Declare the other objects needed. Dim array ' An FPCArray object Dim VendorSets ' An FPCVendorParametersSets collection Dim VendorSet ' An FPCVendorParametersSet object ' Get references to the array object ' and the network rules collection. Set array = root.GetContainingArray Set VendorSets = array.VendorParametersSets On Error Resume Next Set VendorSet = VendorSets.Item( SE_VPS_GUID ) If Err.Number <> 0 Then Err.Clear ' Add the item Set VendorSet = VendorSets.Add( SE_VPS_GUID ) CheckError WScript.Echo "New VendorSet added... " & VendorSet.Name Else WScript.Echo "Existing VendorSet found... value- " & VendorSet.Value(SE_VPS_NAME) End If if VendorSet.Value(SE_VPS_NAME) <> SE_VPS_VALUE Then Err.Clear VendorSet.Value(SE_VPS_NAME) = SE_VPS_VALUE If Err.Number <> 0 Then CheckError Else VendorSets.Save false, true CheckError If Err.Number = 0 Then WScript.Echo "Done with " & SE_VPS_NAME & ", saved!" End If End If Else WScript.Echo "Done with " & SE_VPS_NAME & ", no change!" End If End Sub Sub CheckError() If Err.Number <> 0 Then WScript.Echo "An error occurred: 0x" & Hex(Err.Number) & " " & Err.Description Err.Clear End If End Sub SetValue
-
Guarde el archivo del Bloc de notas como "AccessRuleSendAcceptEncodingHeader.vbs".
-
Haga doble clic en el archivo .vbs para ejecutar el script.
Para deshabilitar el nuevo parámetro de configuración, siga estos pasos:
-
Haga clic en Inicio, elija Todos los programas, Accesorios y, a continuación, haga clic en Bloc de notas.
-
Pegue el código siguiente en el documento del Bloc de notas.
Const SE_VPS_GUID = "{143F5698-103B-12D4-FF34-1F34767DEabc}" Const SE_VPS_NAME = "AccessRuleSendAcceptEncodingHeader" Const SE_VPS_VALUE = false Sub SetValue() ' Create the root obect. Dim root ' The FPCLib.FPC root object Set root = CreateObject("FPC.Root") 'Declare the other objects needed. Dim array ' An FPCArray object Dim VendorSets ' An FPCVendorParametersSets collection Dim VendorSet ' An FPCVendorParametersSet object ' Get references to the array object Set array = root.GetContainingArray Set VendorSets = array.VendorParametersSets On Error Resume Next Set VendorSet = VendorSets.Item( SE_VPS_GUID ) If Err.Number <> 0 Then Err.Clear ' Add the item Set VendorSet = VendorSets.Add( SE_VPS_GUID ) CheckError WScript.Echo "New VendorSet added... " & VendorSet.Name Else WScript.Echo "Existing VendorSet found... value- " & VendorSet.Value(SE_VPS_NAME) End If if VendorSet.Value(SE_VPS_NAME) <> SE_VPS_VALUE Then Err.Clear VendorSet.Value(SE_VPS_NAME) = SE_VPS_VALUE If Err.Number <> 0 Then CheckError Else VendorSets.Save false, true CheckError If Err.Number = 0 Then WScript.Echo "Done with " & SE_VPS_NAME & ", saved!" End If End If Else WScript.Echo "Done with " & SE_VPS_NAME & ", no change!" End If End Sub Sub CheckError() If Err.Number <> 0 Then WScript.Echo "An error occurred: 0x" & Hex(Err.Number) & " " & Err.Description Err.Clear End If End Sub SetValue
-
Guarde el archivo del Bloc de notas como "Disable_AccessRuleSendAcceptEncodingHeader.vbs".
-
Haga doble clic en el archivo .vbs para ejecutar el script.
Estado
Microsoft ha confirmado que se trata de un problema de los productos de Microsoft enumerados en la sección "Se aplica a".