Sintomas
Em um servidor que está executando o ISA (Microsoft Internet Security and Acceleration) Server 2004 com o Service Pack 2 ou o Windows Essential Business Server 2008, você desabilitará os dois filtros Web a seguir:
-
Filtro de compactação
-
Filtro de conteúdo compactado de cache
Depois de fazer isso, o ISA Server 2004 ou Windows Essential Business Server 2008 bloqueia solicitações que incluem o cabeçalho HTTP Accept-Encoding quando um proxy de encaminhamento é usado.
Esses filtros Da Web foram introduzidos no ISA Server 2004 Service Pack 2 ou no Windows Essential Business Server 2008. Você pode desabilitar esses filtros da Web devido a problemas de compatibilidade do programa que envolvem alguns servidores Web.
Resolução
Informações do pacote de serviço
Para resolver esse problema, instale o ISA Server 2004 Service Pack 3 (SP3) e execute o script do Microsoft Visual Basic mencionado nesta seção.
Depois de instalar o service pack, execute o script a seguir para habilitar um novo parâmetro de configuração. Esse novo parâmetro permite que o ISA Server encaminhe solicitações que incluam o cabeçalho HTTP Accept-Encoding se os filtros de compactação estiverem desabilitados em um cenário de proxy avançado. Para fazer isso, execute as etapas a seguir.
A Microsoft fornece exemplos de programação somente para ilustração, sem garantia expressa ou implícita. Isso inclui, mas não se limita a, as garantias implícitas de comercialização ou aptidão para uma finalidade específica. Este artigo pressupõe que você esteja familiarizado com a linguagem de programação que está sendo demonstrada e com as ferramentas usadas para criar e depurar procedimentos. Engenheiros de suporte da Microsoft podem ajudar a explicar a funcionalidade de um procedimento específico. No entanto, eles não modificarão esses exemplos para fornecer funcionalidade ou procedimentos de construção adicionais para atender aos seus requisitos específicos.
-
Clique em Iniciar, aponte para Todos os Programas, aponte para Acessórios e clique em Bloco de Notas.
-
Cole o código a seguir no documento do Bloco 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
-
Salve o arquivo do Bloco de Notas como "AccessRuleSendAcceptEncodingHeader.vbs".
-
Clique duas vezes no arquivo .vbs para executar o script.
Para desabilitar o novo parâmetro de configuração, siga estas etapas:
-
Clique em Iniciar, aponte para Todos os Programas, aponte para Acessórios e clique em Bloco de Notas.
-
Cole o código a seguir no documento do Bloco 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
-
Salve o arquivo do Bloco de Notas como "Disable_AccessRuleSendAcceptEncodingHeader.vbs".
-
Clique duas vezes no arquivo .vbs para executar o script.
Status
A Microsoft confirmou que este é um problema nos produtos Microsoft listados na seção "Aplicável a".