检查是否可以使用RSelenium

时间:2017-07-20 04:01:52

标签: testing automated-tests rselenium

我正在使用RSelenium自动向下滚动社交媒体网站并保存帖子。有时我会到达网页的底部,因为没有更多数据可用,所以不能再加载帖子。我只是想能够检查是否是这种情况所以我可以停止尝试滚动。

如何判断是否可以继续在RSelenium中滚动?下面的代码说明了我正在尝试做什么 - 我想我只需要帮助“if”语句。

FYI有一个在Python here中执行此操作的解决方案(基本上检查页面高度是否在迭代之间发生变化),但我无法弄清楚如何在R中实现它(或任何其他解决方案)。

# Open webpage
library(RSelenium)
rD = rsDriver(browser = "firefox")
remDr = rD[["client"]]
url = "https://stocktwits.com/symbol/NZDCHF"
remDr$navigate(url) 

# Keep scrolling down page, loading new content each time. 
ptm = proc.time()
repeat {   
  remDr$executeScript("window.scrollTo(0,document.body.scrollHeight);")
  Sys.sleep(3) #delay by 3sec to give chance to load. 

  # Here's where i need help  
  if([INSERT CONDITION TO CHECK IF SCROLL DOWN IS POSSIBLE]) {
    break
  }
}

1 个答案:

答案 0 :(得分:3)

偶然发现了在Python here中执行此操作的方法,并将其修改为在R中工作。以下是我上面发布的原始代码的现在更新。

<?php echo $this->Html->link('Add Task', array('action'=>'add'), array('class' => 'tac')); ?>