主题：FTP文件上传替换的问题

先判断是否存在此文件名，如果存在，就提示修改成别的名字

 

FileExists

判断指定的文件是否存在，语法：

FileExists(FileName)

FileName：要判断的文件名，含路径。

示例

Dim ftp1 As New FtpClient
ftp1.Host="196.128.143.28"
ftp1.Account = "foxuser"
ftp1.Password = "138238110"
If ftp1.FileExists("\photo\jz.png") Then '如果存在则下载
    msgbox("已存在同名文件")

Else
    messagebox.Show("此文件不存在!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
End If

如果存在同名的，那你就根据规则，自动改成另一个名字不行？