Question

我正在开发这个闪亮的应用程序，该应用程序需要将本地文件推送到FTP。我对此感到麻烦。

我正在使用ftpUpload()上传文件，并使用file.choose()获取文件路径：

ftpUpload(file.choose(new = FALSE), "ftp.com/Abc", userpwd)

当我在本地计算机上运行应用程序时，此方法运行良好。但是，当我将其部署到Web上后，它不起作用。它断开了发球。

我认为问题出在file.choose()上，因为不会显示交互式文件选择对话框。

有人知道如何使file.choose()或任何其他解决方案生效吗？

同样，我试图通过在线Shiny App将本地文件推送到FTP服务器。

更新：

我已经检查了日志，但出现此错误：

Warning in file(what, "rb") : cannot open file 'xt': No such file or directory
Warning: Error in file: cannot open the connection

我正在使用窗户。当我从RStudio在本地运行应用程序时，不会出现此错误

Answer 1

使用fileInput的最小工作解决方案。

# ui.R
ui <- fluidPage(
  sidebarLayout(
    sidebarPanel(
      fileInput("myFile", "Choose your File")
        )
    ),
    mainPanel(
    )
  )
)

# server.R
server <- function(input, output, session) {

   observeEvent(input$myFile,{
    selectedFile <- input$myFile

    if (is.null(selectedFile))
      return(NULL)

      # Your code
      ftpUpload(selectedFile$datapath, "ftp.com/Abc", userpwd)

  })


}

希望这会有所帮助。

在Shiny Web App中使用file.choose（）时出错（在线部署）

1 个答案: