mit folgendem Quellcode ziehe ich mir per FTP Dateien von einem Server.
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
| idftp1.List(listbox1.Items, 'BEDARF.*', true);
for i := 0 to listbox1.Items.Count - 1 do
begin
text := listbox1.Items[i];
len := length(text);
delete(text, 1, len - 10);
statusbar1.Panels[0].Text := 'Download ' + text;
refresh;
idftp1.get(text, pfad + text, true);
end; |
Das funktioniert auch alles ganz gut. Aber in 25% aller Fälle bleibt das Programm an einer der Dateien hängen und ich bekomme einen EIdProtcolReplyError.
"Unable to build Data Connection : No Route to host".
Wenn ich die FTP-Verbindung dann wieder herstelle, funktioniert auch alles wieder.
Woran kann das liegen? Muß ich etwa nach jedem download die FTP-Verbindung schließen und neu aufbauen? Oder kann es an Firewall (WinXP) oder Server liegen?
