Download de FTP para pasta local

[Valdiney F. Lima 0]

try	  IdFTP1.Host	 := 'www.londriimoveis.com.br';	  IdFTP1.Username := 'root';	  IdFTP1.Password := '123456';	  if IdFTP1.Connected then	  begin	   IdFTP1.Disconnect;	  end else begin	   IdFTP1.Connect();	  end;	  while not ZQuery1.Eof do	  begin		IdFTP1.Get(ZQuery1.FieldByName('caminho').AsString, pastaLocal + ZQuery1.FieldByName('caminho').AsString, false, true);		ZQuery1.Next;	  end;	except	  ShowMessage('Erro ao receber as imagens.');	end;

 

Imagem do erro

 

Qual é o problema?

[Hugo Slepicka 0]

Verifique se está como abaixo...

ftpUpdate.Host := ler_ini('CONEXAO','FTP');	  ftpUpdate.Username := ler_ini('CONEXAO','USUARIO');	  ftpUpdate.Password := DecryptSTR(ler_ini('CONEXAO','SENHA'),25,07,88);	  ftpUpdate.Passive := False;	  ftpUpdate.Connect;	  ftpUpdate.ChangeDir('/Teste/'));	  ftpUpdate.List;	  	  ftpUpdate.Get('testeHugo.txt','C:\FtpDown\',True);	  ftpUpdate.Disconnect;

Esse erro ocorre por você não especificar um caminho ou nome de arquivo correto para o FTP... http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif