Delphi-PRAXiS
Seite 1 von 2  1 2      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Netzwerke (https://www.delphipraxis.net/14-netzwerke/)
-   -   Delphi GetDir + FTP (https://www.delphipraxis.net/53642-getdir-ftp.html)

japetos 20. Sep 2005 15:45


GetDir + FTP
 
Folgedes habe ich:
Code:
procedure TForm1.Button6Click(Sender: TObject);
var
  Node: TTreeNode;
  Path: string;
  Dir, s: string;
begin
  Dir := 'C:\d7\';
  Screen.Cursor := crHourGlass;
  TreeView1.Items.BeginUpdate;
  try
    TreeView1.Items.Clear;
    GetDirectories(TreeView1, Dir, nil, True);
  finally
    Screen.Cursor := crDefault;
    TreeView1.Items.EndUpdate;
  end;
end;
wie bekomme ich nun einen Folder wenn idFTP1 verbunden ist. Spruch die OrdnerListe des FTP Servers und nicht die von meinem Rechner?

jfheins 20. Sep 2005 15:48

Re: GetDir + FTP
 
Schau dir mal die Sourcen von meinem Hier im Forum suchenSmallFtp an, da siehst du eine Lösung, die die Indy-Eigenschaft ListResult benutzt.

japetos 20. Sep 2005 15:54

Re: GetDir + FTP
 
Danke, aber da sind keine Source, nur EXE

freak4fun 20. Sep 2005 15:57

Re: GetDir + FTP
 
Such in der OpenSource sparte nach dem Programm. ;)

MfG
freak

jfheins 20. Sep 2005 16:08

Re: GetDir + FTP
 
Zitat:

Zitat von japetos
Danke, aber da sind keine Source, nur EXE

Keine Sourcen ? Ich habe aber welche angehängt ... Da: http://www.delphipraxis.net/download.php?id=13702

japetos 20. Sep 2005 17:16

Re: GetDir + FTP
 
Nee, sorry, raff ich nicht.
Bin zu bloed dafuer.

Danke trotzdem. Werde nochmal die SuchOption verwenden.

:???:

marabu 20. Sep 2005 20:28

Re: GetDir + FTP
 
Hi,

vielleicht hilft dir dieses Code Beispiel auf die Sprünge: klick

Grüße vom marabu

japetos 20. Sep 2005 21:08

Re: GetDir + FTP
 
ich hab das jetzt so:
Code:
begin
  if IdFTP1.Connected then try
  finally
    directory := KAAdoTable1.Fields[4].Text;
    //Dir := directory;
    Dir := 'C:\neu';
    Label1.Caption := 'Selected Directory: ' + dir;
    Screen.Cursor := crHourGlass;
    TreeView1.Items.BeginUpdate;
    try
      TreeView1.Items.Clear;
      GetDirectories(TreeView1, Dir, nil, True);
    finally
      Screen.Cursor := crDefault;
      TreeView1.Items.EndUpdate;
    end;
  end else
  ShowMessage('No FTP-Connection');
end;
nur wie bekomme ich 'directory' in 'Dir'?
irgendwie klappt das nicht.

marabu 21. Sep 2005 08:30

Re: GetDir + FTP
 
Hi,

vermutlich kommt die von dir benutzte Prozedur GetDirectories() nur mit dem lokalen Dateisystem klar. Du wirst dir eine neue Prozedur schreiben müssen. Einen Link als Starthilfe habe ich dir ja schon gegeben.

Grüße vom marabu

schöni 3. Sep 2010 19:51

AW: GetDir + FTP
 
Ähhhmmm, Kann es sein, das ein Vezeichnis auf dem FTP Server mit anderer Systax angesprochen werden muss.

zB. ftp://irgendwas...

Kann mal jemand die korrekte Syntax hier reinstellen. Ich brauche das Homeverzeichnis des Servers, nach Möglichkeit unabhängig vom konkreten Namen. Es sei denn dieser würde bei FTP Zugang auf eine Internet Seite immer bekannt gegeben zur Verwendung mit dem Client. Wenn nicht, muss es ja eine allgemein gültige Syntax für das Home Verzeichnis meines konkreten Zugangs geben.

Wie lautet die Syntax?

War da nicht was mit: ftp://Benutzername&Passwort... aber da fehlt noch immer das Home Verzeichnis.


Alle Zeitangaben in WEZ +1. Es ist jetzt 06:04 Uhr.
Seite 1 von 2  1 2      

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