我的代码中是否有可以用来调用默认浏览器的函数或命令

2024-05-21 • 问答

我有一个代码，用于指定打开链接时要使用的特定浏览器类型，现在我希望该代码使用计算机的默认浏览器而不是指定的浏览器来打开链接。

我将代码行设置为“ defaultbrowser.application”和“ default_browser.application”，而不是“ InternetExplorer.application”

 Sub sbExitHTA
 Set IE = CreateObject("InternetExplorer.Application")
 IE.Visible = true
 IE.Navigate2 "yahoo.com"
'IE.Navigate2 "yahoo.com"

'<a href="yahoo.com">Yahoo</a> 
  Self.Close()

我希望代码打开计算机的默认浏览器，该浏览器不是Internet Explorer而是Internet Explorer

huangchaoqi 回答：我的代码中是否有可以用来调用默认浏览器的函数或命令

以下代码使用您的默认浏览器：

Dim objWScriptShell
Set objWScriptShell = CreateObject("WScript.Shell")

objWScriptShell.Run "https://yahoo.com",9

Here is documentation关于运行命令和intWindowStyle参数（我在这里使用9）。

vbscript

本文链接：https://www.f2er.com/3132343.html

我的代码中是否有可以用来调用默认浏览器的函数或命令

huangchaoqi 回答：我的代码中是否有可以用来调用默认浏览器的函数或命令

大家都在问