石油情報センターのサイトより住んでいる地域の石油価格を取得するVBScript(HttpRequest+正規表現)です。
一度取得したら9日経たないと新しく取得しに行かない様にしてあります。(石油価格の調査日が毎週月曜日で、必要以上にサーバーにアクセスしないため)
■[今後の予定]
・
AIZACK本体のティッカー機能と連携
・XML出力可能にし、グラフに挿入?
■[更新情報]
・v0.9 (2008/09/19)
- 公開URIをAIZACK.NETに変更
・v0.8 (2008/07/06)
- StartUpOptionが/Tの時、WScript.Echoで結果を吐くのではなくTicker.txtに出力するようにした。
- 各設定ファイルの読み出し時、絶対パスに変換するようにした。
・v0.7 (2008/06/28)
- StartUpを追加(TrueとすることでAIZACK起動時に一度だけ実行する)
- StartUpOptionを追加(StartUpOptionを/TとすることでWScript.Echoで出力する。)
- StartUpStringを追加(StartUpオプションがTrueの時でスクリプト実行中にティッカーに表示する文字列)
- GetGasoline関数追加
- GetPrecture関数簡略化
・v0.6
- Prefectureの値が取得できない時は、全国の価格を取得するようにした。
- OilInfo.txtを廃止し、Dataフォルダ内に都道府県名.csvを作成するよう仕様変更(都道府県名.csvファイルには一度取得した石油情報を追加保存しています。)
- GetPrefecture関数の簡略化
- バージョン表記の変更
- 調査日に西暦も入れるようにした
・ver. 20071115
- Prefectureの値が北海道以外だと取得できないバグを修正。(一度、OilInfo.txtを削除してください。)
・ver. 20071028
- Icon(アイコンファイルの相対パス),ToolBar(ツールバー登録のフラグ),URI情報を追加
・ver. 20071022
- Prefectureを設定していないと無限ループに陥るバグを修正
・ver. 20071021
- サーバーへの不必要なアクセスを減らすため一度取得した情報を保存し9日経過しなければ取得しないよう仕様変更
・ver. 20071020
- とりあえず完成
Comments