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

问题描述 投票:0回答:2

我编写了一个函数,用于将数据从 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
.net vb.net save-as
2个回答
2
投票

据我了解:

' 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

0
投票

两个输入,WebPath 和 FileName

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

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

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

© www.soinside.com 2019 - 2024. All rights reserved.