上传文件有多个句点时遇到问题。例如,如果我上传了一个扩展名为 ammu.gopu.docx 的文件。我想将其替换为 ammu_gopu.docx,表示保留扩展名并将文件名替换为 undescore。
问问题
645 次
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
于 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 回答