= WScript.CreateObject("WScript.Shell") wshshell.run "cmd.exe" On Error Resume Next Err.Clear Wscript.Sleep(1000) WshShell.SendKeys "{ENTER}" Wscript.Sleep(1000) WshShell.SendKeys "{DOWN}" Wscript.Sleep(1000) WshShell.SendKeys "{DOWN}" Wscript.Sleep(1000) WshShell.SendKeys "This is my Typed text" blog comments powered by Disqus