Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Netzwerke (https://www.delphipraxis.net/14-netzwerke/)
-   -   Beste Vorgehensweise für permanente FTP-Verbindung? (https://www.delphipraxis.net/169666-beste-vorgehensweise-fuer-permanente-ftp-verbindung.html)

ernschd 11. Feb 2014 15:46

AW: Beste Vorgehensweise für permanente FTP-Verbindung?
 
Genau, ich habe eine Methode "goToDir", die bei Bedarf die Verbindung herstellt und auch bei Bedarf in das entsprechende Verzeichnis auf dem Server wechselt.
Diese Methode rufe ich in fast allen FTP-Methoden auf. So stelle ich sicher, dass ich immer im richtigen Verzeichnis auf dem FTP lande.

Delphi-Quellcode:
function goToDir(Datei: String): Boolean;
var dir: String;
begin
    Result := False;
    try
        if NOT Connected then begin
            if NOT Connect then exit;          
        end;

        Datei := ReplaceStr(Datei, '/', '\');
        FTP.HostFileName := ExtractFileName(Datei);
        if Length(ExtractFileExt(Datei)) = 0 then
            dir := ExtractFileDir(IncludeTrailingPathDelimiter(Datei))
        else
            dir := ExtractFileDir(Datei);

        if Length(dir) > 0 then begin
            FTP.HostDirName := Dir;
            LastDir := dir;
            if NOT FTP.Cwd then exit;
        end else
            FTP.HostDirName := LastDir;

        Result := True;
    except
        Result := False;
    end;
end;

schotti65 11. Feb 2014 15:55

AW: Beste Vorgehensweise für permanente FTP-Verbindung?
 
So werd ich's auch machen - merci.


Alle Zeitangaben in WEZ +1. Es ist jetzt 12:00 Uhr.
Seite 2 von 2     12   

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz