Question

*已修改脚本需要能够允许两个页面都可以轻松访问，例如可以通过ALT-TAB进行预期的使用。

我想编写一个脚本，以使用循环在使用VBS的信息亭模式下一次打开一个网站，但是很容易在它们之间进行切换。我提供了一个示例脚本，该脚本对于我目前所需要的并不是很有用，这就是为什么需要一些指导或帮助的原因。最终，目标是在信息亭模式下打开一个页面，然后方便地（根据需要来回切换）切换到另一个窗口。唯一的事情是它们应该处于信息亭模式。谁能告诉我这在vbs中是否可行？任何和所有帮助表示赞赏。

信息亭模式非常适合我需要的目的，因为它用于研究目的的调查，我们将建立一个供候选人参加的调查。 vbs是我目前可以使用的唯一批准的方法。我们收到了将要使用的反馈响应，以便我们可以利用候选人遇到的每个实例来解决质量问题的反馈。

const navOpenInNewTab = &h0800

Dim objIE
Set objShell = CreateObject("Wscript.Shell")
Set objIE = CreateObject("InternetExplorer.Application")
objIE.Navigate("about:blank")

objIE.Navigate "http://www.google.com",CLng(navOpenInNewTab)

objIE.FullScreen=True
Set objDoc = objIE.Document.Body
strHTML = "<H1>Display this message.</H1>"
objDoc.InnerHTML = strHTML
objIE.Visible = True
objIE.StatusBar = False
objShell.Run ("iexplore -k")
WScript.Sleep(500)

objIE.Quit

就目前而言，由于我在vbs方面的知识能力有限，所以我有局限性，此处显示的代码打开了两个窗口而不是选项卡（很可能是我的代码和理解上的错误）

Answer 1

这将打开google，等待它关闭（使用-k信息亭模式，您可以从任务栏将其关闭），然后出现microsoft.com：

Option Explicit 

Dim objShell

Set objShell = WScript.CreateObject("WScript.Shell")

objShell.Run "iexplore -k http://google.ro" , 1, true


objShell.Run "iexplore -k http://microsoft.com" , 1, true

set objShell = nothing

Wscript.Quit

使用.run参数1（显示执行）和true（等待过程完成）完成此操作

https://ss64.com/vb/run.html

想要编写仅使用vbs一次打开两个网站的信息亭模式脚本

1 个答案: