连接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”)
最终数据输出效果如下所示: