carlos_tedex
Novato
Registrado: Quinta-Feira, 8 de Junho de 2006
Mensagens: 90
Localização: Vila Velha/ES
|
 Enviada: Qua Dez 01, 2021 9:42 am Assunto: [resolvido] FTP com Indy Delphi XE2 - Download |
 |
|
Bom dia!
Estou tentando baixar um arquivo via FTP utilizando o componente IdFTP no Delphi XE2 e estou enfrentando alguns problemas.
Estou conseguindo me conectar ao servidor sem problemas e também consigo até criar uma pasta (IdFTP1.MakeDir(edtPasta.Text)), porém ao tentar baixar um arquivo com o comando IdFTP1.Get() ou tentar listar os arquivos e pastas (IdFTP1.List) recebo alguns erros:
- Com a opção Passive = False
Illegal PORT command
- Com a opção Passive = True
Read timed out
Vou postar um trecho do meu código:
| Código: |
try
try
if IdFTP1.Connected then
begin
Assert(IdFTP1.Connected);
IdFTP1.ChangeDir(edtChangeDir.Text); // Definir a pasta no servidor
IdFTP1.Get(edtFile.Text, edtDestino.Text + edtFile.Text, True); // Receber o arquivo do servidor
ShowMessage('Arquivo Recebido!');
end;
finally
IdFTP1.DisconnectNotifyPeer;
end;
except
on E: Exception do
Application.MessageBox(PChar(E.Message), 'Erro', MB_ICONERROR);
end;
|
OBS: Utilizando o FileZilla eu consigo fazer todas as operações no FTP (listar os diretórios e arquivos, upload e download)
Se alguém puder me dar uma dica de como resolver isso ou algum outro componente que eu possa testar.
Grato!
- Cenário:
Delphi XE2
Indy 10.5.8.0
Servidor FTP: Ubuntu Server 18.04
Editado pela última vez por carlos_tedex em Qua Dez 01, 2021 2:48 pm, num total de 1 vez |
|
FAQ
Pesquisar
Membros
Grupos
Registrar
Perfil
Entrar e ver Mensagens Particulares
Entrar
