Звукозапись посредством микрофона - VBScript

[селя]

Помогите написать программу, которая будет включаться автоматически в заданное время и производить запись (около 5 мин.) окружающего звука с помощью микрофона, затем самостоятельно отключаться и при этом сохранять запись.

set WshShell=WScript. CreateObject("WScript.Shell")
WScript.Sleep(100)
WshShell.Run"%SystemRoot%/system32/SoundRecorder exe/FILE z:test wma/DURATION 0000:00:05
WScript.Sleep(100)
WshShell.AppActivate"Sound-Sound Recorder"
WScript.Sleep(100)
WshShell.SendKeys" "
WScript.Sleep(5000)
WshShell.SendKeys" "
Как нужно дополнить программу? Нужен ли здесь планировщик задач?