Nothing
#' @rdname hidden_aliases
#' @usage NULL
dbExecute_DBIConnection_character <- function(conn, statement, ...) {
rs <- dbSendStatement(conn, statement, ...)
on.exit(dbClearResult(rs))
dbGetRowsAffected(rs)
}
#' @rdname hidden_aliases
#' @export
setMethod("dbExecute", signature("DBIConnection", "character"), dbExecute_DBIConnection_character)
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.