如何在web上实现对另一个应用程序的键盘输入，就像vb中的sendkey

用
set WshShell = CreateObject( "WScript.Shell ")
WshShell.SendKeys "{ESC} "

但是要提示一个安全警告,这个警告怎么去除?


这个问题原来在.com的时候也碰到过。也一直没有搞定。后来是自己写的上传组件。其实你已经如果打算用activeX，可以自己写一个File组件.如果是要上传，还可以将其写成一个FTP上传的东西，那样上传也许会更好的。
其实WScript.Shell中也有SendKeys这个方法，MSDN中用了Sleep(100)，我不知道为什么，你也可以试试,这是一个例子。打开calc自己算一个东西。。
set WshShell = WScript.CreateObject( "WScript.Shell ")
WshShell.Run "calc "
WScript.Sleep 100
WshShell.AppActivate "Calculator "
WScript.Sleep 100
WshShell.SendKeys "1{+} "
WScript.Sleep 500
WshShell.SendKeys "2 "
WScript.Sleep 500
WshShell.SendKeys "~ "
WScript.Sleep 500
WshShell.SendKeys "*3 "
WScript.Sleep 500
WshShell.SendKeys "~ "
WScript.Sleep 2500

PS:取得当前的Document对象的方法是，利用ShellWindows这个对象，具体请参看MSDN中的HOWTO: Connecting to a Running Instance of Internet Explorer ID: Q176792,不过说实话，这种方法并不太适用。因为你得通过一些手段区分哪个是自己的窗口。