壁紙に情報を表示するBgInfo（カレンダー表示）

壁紙にシステム情報や時間などを表示できる便利なツールBgInfoで
スクリプトを使用してシンプルなカレンダーを表示できます。
会社では机の上にカレンダーを置く事が禁止されているのでちょうどいい！
情報源はこちら

スクリプトは

Echo Calendar:
curYear = Year(Now)
curMonth = Month(Now)
Echo curYear & " 年 " & Right(" " & curMonth, 2) & " 月"
line = ""
For i = 1 to 7
line = line & " " & WeekdayName(i, true) & " "
Next
Echo line
d = DateSerial(curYear, curMonth, 1)
w = Weekday(d)
line = Space(w * 4 - 4)
Do While d < DateSerial(curYear, curMonth + 1, 1)
If d = Date Then
line = line & "<" & Right(" " & Day(d), 2) & ">"
Else
line = line & " " & Right(" " & Day(d), 2) & " "
End If
If w < 7 Then
w = w + 1
Else
w = 1
Echo line
line = ""
End If
d = d + 1
Loop
If w > 1 Then
Echo line
End If


見づらくてすいません。
これをテキストに張り付けてCalendar.vbsで保存。
BgInfoのカスタムフィールドにCalendarを追加。
参照をVB Script fileとして先ほどのファイルを指定。
後は好きな場所に配置。

Powered by 『くりＭＯ』アドバンス紹介キャンペーン