shiny_drive_module: File management shiny module.

In datastorm-open/shinydrive: File Sharing Shiny Module

File management shiny module.

Description

File management shiny module.

Usage

shiny_drive_ui(id)

shiny_drive_server(
  input,
  output,
  session,
  id,
  save_dir,
  dir_access = NULL,
  admin_user = TRUE,
  force_desc = FALSE,
  lan = "EN",
  file_translate = read.csv(system.file("translate/translate.csv", package =
    "shinydrive"), sep = ";", encoding = "UTF-8", check.names = FALSE),
  datatable_options = list(),
  yml = "files_desc.yaml",
  date_time_format = "%Y%m%d_%H%M%s",
  decreasing = TRUE,
  intervalMillis = 5000
)

Arguments

id	character. An ID string
input	shiny input
output	shiny input
session	shiny input
save_dir	character/reactive. Main directory of the files.
dir_access	character/reactive vector for dir(s) access. Default to NULL (all directories)
admin_user	boolean/reactive (TRUE). Admin user or not.
force_desc	boolean/reactive (FALSE). Force to add an entry description ?
lan	character/reactive ("EN"). Language to be used in the module (FR, EN and CN availabled... contributions are welcome :)).
file_translate	data.frame/reactive File for translation.
datatable_options	list/reactive. DT::datatable options argument.
yml	characte/reactiver yaml configuration file name.
date_time_format	character DateTime format.
decreasing	logical Order table output on date.
intervalMillis	integer. In case of "reactive" time betweens calls looking of files changes

Value

Shiny module without return value.

Examples

## Not run: 

if(require(shiny)){
  ui <- fluidPage(
    shiny_drive_ui(id = "idm")
  )
  server <- function(input, output, session) {
    callModule(module = shiny_drive_server,
             id = "idm",
             session = session,
             admin_user = TRUE,
             save_dir =  getwd(),
             lan = "FR")
  }
  shinyApp(ui, server)
}


## End(Not run)

datastorm-open/shinydrive documentation built on Oct. 4, 2023, 1:20 a.m.