also ich hab folgendes ereignis wenn jemand von meinem server ( selbstbau mit
indy 9 tidftpserver ) mit dem kommando RETR eine datei anfordert.
Delphi-Quellcode:
procedure TForm1.ftpRetrieveFile(ASender: TIdFTPServerThread;
const AFileName: String; var VStream: TStream);
Vstream ist hierbei der stream wo für diesen clientthread "erstellt" wurde
nun würd ich gerne wissen wie ich dem eine datei zuweisen kann
Delphi-Quellcode:
vstream := tfilestream.Create('c:\1.txt',fmOpenRead);
asender.DataChannelThread.StartThread(ftpRetr);
hab ich mal probiert.. aber irgendwie kommt dann ne fehlermeldung: verbindung besteht bereits
hab keine ahnung wieso das net funzt
da bleibt dann der
ftp client stehen und wartet auf daten:
PORT 127,0,0,1,7,117
200 PORT Anweisung erfolgreich.
RETR 1.txt
150 Dateistatus OK; Datenverbindung wird geöffnet.
Das echte Leben ist was für Leute...
... die im Internet keine Freunde finden!