これは、VBScript & WSH(Windows Scripting Host)用です

履歴


はじめに
masa0822 氏が作成された TCalender というデスクトップ・カレンダーがあります。

TCalender ver2.40 では、平成12年度に改定された法律に未対応なため、祝日データが現実とズレてしまいます。

TCalender ver2.40 では、祝日データを TCalender のインストールされたディレクトリの Holiday.dat というテキスト・ファイルに保存されています。

ということで、この Holiday.dat を毎年更新すればよいようなスクリプトが本スクリプトです。

本スクリプトは、計算結果を標準出力に出力していますので、
cscript.exe //Nologo sTCholiday.vbs > Holiday.dat
とでも実行して、Holoday.dat を置き換えればいいでしょう。

ソースの説明
省略
実行環境


使い方
  1. Moji_CHk.DLL を最新バージョンにしてください。
  2. ダウンロードしたファイルを解凍しします。
    (ＬＨＡは、吉崎栄泰氏が、著作権を所有)
  3. 解凍して出来た tc.vbs がスクリプトファイルです。


使い方：
「cscript.exe sTCholoday.vbs 西暦年」
とすることで、西暦年で指定した年度の祝日を計算します。
西暦年を省略した場合、スクリプト起動時の年を指定した事と同義となります。


対応祝日
元日
01/01
成人の日
1月の第二月曜日(1999年までは 01/15)
建国記念の日
02/11
春分の日
春分日として指定された日
下のリンクによると、大体 int(20.8431+0.242194*(YYYY-1980) -int((YYYY-1980)/4)) らしい...
みどりの日
04/29
憲法記念日
05/03
国民の祝日
05/04
こどもの日
05/05
海の日
7月の第三月曜日(2003年までは 07/20)
敬老の日
9月の第三月曜日(2003年までは 09/15)
秋分の日
秋分日として指定された日
下のリンクによると、大体 int(23.2488+0.242194*(YYYY-1980) -int((YYYY-1980)/4)) らしい...
体育の日
10月の第二月曜日(1999年までは 10/10)
文化の日
11/03
勤労感謝の日
11/23
天皇誕生日
12/23


以下のページを参考にしました。

削除方法
レジストリや、システムフォルダはいじっていないので、
解凍してできたファイルを削除すればOKです

使用上の注意
春分の日/秋分の日があやしい。int() 関数って少数点以下切捨てたせようねぇ!?
であれば問題ないと思うけど、そうでない場合は VBScript の Int() 関数で代用しているので、1日の誤差がある可能性がある。

WSCript.exe で起動しても意味がないと思うよ。

免責など
著作権は放棄します。
このソフトを使用したことによって生じた、
いかなる損害についても責任は持ちません。
ソースコードについても、各自の責任において、
自由にいじってくれてもいいです。
DownLoad(sTCholiday.lzh as 2,110byte) (sTCholiday.lzh.base64)
リンク


mail to active@window.goukaku.com