Stap 3: De Auto Typer
set shellobj = CreateObject("WScript.Shell")
shellobj.run "cmd"
doen
shellobj.SendKeys "Y"
WScript.Sleep 200
Shellobj.SendKeys "o"
WScript.Sleep 200
lus
set shellobj = CreateObject("WScript.Shell")
shellobj.run "cmd"
doen
shellobj.SendKeys "Y"
WScript.Sleep 200
Shellobj.SendKeys "o"
WScript.Sleep 200
lus