アラーム（VBS）

定期的な作業とかをするために導入したアラーム
これは、１０時の例です。

Option Explicit
Dim Alerm

Alerm = "10:00" ' 時刻の指定

if CDate(Alerm)>Time then
    While CDate(Alerm)>Time
        WScript.Sleep 10*1000 'ms
    Wend

    '処理を書きましょう

end if

wscript.quit

＜補足＞
毎日、PCを起動→シャットダウンすることを想定しています。
そのため、スタートアップに入れることが前提です。
結果、１０時過ぎに起動した場合は、そもそも起動しなくなります。
１０秒スパンで見ているため、起動のタイミングによっては、１０時００分９秒とかに起動します。
細かくするかは任意です。