Internet explorer 是否有使用VBScript使用IE打开新Ikognoto选项卡的命令？

大家好，我又来了

我想用VBScript在IE中打开一个“Ikognito选项卡”。但我不知道我该怎么做（或者是否可能）。所以我请求你们所有人的帮助。是否有使用VBScript使用IE打开新Ikognoto选项卡的命令

谢谢

---

Jonas

我知道您正在尝试开发一个VB脚本，以在私有模式下启动IE浏览器，并希望执行一些自动化任务

我建议您将下面的代码复制并粘贴到记事本中，并使用扩展名.vbs保存该文件

dim IE

Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run ("iexplore -private")

WScript.Sleep 1000

For Each wnd In CreateObject("Shell.Application").Windows
  If InStr(1, wnd.FullName, "iexplore.exe", vbTextCompare) > 0 Then
    Set IE = wnd

    Exit For
  End If
Next

IE.Navigate("http://localhost/form.html")

 Do While IE.Busy Or IE.readyState <> 4
    'Do nothing, wait for the browser to load.
  Loop

  Do While IE.Document.ReadyState <> "complete"
    'Do nothing, wait for the VBScript to load the document of the website.
  Loop
WScript.Sleep 1000
IE.Document.getElementsByName("fname").Item(0).Value = "abc"
WScript.Sleep 1000
IE.Document.getElementsByName("lname").Item(0).Value = "xyz"

dime
设置WshShell=WScript.CreateObject（“WScript.Shell”）
WshShell.Run（“iexplore-private”）
WScript.Sleep 1000
对于CreateObject（“Shell.Application”）.Windows中的每个wnd
如果InStr（1，wnd.FullName，“iexplore.exe”，vbTextCompare）>0，则
设置IE=wnd
退出
如果结束
下一个
例如，导航（“http://localhost/form.html")
在忙或准备状态4时执行
'不执行任何操作，等待浏览器加载。
环
在IE.Document.ReadyState“完成”时执行此操作
'不执行任何操作，等待VBScript加载网站的文档。
环
WScript.Sleep 1000
IE.Document.getElementsByName（“fname”）.Item（0.Value=“abc”
WScript.Sleep 1000
IE.Document.getElementsByName（“lname”）.Item（0.Value=“xyz”

当您运行上述代码时，它将在专用窗口中启动IE浏览器，然后它将导航到网站，代码将填充文本框中的数据

输出：

注:

确保在运行此代码之前关闭所有IE实例

我没有一个直接的方法用私有模式创建IE应用程序对象。所以在这里，我首先使用shell以私有模式打开IE，然后获取该对象以实现自动化

---

此外，您可以尝试根据自己的要求修改代码。

我知道您正在尝试开发一个VB脚本，以在私有模式下启动IE浏览器，并希望执行一些自动化任务

我建议您将下面的代码复制并粘贴到记事本中，并使用扩展名.vbs保存该文件

dim IE

Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run ("iexplore -private")

WScript.Sleep 1000

For Each wnd In CreateObject("Shell.Application").Windows
  If InStr(1, wnd.FullName, "iexplore.exe", vbTextCompare) > 0 Then
    Set IE = wnd

    Exit For
  End If
Next

IE.Navigate("http://localhost/form.html")

 Do While IE.Busy Or IE.readyState <> 4
    'Do nothing, wait for the browser to load.
  Loop

  Do While IE.Document.ReadyState <> "complete"
    'Do nothing, wait for the VBScript to load the document of the website.
  Loop
WScript.Sleep 1000
IE.Document.getElementsByName("fname").Item(0).Value = "abc"
WScript.Sleep 1000
IE.Document.getElementsByName("lname").Item(0).Value = "xyz"

dime
设置WshShell=WScript.CreateObject（“WScript.Shell”）
WshShell.Run（“iexplore-private”）
WScript.Sleep 1000
对于CreateObject（“Shell.Application”）.Windows中的每个wnd
如果InStr（1，wnd.FullName，“iexplore.exe”，vbTextCompare）>0，则
设置IE=wnd
退出
如果结束
下一个
例如，导航（“http://localhost/form.html")
在忙或准备状态4时执行
'不执行任何操作，等待浏览器加载。
环
在IE.Document.ReadyState“完成”时执行此操作
'不执行任何操作，等待VBScript加载网站的文档。
环
WScript.Sleep 1000
IE.Document.getElementsByName（“fname”）.Item（0.Value=“abc”
WScript.Sleep 1000
IE.Document.getElementsByName（“lname”）.Item（0.Value=“xyz”

当您运行上述代码时，它将在专用窗口中启动IE浏览器，然后它将导航到网站，代码将填充文本框中的数据

输出：

注:

确保在运行此代码之前关闭所有IE实例

我没有一个直接的方法用私有模式创建IE应用程序对象。所以在这里，我首先使用shell以私有模式打开IE，然后获取该对象以实现自动化

---

此外，您可以尝试根据自己的要求修改代码。

很抱歉，这不起作用。无论如何，我需要在网站上运行如下命令：

Email=webbrowser.document.getElementByID（“fe_text”）.Value

但谢谢；）@Deepak MSFTI建议您尝试提供详细信息。你是如何尝试运行它的？你有什么错误吗？请解释一下，你想在网站上运行这个命令是什么意思。我运行了这个程序，但没有看到任何事情发生。我也没有收到任何错误消息。“我想在网站上执行一个命令，…”我的意思是我想更改源代码的值。因此，我需要填写表格或登录。请检查更新后的答案，如果有任何问题，请告诉我。@Deepak MSFT也许最好等到OP提供“详细信息”后再尝试回答。抱歉，这没有用。无论如何，我需要在网站上运行如下命令：

Email=webbrowser.document.getElementByID（“fe_text”）.Value

但谢谢；）@Deepak MSFTI建议您尝试提供详细信息。你是如何尝试运行它的？你有什么错误吗？请解释一下，你想在网站上运行这个命令是什么意思。我运行了这个程序，但没有看到任何事情发生。我也没有收到任何错误消息。“我想在网站上执行一个命令，…”我的意思是我想更改源代码的值。因此，我需要填写表格或登录。请检查更新的答案，如果有任何问题，请告诉我。@Deepak MSFT也许最好等待OP提供“详细信息”在尝试回答之前。是的，你再次来到这里，仍然不明白提供一个结构良好的问题涉及到什么。在人们能够帮助你之前，你需要提供更多的信息。通常一个详细说明问题的小代码示例在这方面会有所帮助。我知道，但我不知道应该在这里放什么代码，因为我不知道如何解决这个问题。但我将来会做得更好如果您不知道如何使用WSH在VBScript中运行命令的基本知识，而不是询问/搜索（一厢情愿）错误的问题，请在尝试运行之前先学会走路。是的，您再次来到这里，仍然不明白提供一个构造良好的问题涉及到什么。在人们能够帮助你之前，你需要提供更多的信息。通常，一个详细说明问题的小代码示例在这方面会有所帮助