Foxtable(狐表)用户栏目专家坐堂 → 网页更新


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

主题:网页更新

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


加好友 发短信
等级:九尾狐 帖子:2701 积分:17999 威望:0 精华:0 注册:2013/4/9 10:41:00
网页更新  发帖心情 Post By:2018/3/14 21:27:00 [只看该作者]

能帮忙看看这个吗?
如果点击按钮,打开的网站是 窗口A 的网站控件该怎么做啊, 感谢 感谢 
Dim proc As new Process
proc.File = "http://fanyi.baidu.com/?aldtype=85#en/zh/" & Tables("单词").Current("目录_英文")
proc.Start

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/3/14 21:44:00 [只看该作者]


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


加好友 发短信
等级:九尾狐 帖子:2701 积分:17999 威望:0 精华:0 注册:2013/4/9 10:41:00
  发帖心情 Post By:2018/3/14 21:55:00 [只看该作者]

感谢 感谢 可以了, 嘿嘿

在加载窗口后,可以设定WebBrowser1网页的位置吗?
比如WebBrowser1控件不大,全部显示又太小,然后可以设置WebBrowser1显现网页的某个区域吗?比如设置左右和上下的滚动条,感谢 感谢 

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/3/14 22:13:00 [只看该作者]

参考代码

 

Dim web = e.Form.controls("webbrowser1").basecontrol
web.ScriptErrorsSuppressed = True
web.Navigate("http://fanyi.baidu.com/?aldtype=85#en/zh/" & "apple")
Do Until web.ReadyState = 4
    Application.DoEvents
Loop
web.Document.Window.ScrollTo(100, 100)


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


加好友 发短信
等级:九尾狐 帖子:2701 积分:17999 威望:0 精华:0 注册:2013/4/9 10:41:00
  发帖心情 Post By:2018/3/15 8:32:00 [只看该作者]

感谢 感谢 可以了 只是为什么放到加载窗口后执行事件里面就不行了呢,感谢 感谢

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/3/15 8:38:00 [只看该作者]

以下是引用yangwenghd在2018/3/15 8:32:00的发言:
感谢 感谢 可以了 只是为什么放到加载窗口后执行事件里面就不行了呢,感谢 感谢

 

我测试没问题,请做具体例子说明你的问题。


 回到顶部