Foxtable(狐表)用户栏目专家坐堂 → [求助]关于网页加载后执行代码


  共有2511人关注过本帖平板打印复制链接

主题:[求助]关于网页加载后执行代码

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


加好友 发短信
等级:六尾狐 帖子:1465 积分:10403 威望:0 精华:0 注册:2018/10/16 11:42:00
[求助]关于网页加载后执行代码  发帖心情 Post By:2021/2/10 4:45:00 [只看该作者]

[求助]关于网页加载后执行代码
我有一段代码,是获取网页上的信息,网页加载速度影响获取网页信息。怎么改代码改成加载网页后再获取信息?
If Forms("售后记录").Opened Then
    Dim brw As WinForm.WebBrowser =  forms("售后记录").Controls("WebBrowser1")
    brw.Address = "http://www.kuaidi100.com/chaxun?com="& 快递 &"&nu=" & 单号
    


    
'获取网页信息代码
    Dim web As System.Windows.Forms.WebBrowser = forms("售后记录").controls("webbrowser1").Basecontrol
    Dim elems As object = web.Document.GetElementsByTagName("td")
end if

 回到顶部