javascript - 如何使用 vb.net 窗口应用程序打开没有菜单栏的 html 文件

Question

您好，我正在尝试使用以下代码在 Firefox 浏览器中打开 HTML 文件

 Dim NewProcess As Process
 NewProcess.Start(url1)

默认情况下，它在 Firefox 中打开，因为我的默认浏览器是 Firefox，但它使用所有工具和菜单栏打开，如何在没有工具和菜单的情况下打开它。

如何使用

window.open(url,"MyWindow","config='toolbar=no, menubar=no,scrollbars=no,resizable=no,location=no,directories=no,atus=no'");

此页面的所有权

Answer 1

您可以尝试在打开新的 Firefox 进程时传递 -url 参数以及您的代码。

Dim NewProcess As Process = Process.Start("firefox.exe", "-url ""javascript:window.open('" & url1 & "','MyWindow','config=toolbar=no,menubar=no,scrollbars=no,resizable=no,location=no,directories=no,atus=no');""")

编辑:

或者(因为这似乎并不适用于所有情况)您可以编写一个临时 HTML 文件，该文件在打开时会根据您的规范创建一个新窗口。

Public Const BaseWindHTML As String = "<script>window.open('<replaceurl>','MyWindow','config=toolbar=no,menubar=no,scrollbars=no,resizable=no,location=no,directories=no,atus=no'); window.close();</script>"

Public Sub OpenNewWindow(ByVal URL As String)
    Dim HTMLPath As String = IO.Path.Combine(System.AppDomain.CurrentDomain.BaseDirectory(), "newwindow.html")

    Using Writer As New IO.StreamWriter(HTMLPath, False)
        Writer.Write(BaseWindHTML.Replace("<replaceurl>", URL))
    End Using
    Dim fProcess As Process = Process.Start("firefox.exe", "-url """ & HTMLPath & """")
    fProcess.WaitForInputIdle()
    Threading.Thread.Sleep(1500)
    fProcess.CloseMainWindow()
End Sub

使用示例:

OpenNewWindow("http://www.google.com/")