ファイルのダウンロード、「HTTP/1.1 301 Moved Permanently」となるが

Hiro 2008-04-18 20:25:18 No: 30543 IP: 192.*.*.*

Indyを使って下記URLのファイルをダウンロードしたのですが、
エラー「HTTP/1.1 301 Moved Permanently」となってしまいます。

どうしたらダウンロードできるのでしょう？
ちなみにブラウザーにURLを貼り付けてEnterした時にはダウンロードできます。(IE,Firefoxで確認)

よろしくお願いします。

procedure TForm1.Button1Click(Sender: TObject);
var
  FS : TFileStream;
  URL : string;
  FilePath : string;
begin
  URL :='http://tv.www.infoseek.co.jp/tvpi.epg?pg=tv_record.html&program=p0405080420210000&area=019';
  FilePath:= 'c:\test.tvpi';
  FS :=TFileStream.Create(FilePath,fmCreate);
  try
    IdHTTP1.Get(URL,FS);
  finally
    FS.Free;
  end;
end;

編集削除

そうねぇ 2008-04-18 22:25:13 No: 30544 IP: 192.*.*.*

このサイトを「いんでぃ10」で検索すると、幸せになれるでしょう。

編集削除

バージョンにもよりますがD7なら 2008-04-19 01:22:08 No: 30545 IP: 192.*.*.*

urlMon URLDownloadToFile TDownLoadURL
あたりをキーワードに検索してみると
幸せになれるかもしれません。

編集削除