A
ui.R
library(shiny)
library(shinyjs)
shinyUI(fluidPage(
bootstrapPage(
)
)
)
Server.R
library(shiny)
library(shinyjs)
mydb=dbConnect(MySQL(),user='',password='123',dbname='test1',host='localhost')
shinyServer(function(input, output,session){
column(4,
textInput("name", label = "NAME:",
value ='')),
column(4,
textInput("address", label = "Address:",
value =''))
column(2,
actionButton("add", "ADD"))
observeEvent(
input$add,
output$ui123 <- renderUI({isolate({
dbSendQuery(mydb,paste("INSERT INTO table1(name,address) VALUES ('",input$name,"','",input$address,"');",sep=" "))
})}))
}
})
Если входные данные для адреса содержат апостроф (например: Первая улица), то это показывает ошибку, что инструкция mysql содержит некоторую ошибку. Как можно без ошибок ввести эти данные в Mysql в R shining.
'
убивает ваш запрос. вы должны научиться предотвращать это. - person Marc B   schedule 22.09.2016sprintf("INSERT INTO table1(name,address) VALUES ('%s','%s');", input$name, input$address)
, но вы также должны проверять/дезинфицировать входные данные. - person Geovany   schedule 22.09.2016