FTP-Verzeichnis vorhanden?

[marlem]

Hallo,

Delphi 6, FTP-Indy-Komponenten!

wie kann ich überprüfen ob es ein bestimmtes verzeichnis auf dem ftp-server schon gibt?

[Klaus01]

du könntest das übergeordnete Verzeichnis listen
und in der Liste nachschauen ob das gesuchte Verzeichnis darin vorhanden ist.

Delphi-Quellcode:

AFiles := TStringList.Create;
idFtp1.List(AFiles, 'überVerzName', True);
if pos(VerzName,AFiles.text) > 0
  // Verzeichnis vorhanden
else
  // Verzeichnis nicht vorhanden

Grüße
Klaus

[marlem]

hi Klaus!

habe es so gemacht:

Delphi-Quellcode:

  SLFTPListe := TStringList.Create;
     try
     List(SLFTPListe,'*',true);
     gefunden := false;
     Suchwert := 'ms'+trim(RegUti_ReadKey (REGKEY_INTERFACE_BOERSE,'MotoScout24KundenNr'));
     //Nachschauen ob Verzeichnis schon da ist

      for i := 0 to SLFTPListe.Count-1 do
          begin
          //Prüft auf Verzeichnis und Suchwert
          if (pos('drw',SLFTPListe[i]) > 0) and (pos(Suchwert,SLFTPListe[i]) > 0) then
             begin
             Listenwert := trim(copy(SLFTPListe[i],pos(Suchwert,SLFTPListe[i]),length(Suchwert)));
             if Listenwert = Suchwert then
                begin
                ShowMessage('Suchwert: ' + Suchwert + '   ' + 'Listenwert: ' + Listenwert);
                gefunden := true;
                end;
             end;
         end;

aber ist das wirklich die einzige möglichkeit?
wurde der befehl "dirExist" bei indy echt vergessen?

[SirThornberry]

gibts den Befehl direxists überhaupt bei ftp? Ich hab davon noch nie was gehört und beim windows-ftp ist der in der Hilfe so weit ich weiß auch nicht drin. Und wenn das Protokoll das nicht her gibt kanns Indy auch schlecht nutzen.

[Klaus01]

hat indy nicht vergessen, gibt es nicht bei FTP -> http://www.faqs.org/rfcs/rfc959.html

Grüße
Klaus