[求助]代码点击控件+刷新页面 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]代码点击控件+刷新页面

共有2971人关注过本帖树形打印复制链接主题：[求助]代码点击控件+刷新页面

工匠

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：二尾狐帖子：550 积分：5021 威望：0 精华：0 注册：2017/4/20 11:08:00

[求助]代码点击控件+刷新页面 发帖心情

Post By：2021/10/19 13:58:00 [只看该作者]

老师好：

请教一下，现在窗口加入网页控件，刷新显示本地HTML内容，原来刷新实现是：1.鼠标点击网页控件 2.按F5刷新页面内容

备注：必须要先点击网页控件区域，在按F5才会生效

需要实现：窗口加个按钮，执行刷新显示最新的内容，这代码怎么写

尝试：forms("测试").Controls("浏览器控件").Select '(只能能定位到浏览器控件)

备注：只要代码实现1.鼠标点击网页控件事件+ 2.按F5刷新页面内容事件，

不是重新执行打开文件代码

谢谢老师！

有点蓝

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：超级版主帖子：110648 积分：563148 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2021/10/19 14:25:00 [只看该作者]

窗口刷新按钮

Dim web = e.Form.Controls("WebBrowser1").basecontrol

web.refresh()

或者

web.Document.ExecCommand("Refresh",false,nothing)

工匠

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：二尾狐帖子：550 积分：5021 威望：0 精华：0 注册：2017/4/20 11:08:00

Post By：2021/10/19 15:34:00 [只看该作者]

谢谢老师，现在执行代码单击按钮浏览器页面刷新一次了，数据没有更新。

需要2个动作代码：1.用代码实现代替鼠标点击了一下窗口里指定控件 “网页面”（不是执行一次按钮代码：forms("窗口").Controls("控件").PerformClick） 2.用代码实现代替手动按了一下键盘 F5键

谢谢老师！

有点蓝

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：超级版主帖子：110648 积分：563148 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2021/10/19 15:48:00 [只看该作者]

如果2楼代码执行页面刷新，而没有刷新数据，那是页面设计的问题

1、如果要在窗口使用代码控制WebBrowser里的页面有的麻烦，自行学习一下：http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=49278

2、2楼就是刷新页面的用法

主题：[求助]代码点击控件+刷新页面