vbscript自动表单子目录失败

Question

您好我有以下vb脚本打开一个程序，然后单击弹出消息上的确定按钮，然后输入一个包含服务器名称，用户名和密码的表单，然后单击提交。该脚本运行良好，因为它将其作为计划的登录脚本运行。

但是，如果用户在此脚本运行时打开另一个窗口，则脚本将失败。我需要通过关注正确的窗口使脚本更加智能化。请帮忙。

Dim objShell
Set objShell = WScript.CreateObject( "WScript.Shell" )
objShell.Run("""C:\Program Files (x86)\SNS EVO ShareBrowser\Client\evo ShareBrowser.exe""")
WScript.Sleep 1000
objShell.SendKeys "{ENTER}"
WScript.Sleep 1000
objShell.SendKeys "abc"
objShell.SendKeys "{TAB}"
objShell.SendKeys "user"
objShell.SendKeys "{TAB}"
objShell.SendKeys "password"
objShell.SendKeys "{ENTER}"
wscript.Quit