# NOT RUN {
# }
# NOT RUN {
drv <- dbDriver("Oracle")
con <- dbConnect(drv, "scott", "tiger")
res <- dbSendQuery(con, "select * from emp")
summary(drv)
summary(con)
summary(res)
show(drv)
show(con)
show(res)
# }
Run the code above in your browser using DataLab