## S4 method for signature 'MySQLResult'
dbColumnInfo(res, ...)

## S4 method for signature 'MySQLResult'
dbGetRowsAffected(res, ...)

## S4 method for signature 'MySQLResult'
dbGetRowCount(res, ...)

## S4 method for signature 'MySQLResult'
dbHasCompleted(res, ...)

## S4 method for signature 'MySQLResult'
dbGetException(conn, ...)

## S4 method for signature 'MySQLResult'
summary(object, verbose = FALSE, ...)

## S4 method for signature 'MySQLResult'
show(object)

if (mysqlHasDefault()) {
con <- dbConnect(RMySQL::MySQL(), dbname = "test")
dbWriteTable(con, "t1", datasets::USArrests, overwrite = TRUE)

rs <- dbSendQuery(con, "SELECT * FROM t1 WHERE UrbanPop >= 80")
dbGetStatement(rs)
dbHasCompleted(rs)

dbGetInfo(rs)
dbColumnInfo(rs)

dbClearResult(rs)
dbRemoveTable(con, "t1")
dbDisconnect(con)
}