1

Petermeissner がこのスレッドで説明しているように、タスク スケジューラを使用して Windows 8 で R スクリプトを自動的に実行しようとしています。以下に、スクリプト (の一部) を貼り付けました。スクリプトは まですべてを行いますremDr$getPageSourece()。「R for Windows フロントエンドが動作を停止しました」というポップアップ メッセージが表示されます。ただし、スクリプトを R で実行すると (スケジューラを使用しないため)、エラーは発生しません。何が間違っている可能性がありますか?

pacman::p_load(RSelenium)
appurl <- "https://prod.beeline.com/ucb/Security/NewLogin.aspx?Url=%2fucb"
setwd("../downloaded")

RSelenium::checkForServer()
RSelenium::startServer()

Sys.sleep(5) 

remDr <- RSelenium::remoteDriver(browserName="chrome") #For chrome make sure the file 'chromedriver is under 'downloaded'. Also this file can be found on TFS

remDr$open(silent=T)
remDr$navigate(appurl) 
Sys.sleep(1)
remDr$findElement(using = "css selector","#beelineForm_UserLoginForm_userNameText")$sendKeysToElement(list("username"))
Sys.sleep(1)
remDr$findElement(using = "css selector","#beelineForm_UserLoginForm_passwordText")$sendKeysToElement(list("passwd"))
remDr$findElement("css selector", "#loginButton")$clickElement() 

appurlNew <- "https://prod.beeline.com/ucb/Procurement/Request/ProcurementRequestListScreen.ascx"
Sys.sleep(1)

remDr$navigate(appurlNew)
Sys.sleep(3)

x <- getwd()
write(x, file="workingdir1.txt")

remDr$getPageSource()

編集: R でスクリプトを再実行しようとしましたが、今でも でブロックされているようremDr$getPageSource()です。Rは、セッションが中止されるまで「関数定義を検索する」と言います。

4

0 に答える 0