以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助]代码点击控件+刷新页面 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=172558) |
-- 作者:工匠 -- 发布时间:2021/10/19 13:58:00 -- [求助]代码点击控件+刷新页面 老师好: 请教一下,现在窗口加入网页控件,刷新显示本地HTML内容,原来刷新实现是:1.鼠标点击网页控件 2.按F5刷新页面内容 备注:必须要先点击网页控件区域,在按F5才会生效 需要实现:窗口加个按钮,执行刷新显示最新的内容,这代码怎么写 尝试:forms("测试").Controls("浏览器控件").Select \'(只能能定位到浏览器控件) 备注:只要代码实现1.鼠标点击网页控件事件+ 2.按F5刷新页面内容事件, 不是重新执行打开文件代码 谢谢老师! |
-- 作者:有点蓝 -- 发布时间:2021/10/19 14:25:00 -- 窗口刷新按钮 Dim web = e.Form.Controls("WebBrowser1").basecontrol web.refresh() 或者 web.Document.ExecCommand("Refresh",false,nothing)
|
-- 作者:工匠 -- 发布时间:2021/10/19 15:34:00 -- 谢谢老师,现在执行代码单击按钮浏览器页面刷新一次了,数据没有更新。 需要2个动作代码:1.用代码实现 代替鼠标点击了一下窗口里指定控件 “网页面”(不是执行一次按钮代码:forms("窗口").Controls("控件").PerformClick) 2.用代码实现 代替手动 按了一下键盘 F5键 谢谢老师!
|
-- 作者:有点蓝 -- 发布时间:2021/10/19 15:48:00 -- 如果2楼代码执行页面刷新,而没有刷新数据,那是页面设计的问题 1、如果要在窗口使用代码控制WebBrowser里的页面有的麻烦,自行学习一下:http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=49278 2、2楼就是刷新页面的用法
|