drv <- dbDriver("MySQL")
con <- dbConnect(drv, group = "wireless")
dbListTables(con)
rs <- dbSendQuery(con, query.sql)
dbGetStatement(rs)
dbHasCompleted(rs)
info <- dbGetInfo(rs)
names(dbGetInfo(drv))
# DBIConnection info
names(dbGetInfo(con))
# DBIResult info
names(dbGetInfo(rs))
Run the code above in your browser using DataLab