我正在使用file.copyfile来重命名我的文件,但它似乎没有工作,文件名保持不变?
Dim _filename As String
Dim _path As String
Dim _newfilename As String
_filename = Path.GetFileNameWithoutExtension(filename)
_path = Path.GetDirectoryName(filename)
_newfilename = _filename & "." & extension
My.Computer.FileSystem.CopyFile(filename,
_newfilename, True)
答案 0 :(得分:0)
My.Computer.FileSystem.RenameFile(currentFileName, NewFileName)
http://msdn.microsoft.com/en-us/library/5w05844e.aspx
我认为您的代码是将_newfilename设置为文件的名称,并且不包含目录。我认为该文件正被复制到运行应用程序的根文件夹。 RenameFile应该可以满足您的需求。如果可以,请告诉我。
_newfilename = _filename & "." & extension