странная проблема...
Пытаюсь подставить свой Referer а почемуто невыходит...
создал файл html
| Код |
<script type="text/javascript">
document.write('referer='+document.referrer);
</script>
|
затем и з Delphi пытаюсь подсунуть рефу:
| Код |
procedure TForm1.Button1Click(Sender: TObject);
var
Flags,TargetFrameName,PostData,Haeders:OleVariant;
begin
Flags:=EmptyParam;
TargetFrameName:=EmptyParam;
PostData:=EmptyParam;
Haeders:='Referer: http://test.com'+#10+#13;
WebBrowser1.Navigate(http://localhost/test.html',Flags,TargetFrameName,PostData,Haeders);
end;
|
но вот реферер непоказывается..
запрос получается такой:| Код |
GET /test.html HTTP/1.1
Accept: */*
Accept-Language: ru
Referer: http://test.com
Accept-Encoding: gzip, deflate
User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; MRA 4.8 (build 01709); Embedded Web Browser from: http://bsalsa.com/; .NET CLR 1.1.4322)
Host: localhost
Connection: Keep-Alive
|
НО вот Результат только :
Что это может быть ???
|
