vba serverXMLHTTP и реферер заголовка запроса

Я использую serverXMLHTTP в vba с Access 2007 для навигации по URL-адресу. Мне нужно установить заголовок Referer в запросе на правильную работу приложения, потому что серверу нужен заголовок Referer. Но когда я устанавливаю заголовок Referer в serverXMLHTTP, он не переходит в запрос. Почему ?

Пример:

Dim XMLHTTP As Object
   Set XMLHTTP = CreateObject("MSXML2.serverXMLHttp")

   XMLHTTP.Open "GET", "http://X.X.X.X/headers.php", False
   XMLHTTP.setRequestHeader "Referer", "http://www.example.com/"  'in case the server cares
   XMLHTTP.setRequestHeader "TestHeader", "test" 
   XMLHTTP.send ""

    'wait for response
    If XMLHTTP.ReadyState <> 4 Then
      XMLHTTP.waitForResponse 120
    End If

    MsgBox XMLHTTP.responseText
    Set XMLHTTP = Nothing

Заголовки в запросе:

Connection: Keep-Alive
Accept: */*
Accept-Language: pt-br
User-Agent: Mozilla/4.0 (compatible; Win32; WinHttp.WinHttpRequest.5)
TestHeader: test
Host: X.X.X.X

TestHeader в порядке.... но Referer нет.

Вы можете помочь ?

Спасибо.


person Douglas V. Pasqua    schedule 02.11.2011    source источник


Ответы (1)


Microsoft не позволяет вам устанавливать REFERER, так как это считается угрозой безопасности, позволяющей спуфинг.

person Frank Haggar    schedule 14.05.2015