Comando para apgar o arquivo

[hhmelina 0]

Bom dia galera...

Seguinte, fiz um sistema para enviar arquivo txt via ftp... Quando você roda pela primeira vez, ele envia direitinho... cria as pastas e joga seus respectivos arquivos dentro dela... Mas quando rodo de novo, dá erro, pq a pasta já está criada... então fiz assim

 

IdFTP1.Connect;

ALista := TstringList.Create;

IdFTP1.changedir('/');

IdFTP1.list(Alista,'*',False);

for i:=0 to Alista.Count-1 do

begin

if Alista= local then

begin

IdFTP1.SendCmd('rm-f '+local+'.txt');

//IdFTP1.SendCmd('rm-f'+local); ele da erro aqui

end;

end;

ALista.Free;

 

Ele só remove o arquivo txt

E antes de dar o put, nao sei pq ele já envia o arquivo novo para dentro da pasta e se a pasta nao estiver vazia, é obvio q nao vou conseguir apaga-la

afffff....

Alguém me ajuda, por favor...

Beijos

Mel

[Wilton 0]

Mel, não está faltando um espaço não?

 

IdFTP1.SendCmd('rm -f '+local+'.txt');//IdFTP1.SendCmd('rm -f '+local); ele da erro aqui

Boa sorte!