Win10下VB6 IE自动化编译EXE启动傲游而非IE的解决办法

这个问题我之前帮不少开发者解决过，核心原因是Maxthon这类IE内核浏览器会注册和IE相同的COM ProgID，导致编译后的EXE调用CreateObject("InternetExplorer.Application")时，系统指向了Maxthon的组件；而VB6 IDE因为运行环境的特殊性，还能正确找到原生IE。下面给你几个靠谱的修复方案：

方案1：指定IE特定版本的ProgID #

Maxthon一般不会劫持带版本号的IE ProgID，直接使用带版本标识的ProgID调用，就能确保启动原生IE，同时保留COM自动化的便利性，推荐优先尝试：

Set WebBrowser1 = CreateObject("InternetExplorer.Application.11")
WebBrowser1.Visible = True
WebBrowser1.Navigate "https://your-target-url.com"

如果你的系统安装的是其他版本IE，也可以尝试InternetExplorer.Application.9或InternetExplorer.Application.10这类对应版本的ProgID。

方案2：强制调用原生IE的可执行文件 #

彻底绕开COM对象的关联问题，直接调用IE的iexplore.exe可执行文件启动：

Dim ieExecPath As String
' 32位系统或64位系统的32位IE路径
ieExecPath = Environ("ProgramFiles(x86)") & "\Internet Explorer\iexplore.exe"
' 如果是纯32位Windows，用下面这句替换
' ieExecPath = Environ("ProgramFiles") & "\Internet Explorer\iexplore.exe"

' 启动IE并打开目标页面
Shell ieExecPath & " " & "https://your-target-url.com", vbNormalFocus

如果需要后续对IE窗口做自动化操作，可以结合Windows API获取窗口句柄来实现。

方案3：修复注册表的COM关联 #

如果上面的方法都无效，可以手动修正注册表，确保InternetExplorer.Application指向原生IE的CLSID：

1. 按下Win+R，输入regedit打开注册表编辑器（需要管理员权限）
2. 定位到路径HKEY_CLASSES_ROOT\InternetExplorer.Application\CLSID
3. 检查默认值是否为{0002DF01-0000-0000-C000-000000000046}——这是原生IE的CLSID
4. 如果值被修改为其他内容，右键选择「修改」，将其改回上述正确值

同时也可以检查HKEY_LOCAL_MACHINE\Software\Classes\InternetExplorer.Application\CLSID路径下的内容，确保和上面一致。

内容的提问来源于stack exchange，提问作者DriveCarefully