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

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

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

Sub-sbExitHTA
设置IE=CreateObject（“InternetExplorer.Application”）
可见=真实
IE.Navigate2“yahoo.com”
'IE.Navigate2“yahoo.com”
' 
Self.Close（）

---

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

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

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

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

---

关于Run命令和

intWindowStyle

参数（我在这里使用了9）。

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

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

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

---

关于Run命令和

intWindowStyle

参数（我在这里使用了9）。

可能重复的可能重复的可能重复的可能重复的可能重复的可能重复的可能重复的可能重复的可能重复的可能重复的可能重复的可能重复的可能重复的可能重复的可能重复的可能重复的代码是否尝试过？你想了解更多的信息吗？谢谢Etienne，我知道我必须编辑和插入你的代码，它工作得很神奇，非常感谢。太好了，很高兴它工作了！请使用答案左侧的灰色复选标记将答案标记为已接受！当您有新的编程问题时，请返回堆栈溢出。完成。我能给你发个短信吗？请解释一下你有没有试过密码？你想了解更多的信息吗？谢谢Etienne，我知道我必须编辑和插入你的代码，它工作得很神奇，非常感谢。太好了，很高兴它工作了！请使用答案左侧的灰色复选标记将答案标记为已接受！当您有新的编程问题时，请返回堆栈溢出。完成。请问我能给你捎个口信吗？