超簡単！！！10秒で自分のタスクスケジューラを作れる

簡単に作成できる手順は↓

１．中身

TaskTimer.vbs

dim input1,input2
input1=InputBox("[HH24:mm:ss]に提示メッセージを表示させるか？","時刻入力",FormatDateTime(time,vbLongTime))
input2=InputBox("提示メッセージ内容を書いてください。","メッセージ入力","一息を入れましょう！ or 会議１０分前！")
WScript.Sleep DateDiff("s",FormatDateTime(time,vbLongTime),input1)*1000
msgbox input2,vbSystemModal,"Warning"

簡易AlertTimer.vbs

ret1 = InputBox("[HH24:mm:ss]に次のAlert Messageを表示させます","※将来の時刻入力",FormatDateTime(time,vbLongTime))
ret2 = InputBox("Alert内容を記入てください。","メッセージ入力","一息を入れましょう！ or 会議１０分前！")
NewDate = DateDiff("s",FormatDateTime(time,vbLongTime),ret1)
WScript.Sleep NewDate*1000
MsgBox ret2,vbSystemModal,"★Alert"

２．外部ファイル作成

上記の中身を名前自由につける拡張子をvbsとする外部ファイルへ作成、保存。

３．試行

作成ファイルをダブルクリックして実行


※保存文字コードはSJISでOK、UTF-8はNG
※Windows7,10にて実行試験済み
※設定Alert時刻を将来時刻に設定するように（現時点以前にするとエラー発生してしまう）