0
2

Delete article

Deleted articles cannot be recovered.

Draft of this article would be also deleted.

Are you sure you want to delete this article?

More than 3 years have passed since last update.

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

Last updated at Posted at 2019-10-29

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

1.中身

```vb:TaskTimer.vbs dim input1,input2 input1=InputBox("[HH24:flag_mm:ss]に提示メッセージを表示させるか?","時刻入力",FormatDateTime(time,vbLongTime)) input2=InputBox("提示メッセージ内容を書いてください。","メッセージ入力","一息を入れましょう! or 会議10分前!") 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 会議10分前!")
NewDate = DateDiff("s",FormatDateTime(time,vbLongTime),ret1)
WScript.Sleep NewDate*1000
MsgBox ret2,vbSystemModal,"★Alert"

2.外部ファイル作成

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

3.試行

作成ファイルをダブルクリックして実行
※保存文字コードはSJISでOK、UTF-8はNG ※Windows7,10にて実行試験済み ※設定Alert時刻を将来時刻に設定するように(現時点以前にするとエラー発生してしまう)
0
2
0

Register as a new user and use Qiita more conveniently

  1. You get articles that match your needs
  2. You can efficiently read back useful information
  3. You can use dark theme
What you can do with signing up
0
2

Delete article

Deleted articles cannot be recovered.

Draft of this article would be also deleted.

Are you sure you want to delete this article?