0

上传文件有多个句点时遇到问题。例如,如果我上传了一个扩展名为 ammu.gopu.docx 的文件。我想将其替换为 ammu_gopu.docx,表示保留扩展名并将文件名替换为 undescore。

4

3 回答 3

1

这应该做你的要求。当心 - 如果您的文件名也出现在路径中,它也会被更新。

Dim fullPath As String = "C:\Test\My.File.Name.txt"
Dim fileName As String = IO.Path.GetFileNameWithoutExtension(fullPath)
fullPath = fullPath.Replace(fileName, fileName.Replace("."c, "-"))
于 2013-06-14T10:14:31.517 回答
0

使用System.IO.Path.GetExtension方法。

于 2013-06-14T09:44:44.237 回答
0

尝试这个:

filePath = IO.Path.GetDirectoryName(filePath) & _
           IO.Path.GetFileNameWithoutExtension(filePath).Replace("."c, "_"c) & _ 
           "." & IO.Path.GetExtension(filePath)
于 2013-06-14T10:31:26.867 回答