SaveAs 方法配置为需要根路径 - 帮助理解现有代码块

Question

我编写了一个函数，用于将数据从 Excel 电子表格上传到表单。在我的电脑上测试是成功的。我将 vb.net 代码迁移到开发服务器，现在我收到一条根路径消息。

我的代码可以与其他人编写的现有代码一起使用。我不太明白它到底在做什么，因为没有评论，而且我是编程新手。

我的想法是第一部分代码正在寻找用户提交的文件的路径（IF部分），第二部分代码（在ELSE部分）是——实际上不太确定，因为代码看起来多余的。我知道我们在服务器上有一个临时文件夹。了解代码的作用将很有帮助，这样我就可以找出服务器路径的位置。有人可以评论代码来帮助我理解吗？

If WebPath.Contains("localhost") Then
    FilePath = Path.Combine("c:\open", FileName)
    FileUpload1.SaveAs(FilePath)
Else
    Dim FolderPath As String = ConfigurationManager.AppSettings("FolderPath")
    FilePath = FolderPath & FileName
    FileUpload1.SaveAs(FilePath)
End If

Answer 1

据我了解：

' localhost usually refers to development environment
If WebPath.Contains("localhost") Then
    FilePath = Path.Combine("c:\open", FileName)
    FileUpload1.SaveAs(FilePath)
' So if it is not localhost, the code will goes here
Else
    ' The code is trying to grab the FolderPath value from the .config file
    ' For example: web.config file
    ' Here is the example of how it may looks inside the web.config file
    ' <?xml version="1.0" encoding="utf-8" ?>
    '  <configuration>
    '   <appSettings>
    '    <add key="FolderPath" value="filepath"/>
    '   </appSettings>
    '  </configuration>
    ' So, if you want to change the location, change the "filepath" value in the web.config file
    Dim FolderPath As String = ConfigurationManager.AppSettings("FolderPath")
    ' Also use Path.Combine over here
    FilePath = Path.Combine(FolderPath,FileName)
    FileUpload1.SaveAs(FilePath)
End If

Answer 2

两个输入，WebPath 和 FileName

WebPath 中任意位置包含单词“localhost”，然后将文件保存到“c:\open\”

否则从应用程序配置设置“FolderPath”中读取文件夹名称并将文件存储在

真的，只需使用调试器单步调试代码，看看它做了什么