正在尝试检测并填充具有RSelenium的窗体

我在自己的网站上有一个嵌入式表单，我想用RSelenium填充和发送它

作为第一步，我似乎无法检测到这些元素。很明显，我想填充并发送

表格编号为：

全名*
电子邮件地址*
公司名称*
消息

您没有提到您使用

findelelement（）尝试了什么。

。下面是一个简单的工作示例，其中包括查找和填充“全名”框的表单和代码。首先，我将表单的HTML代码写入一个临时文件：

html <- '<div id="form">
  <form accept-charset="utf-8" method="POST" novalidate="">
    <div class="form-group"><label for="form_Name" class="control-label">Full name<sup>*</sup></label><input required="" pattern="^***+(.****" class="form-control" title="Full name" id="form_Name" type="text" name="form_Name"></div>
    <div class="form-group"><label for="form_Email" class="control-label">Email address<sup>*</sup></label><input required="" class="form-control" title="Email address" id="form_Email" type="email" name="form_Email"></div>
    <div class="form-group"><label for="form_Company" class="control-label">Company name<sup>*</sup></label><input class="form-control" title="Company name" required="" id="form_Company" type="text" name="form_Company"></div>
    <div class="form-group"><label for="custom_Message" class="control-label">Message</label><textarea class="form-control" title="Message" id="custom_Message" name="custom_Message"></textarea></div>           
    <div><input class="btn-large btn-inverse btn" type="submit" value="Submit"></div>
  </form>
</div>
'
tmp <- tempfile(fileext = ".html")
cat(html, file = tmp)

---

有关更多信息，请参阅参考资料，如。

谢谢-您是否因为没有该页面的URL而将代码添加到临时文件中？在这种情况下，第二段代码的第四行应该是

remDr$navigate（'https://example.com")

？简短的回答是肯定的。我鼓励您参考提供的链接中的教程，或者如果您有后续问题，请打开一个新问题。在堆栈溢出中回答评论部分中的后续问题不是一个好的做法。我在使用live页面时遇到了相同的问题，并且我确实阅读了教程。

remDr$findElement（使用=“id”，“form_Name”）

给出与上述相同的错误。

library(RSelenium)
rD <- rsDriver()
remDr <- rD[["client"]]
remDr$navigate(paste0("file://", tmp))
# Find and populate the field
webElem <- remDr$findElement(using = "id", "form_Name")
webElem$sendKeysToElement(list("Foo Bar"))
# Close browser
remDr$close()