掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
ＨＴＭＬソースファイルのダウンロードによるファイル名の取得 (ID:15635)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
皆様、いつもお世話になっております。 いま、インターネットのサイトのファイルをダウンロードして、保存するプログラムを作ろうと勉強しております。 ＵＲＬ（例http://www.borland.co.jp/）を与えてダウンロードを、URLDownLoadToFile()関数、InternetReadFile()関数、TIEDownloadなど試しましたが、いずれも最初のイニシャルファイルの名前をどうして取得したらいいか解りません（大抵はindex.htmか**.htmlですが）。 よろしくご指導をお願い致します。m(__)m 念のためURLDownLoadToFile()の例を記述しておきます。 procedure TForm1.ToolButton1Click(Sender: TObject); var p1: IUnknown; p2,p3: PAnsiChar; p4: DWORD; p5: IBindStatusCallback; result: HRESULT; //失敗したときの結果 begin p1 := nil; p2 := PCHAR('http://www.borland.co.jp/index.html'); // データ置き場 p3 := PCHAR('index.htm');//'index.txt'); // 保存先 p4 := 0; // ここは何があっても常に０ p5 := nil; // DL中にDialogを出すかどうか。大抵は邪魔なのでnil設定。 result :=URLDownLoadToFile(p1,p2,p3,p4,p5); if (result=s_ok) then else ShowMessage('失敗しました'); end;
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.