Delphi-PRAXiS
Seite 1 von 5  1 23     Letzte »    

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi FTP-Server abfrage? (https://www.delphipraxis.net/111621-ftp-server-abfrage.html)

Jiro 6. Apr 2008 18:35


FTP-Server abfrage?
 
Hi, ich brauch nen Code, der auf einem von mir eingestellten FTP-Server nach einer Datei sucht und wenn sie da ist, soll das Programm ne Nachricht ausgeben.

katjah 6. Apr 2008 18:52

Re: FTP-Server abfrage?
 
Hi,

schau mal, ob Dir die Indy-Komponenten weiterhelfen.
Da ist ein FTP-Client dabei.

http://www.indyproject.org

Klaus01 6. Apr 2008 18:53

Re: FTP-Server abfrage?
 
Guten Abend,

Du könntest Dur die Funkton Size der Indy FtpKomponente zu nutzen machen:
Zitat:

Zitat von IndyHilfe

Gets file size information from the FTP server.

function Size(const AFileName: String): Integer;

Parameters

const AFileName: String

The file name.

Returns

Integer - Size of the file or -1 when unknown.

Description

Size is an Integer function used to retrieve file size information for the file specified in AFilename from the FTP server.

Grüße
Klaus

Jiro 9. Apr 2008 15:28

Re: FTP-Server abfrage?
 
Also mir fehlt eigentlich nichts mehr, aber ich kann nicht verbinden. Ich habe es einmal hingekriegt aber jetzt gehts nicht mehr. Es kommt diese mit einzelnen Schtitten fortsetzen Meldung. Da drin ist die Meldung res7.worldserver.net (da ist meine HP drauf). Warum kann ich nicht connecten? Habe alle Ports und so richtig eingestellt.

katjah 9. Apr 2008 19:58

Re: FTP-Server abfrage?
 
Hi,

hast Du vielleicht 'ne Firewall laufen, die den Zugriff verhindert ?

Klaus01 10. Apr 2008 07:24

Re: FTP-Server abfrage?
 
Zitat:

Zitat von Jiro
Also mir fehlt eigentlich nichts mehr, aber ich kann nicht verbinden. Ich habe es einmal hingekriegt aber jetzt gehts nicht mehr. Es kommt diese mit einzelnen Schtitten fortsetzen Meldung. Da drin ist die Meldung res7.worldserver.net (da ist meine HP drauf). Warum kann ich nicht connecten? Habe alle Ports und so richtig eingestellt.

Was für eine Fehlermeldung/Exception erscheint denn beim Verbindungsaufbau?

Grüße
Klaus

Jiro 10. Apr 2008 13:03

Re: FTP-Server abfrage?
 
http://niklas-nelson.de/programme/latein/connect.jpg

So siehts aus :stupid:

Klaus01 10. Apr 2008 13:11

Re: FTP-Server abfrage?
 
Bekommst Du die Fehlermeldung beim Connect oder wenn Du mit Size eine
nicht existierende Datei abfragst?

Wenn das mit Size so nicht klappt, kannst Du Dir auch mit
idftp1.list(StringList,'*.*',false) eine Dateiliste des aktuellen
Verzeichnisses laden. Diese Liste kannst Du dann nach der Datei durchsuchen.

Grüße
Klaus

Jiro 10. Apr 2008 13:17

Re: FTP-Server abfrage?
 
Das kommt bei size, verbinden kann ich.

Und wie soll ich das genau machen?

http://niklas-nelson.de/programme/latein/size.jpg
so siehts aus :stupid:

Klaus01 10. Apr 2008 13:23

Re: FTP-Server abfrage?
 
In etwa sollte es so gehen:

Delphi-Quellcode:

var
  sl: TStringList;

begin
 ...
 sl := TStringList.create;
 ftp.list(sl,'*.html',false);
 if sl.indexOf('test.html') >= 0 then
   begin
     //Datei vorhanden
   end
 else
   begin
     // Datei nicht vorhanden
   end;
 sl.free;
..
end;
Grüße
Klaus


Alle Zeitangaben in WEZ +1. Es ist jetzt 03:26 Uhr.
Seite 1 von 5  1 23     Letzte »    

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