VBS脚本将程序带到前面答案

【问题标题】：VBS script to bring program to frontVBS脚本将程序带到前面
【发布时间】：2012-10-17 02:04:43
【问题描述】：

我正在编写 VBS 代码来打开 Internet Explorer 并转到 www.google.com 但是当我运行该程序时，它会打开并导航到 www.yahoo.com 但 Internet Explorer 不是前窗口。谁能帮我这个？有没有我可以用来把 Internet Explorer 带到前面的代码？谢谢你们！这是我的代码：

Option Explicit
 Dim ie


Set ie = CreateObject("InternetExplorer.Application")

ie.Navigate("wwww.yahoo.com")

最后一个问题 - 有没有我可以用来点击某个按钮的代码 - 特别是我无法通过按“tab”到达的按钮？

谢谢大家！

【问题讨论】：

标签： button vbscript click window

【解决方案1】：

这适用于我的电脑，它打开 IE 并加载 www.google.com：

Dim oShell
Set oShell = CreateObject("WScript.Shell")
oShell.Run ("iexplore www.google.com")

至于你的最后一个问题......可能，但你需要更具体，并且可能应该问一个不同的问题。

【讨论】：

【解决方案2】：

试试这个：

Set ie = CreateObject("InternetExplorer.Application")
ie.Navigate "http://www.yahoo.com/"
Do While ie.Busy : WScript.Sleep 100 : Loop
ie.Visible = True
CreateObject("WScript.Shell").AppActivate ie.document.title

【讨论】：

对我不起作用。它激活了应用程序，但没有让它出现。 :(

【解决方案3】：

我发现在调用 AppActivate 方法之后将 Visible 属性设置为 True 有效@daniel-cook。

因此，只需交换@ansgar-wiechers 示例中的最后两行即可产生所需的结果。

Set ie = CreateObject("InternetExplorer.Application")
ie.Navigate "http://www.yahoo.com/"
Do While ie.Busy : WScript.Sleep 100 : Loop
CreateObject("WScript.Shell").AppActivate ie.document.title
ie.Visible = True

【讨论】：

【解决方案4】：

使用wscript.sleep() 函数。应该可以工作，因为这可以在记事本上工作。

【讨论】：

您的答案可以通过额外的支持信息得到改进。请edit 添加更多详细信息，例如引用或文档，以便其他人可以确认您的答案是正确的。你可以找到更多关于如何写好答案的信息in the help center。