Удалить файлы FTP с именем, содержащим строку (соответствующую маску)

Question

Я хотел бы удалить все файлы на FTP-сервере, имена которых содержат определенную строку.

Например, у меня есть эти файлы на FTP:

pippo_1.jpg 
pippo_2.jpg 
pippo_3.jpg 
pluto_1.jpg 

Я хотел бы удалить все файлы, которые содержат pippo.

Как удалить все эти файлы за одну операцию?

Спасибо!

Answer 1

Реализация протокола FTP в среде .NET не допускает этого в одной операции.

Вы должны указать удаленный каталог, отфильтровать файлы, которые хотите удалить, и удалить их по одному.

---

Если вы действительно хотите сделать это в одной операции, вы должны использовать 3rd библиотеку партии, которая поддерживает операции с масками файлов. Например WinSCP .NET assembly это позволяет с его Session.RemoveFiles method:

Dim sessionOptions As New SessionOptions 
With sessionOptions 
    .Protocol = Protocol.Ftp 
    .HostName = "ftp.example.com" 
    .UserName = "username" 
    .Password = "password" 
End With 

Using session As New Session 
    session.Open(sessionOptions) 
    session.RemoveFiles("/remote/path/pippo*").Check() 
End Using 

(я автор WinSCP)

---

Если вы не хотите использовать 3rd библиотеку партии, сделать, как было предложено выше :

Dim url As String = "ftp://ftp.example.com/remote/path/" 
Dim credentials As NetworkCredential = New NetworkCredential("username", "password") 

Dim listRequest As FtpWebRequest = WebRequest.Create(url) 
listRequest.Method = WebRequestMethods.Ftp.ListDirectory 
listRequest.Credentials = credentials 

Using listResponse As FtpWebResponse = listRequest.GetResponse(), 
     listStream As Stream = listResponse.GetResponseStream(), 
     listReader As StreamReader = New StreamReader(listStream) 
    While Not listReader.EndOfStream 
     Dim filename As String = listReader.ReadLine() 

     If filename.StartsWith("pippo") Then 
      Dim deleteRequest As FtpWebRequest = WebRequest.Create(url + filename) 
      deleteRequest.Method = WebRequestMethods.Ftp.DeleteFile 
      deleteRequest.Credentials = credentials 
      deleteRequest.GetResponse() 
     End If 
    End While 
End Using