Browse Source

No autoupdate

master
Maxime Wack 3 years ago
parent
commit
8915d19f42
2 changed files with 5 additions and 4 deletions
  1. +3
    -2
      accueil.md
  2. +2
    -2
      server_.R

+ 3
- 2
accueil.md View File

@@ -1,7 +1,8 @@
# Bienvenue sur **Celine 2.0** # Bienvenue sur **Celine 2.0**


La navigation se fait à l'aide des onglets en haut de la page.
L'actualisation de la page se fait automatiquement lorsque de nouvelles données sont disponibles.
La navigation se fait à l'aide des onglets en haut de la page.

Il faut actualiser la page pour afficher les nouvelles données disponibles.


## Listing ## Listing




+ 2
- 2
server_.R View File

@@ -1,11 +1,11 @@
server <- shinyServer(function(input, output, session) server <- shinyServer(function(input, output, session)
{ {
updateDb <- reactiveTimer(4 * 60 * 1000, session)
## updateDb <- reactiveTimer(4 * 60 * 1000, session)


db <- reactive( db <- reactive(
{ {
req(input$CESP) req(input$CESP)
updateDb()
## updateDb()


db <- dbConnect(SQLite(), "ecn.db", on.exit(dbDisconnect(db), add = T)) db <- dbConnect(SQLite(), "ecn.db", on.exit(dbDisconnect(db), add = T))




Loading…
Cancel
Save