Удаление файла и папки в папке FTP с использованием VBA

Question

Так что в основном я хотел бы знать, как это сделать.

Я понятия не имею, как это сделать, макрос, который бы удалить файл или папку из папки FTP, который определен в окнах (в сетевой папке)

Ty заранее.

Answer 1

Есть несколько способов сделать это, но самым легким, вероятно, будет Kill.

Удалить один файл

Sub MySub() 
    Dim myPath as String 

    myPath = "\\server\Folder\File" 

    If Dir(myPath) <> "" Then Kill myPath 
End Sub 

Удаление нескольких файлов одного и того же типа

Sub MySub() 
    Dim myPath as String 

    myPath = "\\server\Folder\*.xls" 

    If Dir(myPath) <> "" Then Kill myPath 
End Sub 

Удалить все файлы в папке

Sub MySub() 
    Dim myPath as String 

    myPath = "\\server\Folder\*.*" 

    If Dir(myPath) <> "" Then Kill myPath 
End Sub 

Удалить всю папку

Sub MySub() 
    Dim myPath as String 

    myPath = "\\server\Folder\*.*" 
    myFolder = "\\server\Folder\" 

    If Dir(myPath) <> "" Then 
     Kill myPath 
     RmDir myFolder 'For RmDir to work, the folder has to be empty 
    End If 
End Sub 

Есть много способов сделать это, я просто показываю пример с Kill. Вы могли бы использовать FSOs, чтобы все это сделать.

Важно: Вы не можете отменить удаление элемента, подобного этому. Это навсегда удаляет файл. (Он не попадает в корзину, вы не можете вернуть файлы к жизни, которые вы убили.)