Listar diretorio FTP.put

Delphi

06/11/2006

Estou tentando pegar uma listagem de arquivos do meu diretorio e jogar dentro do FTP mas não estou conseguindo e não retorna nenhuma mensagem de erro, abaixo segue o codigo

Lijst := TStringList.Create;
try
if FindFirst(´C:\teste\´ + data, faAnyFile, SearchRec) = 0 then
begin
Lijst.Add(SearchRec.Name);
while FindNext(Searchrec) = 0 do
Lijst.Add(SearchRec.name);
end;
for Index := 0 to pred(Lijst.Count) do
idFTP2.Put(Lijst[Index], ´/work/lixo/´ + Lijst[Index], true);
finally
Lijst.Free;
FindClose(SearchRec);
end;

aguém pode me dar uma mão?



Obrigado
WatchDogCWB


Watchdogcwb

Watchdogcwb

Curtidas 0

Respostas

Massuda

Massuda

06/11/2006

Passe para TIdFTP.Put o nome de arquivo completo, incluindo o caminho para o arquivo, tanto para o arquivo de origem como o arquivo de destino.


GOSTEI 0
POSTAR