ISA Server 2004, ISA Server 2006 veya Windows Essential Business Server 2008, bir iletme proxy 'si kullanıldığında Accept-Encoding HTTP üstbilgisini içeren istekleri engeller

Microsoft 365 ile istediğiniz yerde ve tüm cihazlardan çalışın

En son özellikler ve güncelleştirmelerle herhangi bir yerde çalışmak için Microsoft 365 ' e yükseltin.

Şimdi yükselt

Belirtiler

Service Pack 2 veya Windows Essential Business Server 2008 ile Microsoft Internet Security and Acceleration (ISA) Server 2004 çalıştıran bir sunucuda, aşağıdaki iki Web filtresi devre dışı bırakılır:

  • Sıkıştırma Filtresi

  • Sıkıştırılmış Içerik filtresini önbelleğe alma

Bunu yaptıktan sonra, ISA Server 2004 veya Windows Essential Business Server 2008, bir iletme proxy 'si kullanıldığında kabul et HTTP üstbilgisini içeren istekleri engeller. Bu Web filtreleri ISA Server 2004 Service Pack 2 veya Windows Essential Business Server 2008 ile kullanılmaya başlanmıştır. Bazı Web sunucularıyla ilgili program uyumluluk 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 bu bölümde belirtilen Microsoft Visual Basic betiğini yükleyin. En son ISA Server 2004 hizmet paketini edinme hakkında daha fazla bilgi için, Microsoft Bilgi Bankası 'ndaki makaleyi görüntülemek üzere aşağıdaki makale numarasını tıklatın:

891024 En son ISA Server 2004 hizmet paketini edinmeHizmet paketini yükledikten sonra, yeni bir yapılandırma parametresini etkinleştirmek için aşağıdaki komut dosyasını çalıştırmalısınız. Bu yeni parametre, bir iletme proxy senaryosunda sıkıştırma filtreleri devre dışı bırakılmışsa, kodlamayı kabul et HTTP üstbilgisini içeren isteklerin iletilmesini sağlar. Bunu yapmak için aşağıdaki adımları izleyin. Microsoft, yalnızca gösterim için programlama örnekleri sunar, açık veya ima edilen garanti vermez. Bu, satılabilirlik veya belirli bir amaca uygunluk dahil olmak üzere örtülü garantileri içerir. Bu makalede, gösterilen programlama dilini ve yordamları oluşturmak ve hataları ayıklamak için kullanılan araçları kullanmayı bildiğiniz varsayılmaktadır. Microsoft destek mühendisleri, belirli bir yordamın işlevselliğinin açıklanmasına yardımcı olabilir. Bununla birlikte, belirli gereksinimlerinizi karşılayacak ek işlevler veya yordamlar oluşturmak için bu örnekleri değiştirmeyecektir.

  1. Başlat'a tıklayın, tüm programlar'ın üzerine gelin, Donatılar'ın üzerine gelin ve Not defteri'ne tıklayın.

  2. 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 = trueSub 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 IfEnd SubSub CheckError()    If Err.Number <> 0 Then        WScript.Echo "An error occurred: 0x" & Hex(Err.Number) & " " & Err.Description        Err.Clear    End IfEnd SubSetValue
  3. Not defteri dosyasını "AccessRuleSendAcceptEncodingHeader. vbs" olarak kaydedin.

  4. 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:

  1. Başlat'a tıklayın, tüm programlar'ın üzerine gelin, Donatılar'ın üzerine gelin ve Not defteri'ne tıklayın.

  2. 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
  3. Not defteri dosyasını "Disable_AccessRuleSendAcceptEncodingHeader. vbs." olarak kaydedin.

  4. 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.

Daha fazla yardıma mı ihtiyacınız var?

Yeteneklerinizi geliştirin
Eğitimleri keşfedin
Yeni özellikleri ilk olarak siz edinin
Microsoft Insider 'a katılın

Bu bilgi yardımcı oldu mu?

Geri bildiriminiz için teşekkür ederiz!

Geri bildiriminiz için teşekkürler! Office destek temsilcilerimizden biriyle görüşmeniz yararlı olabilir.

×