运行时停止vbscript关闭当前窗口？

Question

我想写一个简单的脚本来填写需要使用键盘快捷方式登录的程序的登录详细信息。

set wshshell = wscript.CreateObject("wscript.shell") 
WshShell.SendKeys "username{tab}passowrd{enter}" 

这工作我的工作电脑（XP）上，但我家的电脑（Windows 8）的键盘快捷键停用，以便不进入细节的当前窗口根据需要。 任何帮助将不胜感激。

Answer 1

你可能想看看shell的AppActivate方法。你可以这样写：

boolSuccess = False 
do until boolSuccess = True 
    boolSuccess = WshShell.AppActivate("AppName") 
    WshShell.sleep 500 
loop  
WshShell.SendKeys "username{tab}password{enter}" 

这会将焦点移到目标应用程序，然后发送密钥。可悲的kludgey部分是，您可能需要在AppActivate和SendKeys之间“休眠”，以确保您的目标应用程序有时间获得焦点。