R - 访问数据库时处理错误

Question

我正在尝试使用 RJDBC 使用 for 循环自动从 db 下载数据。我使用的数据库每 10 分钟后会自动关闭连接，所以我想做的是以某种方式捕获错误，重新建立连接，然后继续循环。为了做到这一点，我需要以某种方式捕获错误，问题是，它不是 r 错误，因此trycatch 和类似的命令都不起作用。我只是在控制台上收到一条文本告诉我：

Error in .jcheck() : No running JVM detected. Maybe .jinit() would help.

我该如何处理：

if (output == ERROR) {remake connection and run dbQuery} else {run dbQuery}

感谢您的帮助

Answer 1

您可以使用pool 包to abstract away the logic of connection management。
这完全符合您对DBI 连接管理的期望。
它应该可以与 RJDBC which is an implentation of DBI 一起使用，但我没有使用此驱动程序对其进行测试。

libray(pool)
library(RJDBC)

conn <- dbPool(
  drv = RJDBC::JDBC(...),
  dbname = "mydb",
  host = "hostadress",
  username = "test",
  password = "test"
)
on.exit(poolClose(conn))

dbGetQuery(conn, "select... ")