TWebBrowser:Refererを変更したい

解決


中野  2005-08-14 09:43:33  No: 17036  IP: [192.*.*.*]

ダウンロード支援ソフトを作っているのですが
Refererを設定しないとダウンロードできないサイトが有るみたいで
Refererを変更してダウンロードさせるにはどうしたら良いのでしょうか?
検索してみたのですがセキュリティの説明サイト等しか見つけられませんでした

編集    削除
Referer: where  2005-08-14 18:22:41  No: 17037  IP: [192.*.*.*]

Navigate()の第5引数がヘッダなので、そこで設定しましょ。

編集    削除
見習  2005-08-15 01:36:59  No: 17038  IP: [192.*.*.*]

面白そうなので試してみました。
動作確認はしたのですが、Referrer以外のヘッダ情報が消えてるかも・・・?

var
  Flags, TargetFrameName, PostData, Header: OleVariant;
begin
  Header := 'Referer: http://aaa.com/dl.html' + #13;
  WebBrowser1.Navigate(
    'http://aaa.com/files/aaa.zip',
    Flags,             //
    TargetFrameName,   // 今回は特に指定なし
    PostData,          //
   Header);
end;

#ふと思ったのですが、IndyのTIdHTTPでReferer設定した方がいいような気がしました。

編集    削除
中野  2005-08-17 02:15:41  No: 17039  IP: [192.*.*.*]

Referer: whereさん、見習さんのお陰でできました
すぐ近くに答えがあったのに気づかずお恥ずかしい限りです
ご丁寧にお教え下さり有り難うございました

編集    削除