Einzelnen Beitrag anzeigen

Alois

Registriert seit: 23. Jul 2005
71 Beiträge
 
Delphi 10 Seattle Professional
 
#1

EIdReplyRFCError wird nicht ausgelöst

  Alt 9. Dez 2015, 09:54
Ich benutze folgende Routine bei meinem FTP Client.
Delphi-Quellcode:
    try
      FFTPClient.Connect;
      if FFTPClient.Connected then
      begin
        try
          // nun z.B. Verzeichnis wechseln:
          FFTPClient.ChangeDir('/public');

          // Dateigrösse ermitteln
          FFileSize := FFTPClient.Size('test.txt');
        except
          on e: EIdReplyRFCError do
          begin
            Task.Comm.Send(WM_MESSAGE_GETFILESIZE, e.Message);
            Abort;
          end;
        end;
        // und Disconnecten
        FFTPClient.Quit;
      end;
    end;
Wenn ich den Verzeichnisnamen /public in ein nicht existierenden Verzeichnis z.b. /public1 umbenenne, so wird korrekterweise ein Ereignis "550 CWD failed. '/public1' : no such file or directory." ausgelöst.
Mach ich das gleiche mit dem Dateinamen test1.txt wird kein Ereignis ausgelöst, obwohl laut der Logdatei "550 No such file." der gleiche ReplyCode 550 zurückgemeldet wird.

Habt ihr dafür eine Erklärung?

Viele Grüße,
Alois

Geändert von Alois ( 9. Dez 2015 um 09:58 Uhr)
  Mit Zitat antworten Zitat