VB6.0使用WebBrowser控件打开网页总是弹出js错误提示,请解决。

VB6.0使用WebBrowser打开网页弹出js错误,屏比弹窗后,页面无法正常显示。调用IE内核版本也无法解决。VB除了这个web好像无其他浏览器控件,倍感纠结啊!
Windows Registry Editor Version 5.00
[HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Internet Explorer\MAIN\FeatureControl\FEATURE_BROWSER_EMULATION]
"生成的程序.exe"=dword:00002710

网页网址:http://zyjs.myhm.org/my_zxXx_font/pc/member/login.jhtml

正常界面:

img


使用WebBrowser控件打开网页出现如下错误:

img

img

该回答引用GPTᴼᴾᴱᴺᴬᴵ,具体如下:

这个问题可能是因为Internet Explorer的安全设置导致的。您可以尝试以下方法:

1、打开Internet Explorer,点击“工具”,选择“Internet选项”。
2、在“安全”选项卡下,将所有“安全级别”设置为“默认级别”。
3、在“高级”选项卡下,将“启用脚本调试”和“显示通知栏”两个选项都勾选上,然后点击“确定”保存设置。
4、关闭Internet Explorer,重新运行您的VB6.0程序,尝试打开网页并查看是否还有问题。


如果仍然存在问题,您可以尝试将IE的文档模式设置为IE11来解决这个问题,您可以在注册表中设置以下键值:

Windows Registry Editor Version 5.00
[HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Internet Explorer\MAIN\FeatureControl\FEATURE_BROWSER_EMULATION]
"YourProgramName.exe"=dword:00002710


将YourProgramName.exe替换为您的程序的名称,并将dword:00002710设置为11,这将设置IE11文档模式。如果您的程序位于64位操作系统上的“Program Files”目录中,则需要使用Wow6432Node键。完成后,重新启动您的程序并尝试打开网页。

如果以上回答对您有所帮助,望采纳~谢谢

禁用Internet Explorer中的脚本调试功能
设置WebBrowser控件的脚本错误提示
更新Internet Explorer浏览器版
修改注册表项

网站挂了。另外你得用ie浏览器访问网址正常了,再考虑WebBrowser控件。

这很正常了,webbrowser是基于ie的,ie都废弃多少年了。你用ie访问网站,也是一样的报错。

自带的内核版本太低,很多新的语法、样式都会出错,可以尝试调用WebViewer2,参考:
https://github.com/sysdzw/WebView2DemoForVb6

以下答案由GPT-3.5大模型与博主波罗歌共同编写:
这个问题可能是因为WebBrowser控件默认以IE7的兼容模式运行,而某些网页需要更高版本的IE兼容性,所以会导致JavaScript错误和网页显示问题。

解决这个问题的方法是通过修改注册表来使WebBrowser控件以更高的IE版本运行。下面是修改注册表的方法:

  1. 打开注册表编辑器(regedit.exe)。
  2. 找到下面的路径:HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Internet Explorer\MAIN\FeatureControl\FEATURE_BROWSER_EMULATION
  3. 如果FeatureControl和FEATURE_BROWSER_EMULATION这两个键和值没有,则需要手动创建。
  4. 右键点击FEATURE_BROWSER_EMULATION键,选择“新建”→“DWORD(32位)值”。
  5. 输入你的程序名称(比如“你的程序名称.exe”)作为键名。
  6. 双击新创建的键,将数值数据设置为相应的IE版本号。比如IE11的版本号是11001,IE10的版本号是10001,IE9的版本号是9999,IE8的版本号是8888等。你可以根据自己的需要来选择合适的版本号。

在你的VB6.0程序中,使用WebBrowser控件打开网页之前添加以下代码来设置IE版本号:

```
Dim appName As String
Dim ieVersion As Integer
appName = App.Title & ".exe" '获取程序名称
ieVersion = 11001 '设置IE版本号,这里设置为IE11
'将程序名称和IE版本号添加到注册表
Call WriteReg("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Internet Explorer\MAIN\FeatureControl\FEATURE_BROWSER_EMULATION", appName, ieVersion, "REG_DWORD")
WebBrowser1.Navigate "http://z/