Сочетание клавиш или Горячая клавиша для отмены VBScript

Question

taskKill = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & taskKill & "\root\cimv2")

Set processlistFull= objWMIService.ExecQuery _
("Select * from Win32_Process Where name = 'wscript.exe'")

For Each killPro In processlistFull
killPro.Terminate()

Далее

Как добавить этот сценарий В СУЩЕСТВУЮЩИЙ сценарий и вызвать эту функцию для отмены 'wscript.exe' с помощью горячей клавиши