主题：如何批量删除远程文件

不是可以删除目录么？

 

DeleteDir

删除FTP上的目录，语法：

DeleteDir(DirName,AnyWay)

DirName：要删除的目录名称。
AnyWay：可选参数，如果设为True，将删除目录下的文件及其子目录，如果省略此参数，则只有此目录为空的时候，才能删除。

如果删除成功，返回True，否则返回False

删除以后，再新建一个目录，不就好了？

删除这个目录 \update\asd

 

再增加这个目录 \update\asd

 

没有删除全部文件的方法，除非你遍历每一个文件然后删除

 

GetFileList

用于返回FTP服务器指定目录下的全部文件名，以字符串集合的形式返回，语法：

GetFileList(Path)

Path：可选参数，用于指定目录，如果省略，则返回当前目录下的全部文件名。

示例

例如列出photo目录下的所有文件：

Dim ftp1 As New FtpClient
Dim fls As List(of String) 
ftp1.Host="196.128.143.28"
ftp1.Account = "foxuser"
ftp1.Password = "138238110"
fls = ftp1.GetFileList("\photo")
For Each fl As String In fls
    Output.Show(fl)
Next

还可以使用通配符，例如列出photo目录下的所有jpg文件：

Dim ftp1 As New FtpClient
Dim fls As List(of String) 
ftp1.Host="196.128.143.28"
ftp1.Account = "foxuser"
ftp1.Password = "138238110"
fls = ftp1.GetFileList("\photo\*.jpg")
For Each fl As String In fls
    Output.Show(fl)
Next