石油情報センターのサイトより住んでいる地域の石油価格を取得するVBScript(HttpRequest+正規表現)です。
一度取得したら9日経たないと新しく取得しに行かない様にしてあります。(石油価格の調査日が毎週月曜日で、必要以上にサーバーにアクセスしないため)
■今後の予定
・
AIZACK本体のティッカー機能と連携・XML出力可能にし、グラフに挿入?
■更新情報
・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
とりあえず完成