''''''''''''''''''''''''''''''''''
'Open notepad and write something'
''''''''''''''''''''''''''''''''''
dim sh, WScript

Set sh = CreateObject("WScript.Shell")
sh.Run "%windir%\notepad.exe"
Sleep 500
sh.SendKeys "Hello from Twistpad!"