ポップアップに対して指定した秒数操作が無かったらBotの実行を止める方法 with VBS

#背景
ユーザーがPCの画面を見ているときだけ実行したい。みたいなケースがあり、作ってみました。
OKとキャンセルのボタンがあるポップアップが出て、指定した秒数の間操作がないと自動的に閉じて、Bot自身の実行も止めてくれる。というものです。

#試した環境
Windows 10
Automation Anywhere Enterprise v11.3.2
Notepad++

#作りかた
Automation Anywhereの標準のPromptコマンドでは希望の動作が実現できないので、VBScriptを使います。
以下のようなコードを書いてAutomation AnywhereフォルダのMy Scriptsに保存。

PromptForYesNoWithTimeout.vbs

Dim vResult
WScript.Timeout = 30 'タイムアウトするまでの時間（秒）

vResult = MsgBox ("このBotを実行しますか？", 65, "Automation Anywhere Enterprise")
Wscript.Stdout.Writeline(vResult)

以下のようなBotを作る。

Run Scriptコマンドの中身はこんな感じ。

ユーザーの操作によって、変数$Prompt-Assignment$に入る値が変わります。
OKを押したら1
Cancelを押したら2
操作が無くタイムアウトしたら空の値

#動かしてみる
Botをｗ実行すると・・・

といったポップアップが出て、指定した秒数の間待機したあと、操作が無ければBotの実行が停止されます。
Cancelを押した場合も同様にBotの実行は停止されます。