Microsoft hesabıyla oturum açın
Oturum açın veya hesap oluşturun.
Merhaba,
Farklı bir hesap seçin.
Birden çok hesabınız var
Oturum açmak istediğiniz hesabı seçin.

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.

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

  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 = 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
    
  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 ardından 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 365 INSIDER’LARA KATILIN >

Bu bilgi yararlı oldu mu?

Dil kalitesinden ne kadar memnunsunuz?
Deneyiminizi ne etkiledi?

Geri bildiriminiz için teşekkürler!

×