Skip to contents

faketables offers dbWriteTable() as a convenient way to write modified data back to a data source.

In the below example, dbConnect() and dbDisconnect() should produce a DBI Connection Object and disconnect from that database, respectively. The database connection and disconnection is not required to be within the observe statement; the only requirement is that the connection passed to dbWriteTable be an active DBIConnection object.

f_tab <- faketables::faketable()

ui <- shiny::fluidPage(
  shiny::actionButton('db_write', 'Write to DB')
)

server <- function(input, output, session) {
  f_tab <- faketables::faketablesServer(f_tab)
  
  shiny::observe({
    con <- dbConnect()
    faketables::dbWriteTable(con, 'table_name', f_tab)
    dbDisconnect(con)
  }) |>
    shiny::bindEvent(input$db_write)
}

A more complete example using the same Favorite Pizza Places app can be found here.