我正在尝试将一些击键发送到程序。我下面有一些示例代码，直到最终为止都可以正常工作{Alt}命令。我相信这是由于窗口名称更改为"Notepad1" to "NotePad2"。谁能帮我改变AppActivate路径到"Notepad2"之后objShell.SendKeys "{Enter}"命令？
Example:
Set objShell = WScript.CreateObject("WScript.Shell")
objShell.Run "Notepad.exe"
Do Until Success = True
Success = objShell.AppActivate("NotepadPathA")
Loop
objShell.SendKeys "{F1}"
objShell.SendKeys "Secure06**"
objShell.SendKeys "{Enter}"
Shell.SendKeys "{Alt}"
- 你正在使用
Shell在你的最后一行，但你还没有定义它。将其更改为objShell反而。
-
发送Alt钥匙、使用"%"。例如：
objShell.SendKeys "%"
您通常会在组合键中使用它。例如，要打开File在大多数程序中，您会使用菜单Alt+F, or:
objShell.SendKeys "%f"
-
如果您的窗口标题发生变化，或者您出于某种原因需要激活新窗口，只需调用AppActivate again:
objShell.AppActivate "My new window title"
本文内容由网友自发贡献，版权归原作者所有，本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容，请联系:hwhale#tublm.com(使用前将#替换为@)
