#' Set Database Connection
#'
#' @return
#' @export
#'
set_con <- function() {
DBI::dbConnect(odbc::odbc(), Driver = "SQL Server",
Server = "PRODBSYNNEW", Database = "CCPS_Shared",
Trusted_Connection = TRUE)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.