ひまわりユーザー プログラム掲示板 バックアップ
注意
ひまわりのススメ  □ ひまわり本家Home  □ 新着記事  □ 新規投稿  □ SEARCH  □ 参考プログラム集
ツリー表示

MESSAGE ひまわり最新版を自動でダウンロード /kobachi (02/01/24(Thu) 02:04) [298]


親記事 / 返信無し
NO.298  ひまわり最新版を自動でダウンロード
□投稿者/ kobachi -(2002/01/24(Thu) 02:04:36)
□U R L/ http://plaza.across.or.jp/~kobachi/
{---プログラム掲示板投稿フォーム---
【ソフト名】ひまゲッチュ (バージョン 1.2)
【作 成 者】kobachi (連絡先:kobachi@po4.across.or.jp)
【種  別】フリーソフトウェア
【ひまわりのバージョン】ver.1.17
【転  件】可(転載条件:ご自由に)
【ひまわり本体への梱包】可
【実行時に利用作成するファイル】有(oldversion.htm)
【コメント】

 ひまゲッチュの最新版です。FlashGetや、Iria、Irvine、ReGet、GetRightなどのブラウザを監視できるタイプの自動ダウンロードソフトでダウンロードができるようになりました!


・ダウンロード失敗時の処理を追加。
・プロキシが返す失敗 HTML に対応。(ページ中のリンクに LZH が含まれなければ失敗とみなす)
・ダウンロードURLをブラウザに渡すように設定。これでダウンローダーが使える。


 最近気づいたのですが、母艦に部品を大量に作成する場合は、母艦の可視をオフにしてから部品を作成したほうが、高速なようです。

---投稿フォームここまで---}





' ひまゲッチュ(ひまわりのバージョン確認ツール) Version 1.2
'
' Copyright(C) by open.doc 2002



*初期設定
母艦の、可視は、オフ。
母艦の、タイトルは、「ひまゲッチュ」。
母艦の、高さは、140。母艦の、幅は、300。
母艦の、リサイズは、オフ。
母艦を、中央へ移動。
文字書体=『MS UI Gothic』。文字サイズ=9。
HKEY_CURRENT_USERの、`Control Panel\Colors`を、レジストリ開く。
`ButtonFace`を、レジストリ読む。それを、『 』で、区切る。
レジストリ閉じる。
母艦の、背景色は、RGB(それ#0, それ#1, それ#2)。
ひまゲッチュログ=「[{今}] ひまゲッチュ起動しました。」。



*オブジェクト配置
ログ表示部を、メモとして、作成。
その、サイズは、(5,5,295,110)。
その、編集は、オフ。
その、スクロールバーは、縦。
その、テキストは、ひまゲッチュログ。
ステータス表示部を、ラベルとして、作成。
その、サイズは、(5,120,95,135)。
その、テキストは、「準備完了。」。
取得ボタンを、ボタンとして、作成。
その、サイズは、(100,110,295,135)。
その、テキストは、「ひまわりの最新版をチェック(&C)」。
その、イベントは、ひまわりゲッチュ。
取得ボタンに、注目。
母艦の、可視は、オン。
待機。



*ひまわりゲッチュ
取得ボタンの、可視は、オフ。
ダウンロード失敗に、エラー処理設定。
ひまゲッチュログ=ひまゲッチュログ&「\n[{今}] 最新版のチェックを開始します。\n→http://www.text2music.com/hima/oldversion.htm
ログ表示部の、テキストは、ひまゲッチュログ。
ステータス表示部の、テキストは、「ダウンロード中...」。
http://www.text2music.com/hima/oldversion.htm」を、「{TEMPのパス}\oldversion.htm」へ、HTTPダウンロード。
ステータス表示部の、テキストは、「ダウンロード完了」。
ステータス表示部の、テキストは、「ファイル解析中...」。
それに、「{TEMPのパス}\oldversion.htm」を、読む。
それから、「A」の、タグ切り出し。それ#0から、タグ削除。ひまわり最新ファイル=それ。
ひまわりバージョンを、「.」で、区切る。ひまわり現在ファイル=「hima」&それ#0&それ#1&「.lzh」。
もし、(RIGHT(ひまわり最新ファイル,3))が、『lzh』でなければ、ダウンロード失敗へ、飛ぶ。
もし、ひまわり現在ファイルが、ひまわり最新ファイルならば、
(
ひまゲッチュログ=ひまゲッチュログ&「\n[{今}] 最新版でした。更新する必要はありません。」。
ログ表示部の、テキストは、ひまゲッチュログ。
)
でなければ、
(
「ひまわりはバージョンアップしています。ダウンロードしますか。」と、二択。
もし、それが、はいなら、
(
   ひまゲッチュログ=ひまゲッチュログ&「\n[{今}] ひまわりをダウンロードしています。\n→http://www.text2music.com/hima/{ひまわり最新ファイル}」。
   ログ表示部の、テキストは、ひまゲッチュログ。
   ステータス表示部の、テキストは、「ダウンロード中...」。
   「http://www.text2music.com/hima/{ひまわり最新ファイル}」を、起動。
   ひまゲッチュログ=ひまゲッチュログ&「\n[{今}] ひまわりをダウンロードしました。」。
   ログ表示部の、テキストは、ひまゲッチュログ。
)
でなければ、
(
ひまゲッチュログ=ひまゲッチュログ&「\n[{今}] ひまわりはダウンロードされませんでした。」。
   ログ表示部の、テキストは、ひまゲッチュログ。
)
)
「oldversion.htm」を、ファイル削除。
ひまゲッチュログ=ひまゲッチュログ&「\n[{今}] テンポラリファイルを削除しました。」。
ログ表示部の、テキストは、ひまゲッチュログ。
ステータス表示部の、テキストは、「完了」。
取得ボタンの、可視は、オン。
取得ボタンに、注目。
戻る。



*ダウンロード失敗
「何らかの理由で、ダウンロードに失敗しました。」と、言う。
ひまゲッチュログ=ひまゲッチュログ&「\n[{今}] ダウンロードに失敗しました。」。
ログ表示部の、テキストは、ひまゲッチュログ。
ステータス表示部の、テキストは、「エラー」。
取得ボタンの、可視は、オン。
取得ボタンに、注目。
待機。



- Child Tree -