Foxtable(狐表)用户栏目专家坐堂 → Webbrowser打开网页提示JS错误


  共有8964人关注过本帖树形打印复制链接

主题:Webbrowser打开网页提示JS错误

帅哥哟,离线,有人找我吗?
有点青
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:573 积分:2961 威望:0 精华:0 注册:2016/10/27 14:33:00
  发帖心情 Post By:2016/11/15 11:46:00 [显示全部帖子]

 我的没报错,有可能是webbrowser内核版本问题。试试

 

http://foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=84931&replyID=588499&skin=1

 


 回到顶部
帅哥哟,离线,有人找我吗?
有点青
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:573 积分:2961 威望:0 精华:0 注册:2016/10/27 14:33:00
  发帖心情 Post By:2016/11/17 10:10:00 [显示全部帖子]

你17楼的网页打不开。如果确实不行,那你就加入一个内置的浏览器吧,比如 webkit 等。


 回到顶部
帅哥哟,离线,有人找我吗?
有点青
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:573 积分:2961 威望:0 精华:0 注册:2016/10/27 14:33:00
  发帖心情 Post By:2016/11/17 15:51:00 [显示全部帖子]

 在你的窗口上放一个panel1,然后afterLoad事件写代码

 

    Dim web As new WebKit.WebKitBrowser

    web.Dock = Windows.Forms.DockStyle.Fill
    e.form.Controls("panel1").BaseControl.Controls.Add(web)
    web.Navigate("http://www.baidu.com")

 回到顶部
帅哥哟,离线,有人找我吗?
有点青
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:573 积分:2961 威望:0 精华:0 注册:2016/10/27 14:33:00
  发帖心情 Post By:2016/11/17 18:16:00 [显示全部帖子]

以下是引用天若千颖在2016/11/17 18:00:00的发言:
我就是把bin下面所有的文件放在foxtable安装目录下的,那个dll就在安装目录下。但是打不开。

 

直接用webkit自带的测试工具,能否正常浏览网址?你下载的那个是不是有问题?


 回到顶部
帅哥哟,离线,有人找我吗?
有点青
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:573 积分:2961 威望:0 精华:0 注册:2016/10/27 14:33:00
  发帖心情 Post By:2016/11/18 9:33:00 [显示全部帖子]

webkit.net 是对webkit的.net的一个封装,而且是一个开源项目,应该是不会有版本的更新的了。不过人家有源码,你可以自己改....

 

其它同类的控件的话,可以试试 GeckoFX


 回到顶部
帅哥哟,离线,有人找我吗?
有点青
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:573 积分:2961 威望:0 精华:0 注册:2016/10/27 14:33:00
  发帖心情 Post By:2016/11/18 12:52:00 [显示全部帖子]

 用折中的方法吧,直接嵌入ie,将就着用

 

 

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:嵌入ie_测试.table


 回到顶部
帅哥哟,离线,有人找我吗?
有点青
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:573 积分:2961 威望:0 精华:0 注册:2016/10/27 14:33:00
  发帖心情 Post By:2016/11/18 14:56:00 [显示全部帖子]

 用嵌入的方式。把边框去掉就行了。

 


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20161118145519.png
图片点击可在新窗口打开查看 

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:嵌入ie_测试.table



 回到顶部
帅哥哟,离线,有人找我吗?
有点青
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:573 积分:2961 威望:0 精华:0 注册:2016/10/27 14:33:00
  发帖心情 Post By:2016/11/18 14:58:00 [显示全部帖子]

50楼的问题,你试试这样写

 

Dim brw As WinForm.WebBrowser = e.Form.Controls("WebBrowser1")
brw.Address = "URL"
e.form.controls("webbrowser1").basecontrol.ScriptErrorsSuppressed = True
 
Threading.thread.sleep(1000)
 
e.form.controls("webbrowser1").basecontrol.Refresh

 回到顶部
帅哥哟,离线,有人找我吗?
有点青
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:573 积分:2961 威望:0 精华:0 注册:2016/10/27 14:33:00
  发帖心情 Post By:2016/11/18 15:47:00 [显示全部帖子]

那就试试......反正我webbrowser测试没你说的问题。
 
Dim brw As WinForm.WebBrowser = e.Form.Controls("WebBrowser1")
brw.Address = "URL"
e.form.controls("webbrowser1").basecontrol.ScriptErrorsSuppressed = True
 
Do Until web.ReadyState = 4
    Application.DoEvents
Loop
 
Threading.thread.sleep(3000)
 
e.form.controls("webbrowser1").basecontrol.Refresh

 回到顶部