连接Oracle数据库准备
setwd(“C:\Users\tongxue\Desktop\Roracle”)
install.packages(“RJDBC”)
install.packages(“rJava”)
library(RJDBC) ##加载"RJDBC"包,如果失败了。请安装该包
library(DBI)
library(rJava)
drv<-JDBC(“oracle.jdbc.driver.OracleDriver”,“ojdbc6_g.jar”, identifier.quote=""") ##java中JDBC的套路
conn<-dbConnect(drv,“jdbc:oracle:thin:@localhost:1521:orcl”,“tongxue”,“tongxue”) ##建立一个连接
EMP<-dbReadTable(conn,‘EMP’) ##根据连接和表名获取Oracle中的表
读取要指定查询的数据表
zda<-read.csv(“testda.csv”)
对参数进行循环
for(i in 1:2){
zda[i,“数量”]<-dbGetQuery(conn,gsub(""","",as.character( zda[,2][i])))
}
批量输出执行结果、
write.csv(data,“zda.csv”)
最终数据输出效果如下所示: