Indy - FTP - Fehler

[gordenfreeman2]

Hallo,

Ich habe folgendes Problem. Ich möchte ein Verbindung zu einem FTP Server aufbauen. Dies Funktioniert auch, sprich der connect funktioniert einwandfrei. Aber wenn ich dann die Funktion RetrieveCurrentDir aufrufe bekomme ich folgende Meldung:

This Computer system is for authorized users only. Individuals using this em without authority or in excess of thers authority are subject to ng all ther activities on this system monitored etc.....

Verwende Delphi 7. Wie ich mit der Komponente von Delphi 6 gearbeitet habe (nicht Indy) hat dies ohne Probleme funktioniert. Nur seit dem ich auf die Delphi 7 umgestiegen bin kann ich nicht auf die Funktionen zugreifen.

Mein Code schaut so ca aus.

IM Form Create:
ftp.host := ftp......
ftp.Username := asdf
ftp.password := test
ftp.port := 21
ftp.connect(true,10000)

im der Mehtode Connect frage ich ab ob dieser gut gegnagen ist. Aber ich möchte mir eben mit der oben beschrieben Funktion den aktuellen Ordner ausgeben lassen. Bekomme jedeoch nur diesen Fehler. Vl. könnt ihr mir helfen.

Danke

[marabu]

Dein gezeigter Code ist korrekt. Allerdings ist der OnCreate-Handler deiner Form nicht unbedingt der beste Ort für die Bereitstellung einer FTP-Verbindung. Sei's drum. Der folgende Code funktioniert bestimmt auch bei dir einwandfrei:

Delphi-Quellcode:

with ftp do begin
  Connect();
  if Connected then begin
    ShowMessage(RetrieveCurrentDir);
    Disconnect;
  end;
end;

Grüße vom marabu