使用Rscript.exe

Question

R版本：3.4.4-32位/操作系统：Windows 7 Enterprise SP 1-64位

library("RODBC")

TodaysDate  <- Sys.Date()
StartTime   <- Sys.time()
currentUser <- Sys.getenv("USERNAME")
tmpDir      <- Sys.getenv("TEMP")
sysHour     <- hour(Sys.time())

if (sysHour > 12){
  sysHour = (sysHour - 12) 
} 

outFile <- paste(tmpDir, "\\Production_", TodaysDate, "_", sysHour,"_PM.html", sep = "")

channel <- odbcConnectAccess2007("C:\\Users\\admin\\Documents\\AccessDB1.accdb")

QueryOutput <- sqlQuery(channel, "SELECT * FROM HourlyAnalystProduction;")

close(channel)

...

  

Rscript.exe-香草C：\ Users \ admin \ Documents \ Prod.R

命令提示符输出： 警告信息： 1：在odbcDriverConnect（con，...）中：   [RODBC]错误：状态为IM002，代码为0，消息为[Microsoft] [ODBC驱动程序管理器] 找不到数据源名称，并且未指定默认驱动程序 2：在odbcDriverConnect（con，...）中：ODBC连接失败

sqlQuery中的错误（通道，“ SELECT * FROM HourlyA nalystProduction;“）：   第一个参数不是开放的RODBC通道 执行停止

此代码可以在RStudio上完美运行。但是，使用rscript运行此命令将导致ODBC连接失败错误。如果我使用带有-f选项的R.exe运行代码，则会收到相同的错误。

任何解决方案的想法将不胜感激。