## 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)
# ## End(Not run)
Run the code above in your browser using DataLab