名前
題名
▼ 宮さん > ▼ Mr.XRAYさん > > そう言えば，Indyのサンプルの記事を書いているときに， > > > > >ＷｅｂからＤＬするファイル名の取得するには > > >http://hpcgi1.nifty.com/MADIA/DelphiBBS/wwwlng.cgi?print+200803/08030057.txt > > > かって私もスクラップブックブラウザでマスターに何度も > 教えてもらいましたねぇ〜。今後ともよろしくお願いします。 > Webサイトを保存するため > （例）http://www.yahoo.co.jp/　のファイル名は？ > できればサイトのファイル名がはっきりしていれば > 保存するとき明確になるので試みたわけですが > いまは、Ｉｎｄｙを使っていません。 > （そのときこれを知っていれば試してみたかった。） > Ｉｎｄｙをやめた理由は、 > なかなかファイル名が帰ってこないときや > 金輪際ＤＬできないサイトもあったため。 > （もちろん私の対処ミスを含む(^^;)） > スクラップブックで保存して利用するだけですから、 > 正確なファイル名は必ずしも必要ないと割り切ったのです。 > 最終的にはURLDownloadToFileで幾通りかのファイル名で > 試みて取得できない場合や遅い場合は、 > 架空のファイル名を付けて保存するようにしました。 > 下記は力仕事で、たぶんこんなファイル名だろうと決めうちして、 > だめなら、これならどうぉ？と別の名前で・・・を繰り返す。 > result := result+'index.htm'; > kekka:=URLD ownloadToFile(nil, PAnsiChar(result +#0), PAnsiChar(TempPath +#0), 0, nil); > if (kekka =s_ok) then exit; > result := result+'index.html'; > kekka:= URLDownloadToFile(nil, PAnsiChar(result +#0), PAnsiChar(TempPath +#0), 0, nil); > if (kekka=s_ok) then exit; > result := result+'index.cgi'; > kekka:= URLDownloadToFile(nil, PAnsiChar(result +#0), PAnsiChar(TempPath +#0), 0, nil); > ・・・・・ > どれも当たらない場合は架空の名前で保存する。 > result:='0-----0.html'; > 実際にはコレガ一番確実で早かったです。 > インターネットにはほぼ同時に発射するわけで > 早く正解がかえってきたらそれを使う。という具合です。 > 外しているかも。<(_ _)> > >
GIF,JPEG,PNG画像ファイル及びLZH,ZIPファイルをアップロードできます.
600 x 1200 ピクセルを超える画像は縮小表示されます(画像クリックで拡大表示).
(上限122000(120k)バイト)

削除キー Link