печать букв в блокноте, VBScript.интересно Опции

[печать букв в блокноте]

Вот я системно, возможностями vbs, открыл блокнот. Можно ли, как бы сказать так, эмулировать нажатие клавиш?
Вот смотришь в блокнот и видишь, как там буквы вылетают. Надеюсь, изложил понятно.

[volvo]

Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run "C:\Windows\Notepad.exe"
WScript.Sleep(100)
WshShell.AppActivate "Untitled - Notepad"

WshShell.SendKeys "H"
WScript.Sleep(500)
WshShell.SendKeys "E"
WScript.Sleep(500)
WshShell.SendKeys "L"
WScript.Sleep(500)
WshShell.SendKeys "L"
WScript.Sleep(500)
WshShell.SendKeys "O"
WScript.Sleep(500)
WshShell.SendKeys "!"
WScript.Sleep(500)