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;
このサイトを「いんでぃ10」で検索すると、幸せになれるでしょう。
urlMon URLDownloadToFile TDownLoadURL
あたりをキーワードに検索してみると
幸せになれるかもしれません。
ツイート | ![]() |