Foxtable(狐表)用户栏目专家坐堂 → [求助]为什么指定行可以采集面循环表就不行


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

主题:[求助]为什么指定行可以采集面循环表就不行

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


加好友 发短信
等级:五尾狐 帖子:1076 积分:9906 威望:0 精华:0 注册:2008/9/2 11:34:00
[求助]为什么指定行可以采集面循环表就不行  发帖心情 Post By:2023/7/6 9:09:00 [只看该作者]

    Dim r As Row = Tables("成绩").Rows(1)

    stuKsh = r("考生号")
    stuPass = r("身份证号后四位")
    Functions.Execute("btn1") '登录网页采集数据
    
MessageBox.Show("完成")

以上代码可以完成,可改成下面的就不行,只能采集到最后一行表的数据,还没结束最后的提示早早就出来了。

For Each r As Row In Tables("成绩").Rows
  
    stuKsh = r("考生号")
    stuPass = r("身份证号后四位")
    Functions.Execute("btn1") '登录网页采集数据
    
Next

MessageBox.Show("完成")

 回到顶部