Belirtiler
Service Pack 2 veya Windows Essential Business Server 2008 yüklü Microsoft Internet Security and Acceleration (ISA) Server 2004 çalıştıran bir sunucuda, aşağıdaki iki Web filtresini devre dışı bırakırsınız:
-
Sıkıştırma Filtresi
-
Sıkıştırılmış İçerik Filtresini Önbelleğe Alma
Bunu yaptıktan sonra, ISA Server 2004 veya Windows Essential Business Server 2008, ileriye doğru ara sunucu kullanıldığında Accept-Encoding HTTP üst bilgisini içeren istekleri engeller.
Bu Web filtreleri ISA Server 2004 Service Pack 2 veya Windows Essential Business Server 2008'de kullanıma sunulmuştur. Bazı Web sunucularını içeren program uyumluluğu sorunları nedeniyle bu Web filtrelerini devre dışı bırakabilirsiniz.
Çözüm
Hizmet paketi bilgileri
Bu sorunu çözmek için ISA Server 2004 Service Pack 3'ü (SP3) yükleyin ve ardından bu bölümde bahsedilen Microsoft Visual Basic betiğini çalıştırın.
Hizmet paketini yükledikten sonra, yeni bir yapılandırma parametresini etkinleştirmek için aşağıdaki betiği çalıştırın. Bu yeni parametre, sıkıştırma filtreleri bir ileri ara sunucu senaryosunda devre dışı bırakılırsa ISA Server'ın Accept-Encoding HTTP üst bilgisini içeren istekleri iletmesine olanak tanır. Bunu yapmak için şu adımları uygulayın.
Microsoft, açık veya zımni garanti olmadan yalnızca çizim için programlama örnekleri sağlar. Bu, satılabilirlik veya belirli bir amaca uygunlukla ilgili zımni garantileri içerir ancak bunlarla sınırlı değildir. Bu makalede, gösterilmekte olan programlama dilini ve yordamları oluşturmak ve hatalarını ayıklamak için kullanılan araçları bildiğiniz varsayılır. Microsoft destek mühendisleri belirli bir yordamın işlevselliğini açıklamaya yardımcı olabilir. Ancak, bu örnekler belirli gereksinimlerinizi karşılamak üzere ek işlevler sağlamak veya yordamlar oluşturmak için bu örnekleri değiştirmez.
-
Başlat'a tıklayın, Tüm Programlar'ın üzerine gelin, Donatılar'ın üzerine gelin ve ardından Not Defteri'ne tıklayın.
-
Aşağıdaki kodu Not Defteri belgesine yapıştırın.
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
-
Not Defteri dosyasını "AccessRuleSendAcceptEncodingHeader.vbs" olarak kaydedin.
-
Betiği çalıştırmak için .vbs dosyasına çift tıklayın.
Yeni yapılandırma parametresini devre dışı bırakmak için şu adımları izleyin:
-
Başlat'a tıklayın, Tüm Programlar'ın üzerine gelin, Donatılar'ın üzerine gelin ve ardından Not Defteri'ne tıklayın.
-
Aşağıdaki kodu Not Defteri belgesine yapıştırın.
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
-
Not Defteri dosyasını "Disable_AccessRuleSendAcceptEncodingHeader.vbs" olarak kaydedin.
-
Betiği çalıştırmak için .vbs dosyasına çift tıklayın.
Durum
Microsoft bu sorunun "Uygulandığı öğe" bölümünde listelenen Microsoft ürünlerinde bulunduğunu onaylamıştır.