IDFTP - RemoveDir

Delphi

22/11/2005

Não consigo de forma alguma apagar um diretório no FTP. O que será que estou fazendo errado?
Codigo:

strlArquivos := TStringList.Create;

with DataModule.IdFTP do
begin
Host := ´TERRA´;
Port := ´5010´;
Username := ´1´;
Password := ´1´;
if not Connected then
Connect;
ChangeDir(copy(prNrContr,1,8));
ChangeDir(copy(prNrContr,9,4));
ChangeDir(copy(prNrContr,13,10));

List(strlArquivos,´´,false);

// Remove os arquivos
for i:=0 to strlArquivos.Count -3 do
begin
sNomeArq := strlArquivos[i+2];
Delete(sNomeArq);
end;

sDir := trim(copy(prNrContr,13,10));

// Remove o diretório
DataModule.IdFTP.RemoveDir(sDir);

Esse removeDir nao funciona. Pq será?


Foxcyber

Foxcyber

Curtidas 0
POSTAR