制作文件时如何不覆盖文件?

时间:2012-02-25 18:32:30

标签: vb.net

每当我创建两个具有相同名称的文件时,它都会覆盖它。我希望第二个文件是[Name](#)

2 个答案:

答案 0 :(得分:2)

此代码在名为

的文件范围内创建下一个文件
  

MyFile.txt的
  MyFile1.txt
  MyFile2.txt
  MyFile3.txt
  ...

Dim i As Integer = 0
Dim fn = "C:\Data\MyFile"
Dim ext = ".txt"

If File.Exists(fn + ext) Then
    Do
        i = i + 1
    Loop While File.Exists(fn + i.ToString() + ext)
    fn = fn + i.ToString()
End If
WriteFile(fn + ext)

答案 1 :(得分:0)

使用此:

File.Exists(curFile)

检查名称是否已存在,然后在代码中重命名新名称 http://msdn.microsoft.com/en-us/library/system.io.file.exists.aspx