Erro ao enviar arquivo para FTP

Delphi

03/10/2006

Boa tarde senhores,

Estou com um probleminha (rs). Uso Isa Server (firewall) na minha rede, estou tentando mandar arquivo pro FTP, e está dando o seguinte erro:


A mesma rotina que estou usando, se executar fora do domínio, funciona perfeitamente.

Alguém sabe como ajudar? Abaixo segue o código...

// INICIO
with IdFTP1 do
begin
Disconnect;
Host := ´endereco ftp´;
Username := ´login´;
Password := ´senha´;
Connect;
for i := 0 to FileListBox1.Count do
begin
FileListBox1.ItemIndex := i;
[color=red:71cc98b11a]Put(FileListBox1.Items.Strings[FileListBox1.ItemIndex], FileListBox1.Items.Strings[FileListBox1.ItemIndex], False);[/color:71cc98b11a]
end
;
// FIM


Rodolphogagno

Rodolphogagno

Curtidas 0

Respostas

Massuda

Massuda

03/10/2006

Qual a versão do seu Delphi e do seu Indy?


GOSTEI 0
Rodolphogagno

Rodolphogagno

03/10/2006

Delphi 7 e Indy for Delphi 7


GOSTEI 0
Massuda

Massuda

03/10/2006

Pelo que entendi, seu programa tenta copiar os arquivos relacionados no listbox da sua máquina para o servidor FTP.

Com relação ao ISA Server, nunca usei, mas imagino que você configurou corretamente o firewall. Para testar, experimente usar um programa de FTP (o windows tem um ftp linha de comando).

O código erro 10038 pode indicar tanto problemas na conexão como problemas, no caso, no acesso ao arquivo que vai ser mandado para o servidor.

Faz anos que não uso um FileListBox, por isso não lembro, mas
FileListBox1.Items.Strings[...] contem o nome do arquivo com ou sem o path? Se incluir o path, pode ser que o seu servidor de FTP não esteja gostando disso, use ExtractFileName.

Um pequeno comentário, sem relação com o problema (acho)... do que ajustar o ItemIndex, porque você não faz simplesmente...
for i := 0 to FileListBox1.Count do begin 
  Put(FileListBox1.Items[I], FileListBox1.Items[I], False); 
end 



GOSTEI 0
Rodolphogagno

Rodolphogagno

03/10/2006

Faz anos que não uso um FileListBox, por isso não lembro, mas FileListBox1.Items.Strings[...] contem o nome do arquivo com ou sem o path? Se incluir o path, pode ser que o seu servidor de FTP não esteja gostando disso, use ExtractFileName.


Contém o nome do arquivo. Eu testo a mesma rotina fora da rede e envia corretamente os arquivos para o FTP, mas quando executo no domínio da esse ERRO. :/


GOSTEI 0
Steve_narancic

Steve_narancic

03/10/2006

Verifique se seu servidor FTP não trabalha como [b:d8991ab43b]Passive Mode[/b:d8991ab43b], tente definir a propriedade passive mode para true


GOSTEI 0
Rodolphogagno

Rodolphogagno

03/10/2006

Verifique se seu servidor FTP não trabalha como [b:687c1b32bf]Passive Mode[/b:687c1b32bf], tente definir a propriedade passive mode para true


Está como true sim, obrigado pela atenção! =)


GOSTEI 0
Rodolphogagno

Rodolphogagno

03/10/2006

Obrigado a todos, solucionei o problema!


Configurei Proxy e também setei a propriedade do IdFTP1 Passive para true. Pois está assim configurado no FTP.


GOSTEI 0
POSTAR