使用 VBScript 打开托盘应用程序

Question

使用 VBScript，有没有办法在默认行为是最小化到托盘时打开应用程序并使其窗口最大化？

我有一个应用程序打开到托盘但不显示其登录屏幕。我正在尝试使用 VBScript 和SendKeys 自动化登录过程。我知道这不安全，因为任何人都可以查看脚本，但这不是问题。

有没有办法打开一个应用程序，然后让它显示它的 GUI？我还需要确保应用程序获得焦点，以便 SendKeys 工作。

我知道如何打开应用程序。问题是让应用显示其登录屏幕。

Answer 1

Dim oWsh : Set oWsh = CreateObject("WScript.Shell")
oWsh.Run("prog.exe", 1, False)
WScript.Sleep 500
oWsh.AppActivate "Prog Title"  ' text in window title of 'prog.exe'
oWsh.SendKeys "first Command"
' ...additional SendKeys commands

参考：Run Method 和 SendKeys Method