R+Selenium实现Flipkart翻页点击失败的解决方案求助

我之前在爬取电商网站评论时也遇到过几乎一模一样的问题，结合你用的R+Firefox+Selenium环境，给你几个针对性的解决方案：

1. 先解决滚动代码的S4类错误 #

你之前的滚动代码报错，核心原因是RSelenium的executeScript要求第二个参数必须是列表格式，直接传递webElement对象会触发S4类不兼容的错误。修改后的滚动代码应该是这样：

# 先正确定位Next按钮元素
nextButton <- remDr$findElement(using = 'xpath', value = '//div[@class="_2kUstJ"]')
# 把元素包装在列表里传递给JS脚本
remDr$executeScript("arguments[0].scrollIntoView({block: 'center', behavior: 'smooth'});", list(nextButton))

2. 解决"Element is not clickable"错误 #

这个问题通常是元素不在视口内、被弹窗遮挡，或者页面还没加载完成导致的，推荐用JS点击代替原生clickElement()，同时配合显式等待提升稳定性：

完整步骤代码： #

# 1. 先处理可能的登录弹窗（Flipkart经常会弹出登录框遮挡元素）
tryCatch({
  closeLoginPopup <- remDr$findElement(using = 'xpath', value = '//button[@class="_2KpZ6l _2doB4z"]')
  closeLoginPopup$clickElement()
  Sys.sleep(1)
}, error = function(e) {
  message("没有检测到登录弹窗，继续执行")
})

# 2. 显式等待Next按钮加载完成并可点击（比固定sleep更可靠）
wait_for_clickable <- function(driver, xpath, timeout = 15) {
  end_time <- Sys.time() + timeout
  while (Sys.time() < end_time) {
    tryCatch({
      elem <- driver$findElement(using = 'xpath', value = xpath)
      if (elem$isElementDisplayed()[[1]] && elem$isElementEnabled()[[1]]) {
        return(elem)
      }
    }, error = function(e) {
      Sys.sleep(0.5)
    })
  }
  stop("超时：Next按钮未加载完成或不可点击")
}

# 3. 获取按钮并执行操作
nextButton <- wait_for_clickable(remDr, '//div[@class="_2kUstJ"]')
# 滚动到按钮位置
remDr$executeScript("arguments[0].scrollIntoView({block: 'center'});", list(nextButton))
# 用JS点击（避免元素遮挡导致的点击失败）
remDr$executeScript("arguments[0].click();", list(nextButton))

额外注意事项 #

• Flipkart的页面class可能会不定期更新，如果你的xpath突然失效，记得重新检查Next按钮的HTML结构，更新定位表达式
• 不要频繁快速翻页，建议每次翻页后加1-2秒的等待，避免被网站反爬机制拦截

内容的提问来源于stack exchange，提问作者Sana Ansari