ordner anlegen + überprüfen

[crossit]

hey
ich hier mal mein überlegung
ich erstelle eine datei die später hochgeladen werden soll.
zuerst connecte ich zum ftp server und schaue nach ob der ordner ' blubb' existiert. wenn er nicht existiert lege ich ihn an. dannach change ich darein und schaue wieder ob es den ordner 'blubb2' gibt. wenn nicht anlegen und dann wieder reinchangen und dort soll dann ein die erstellte datei hochgeladen werden.
ordner erstellen , changen und hochladen ist klar jedoch nicht mit welchen funktionen ich das alles uberprüfe
habe probiert adas mit dem folgendem code probiert jedoch hat er nicht gefunzt

Code:

var
MyIdFTP: TIdFTP;

begin
myidftp := tidftp.Create;
myidftp.Host:= 'ftp.n.gc.ohost.de';
  myidftp.Username:='n';
  myidftp.Password:='k';
  myidftp.Connect;
  if myidftp.Connected then
  try
  myidftp.MakeDir(vorname.text + nachname.text);
  except
  myidftp.ChangeDir(vorname.text + nachname.text);
  try
  myidftp.MakeDir('putten');
  myidftp.Put('C:\putten_' + datum.Text+ '.txt');
  except
  myidftp.ChangeDir('putten');
  myidftp.Put('C:\putten_' + datum.Text+ '.txt');
  end;
  end;
  myidftp.Disconnect;
  end;

[Jailbird]

Ich hab die Befehlsliste von Indy FTP nicht gerade zur Hand, aber es gibt in FTP keinen Befehl, um auf Existenz eines Ordners/einer Datei zu prüfen. Es gibt allerdings einen kleinen Trick, wie man's trotzdem machen kann.

Variante 1: Das Folder-Listing beziehen. Ordner sind mit d gekennzeichnet. Da nach dem richtigen Namen suchen. Nachteil: Der List-Output kann von FTP-Server zu FTP-Server unterschiedlich aussehen

Variante 2: Ein File-Rename starten. Dieser FTP-Befehl ist 2-stufig und liefert einen Fehlercode, falls die Datei nicht existiert. Das Umbenennen kann dann in jedem Fall abgebrochen werden. Nachteil: FTP-Komponenten unterstützen teilweise das händische Senden von Befehlen nicht.