Foxtable(狐表)用户栏目专家坐堂 → [求助]获取当前网页


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

主题:[求助]获取当前网页

美女呀,离线,留言给我吧!
OKK
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:407 积分:4268 威望:0 精华:0 注册:2016/11/22 19:30:00
[求助]获取当前网页  发帖心情 Post By:2017/12/4 19:22:00 [只看该作者]

打开网页后,获取当前网页到文本框里面,请问怎么写?

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/12/4 20:17:00 [只看该作者]


Dim web As System.Windows.Forms.WebBrowser = e.Form.controls("webbrowser1").basecontrol
web.ScriptErrorsSuppressed = True
web.Navigate("http://www.baidu.com/")
Do Until web.ReadyState = 4
    Application.DoEvents
Loop
e.form.controls("Textbox1").Text = web.Document.body.outerhtml

 回到顶部
美女呀,离线,留言给我吧!
OKK
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:407 积分:4268 威望:0 精华:0 注册:2016/11/22 19:30:00
  发帖心情 Post By:2017/12/4 22:45:00 [只看该作者]

我是想写在HTTPREQEUST里面

例如:alert(window.location.href;)

但这个代码获取后以弹屏的方式显示,不知道如何能写入到TEXT框里

 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/12/4 23:09:00 [只看该作者]

动态更新网页?参考:http://www.foxtable.com/mobilehelp/scr/0103.htm



 回到顶部