Hi,
hab mit Hilfe von Indy 9 nen FTP Server programmiert.
Funktioniert soweit einwandfrei.
Wenn ich eine Datei uploade und den Upload abbreche gibt es keine Probleme.
Wenn ich den Upload dann allerdings fortsetze und wiederum abbreche, bekomme
ich folgende Meldung im FTP Client: 426 Data connection closed abnormally.
Wäre ja nicht weiter schlimm, wenn die Datei nicht anschließend 0 byte gross wäre.
Hier meine Store-Procedure:
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
| procedure TForm1.ServerStoreFile(ASender: TIdFTPServerThread;
const AFileName: String; AAppend: Boolean; var VStream: TStream);
begin
...
if AAppend then begin
VStream := TFileStream.Create(FName,fmOpenReadWrite);
VStream.Seek(0,soFromEnd);
end else VStream := TFileStream.Create(FName,fmCreate);
end; |
Könnte es evtl. an der Zugriffsberechtigung (fmOpenReadWrite) liegen?
Hab schon fmOpenWrite probiert - derselbe Fehler.
Ein "ABOR" wird auch nicht gesendet.
Wäre echt gut, wenn mir da jemand helfen könnte.
