diferen�as entre arquivo e diretorio via ftp

Question

Colegas, por favor, n�o consegui entender uma coisa:estou usando o idFtp do indy clients para criar diretorios no meu server ftp e fazer upload de arquivos. Por�m, quando eu dou um �list� no idftp e e...

Massuda · Answer

Voc� deve estar usando o m�todo TIdFTP.List... nesse caso, voc� pode especificar para retornar uma lista de todos os arquivos ou de todos os diretorios; conforme o help do TIdFTP, o [b:90a9f48627]segundo[/b:90a9f48627] par�metro do m�todo List...[quote:90a9f48627=�Help do Indy�]...is a String value that contains a mask indicating the files and/or directories to be included in the listing. ASpecifier can contain common wildcard characters like �*� and �?�. Some useful masks include:[list:90a9f48627][*:90a9f48627]*.* - All files in the current directory.[*:90a9f48627]* - All directory entries in the current directory.[*:90a9f48627]*. - All files regardless of extension in the current directory.[*:90a9f48627]A??.txt - All text files that have a 3-character name starting with �A�.[/list:u:90a9f48627][/quote:90a9f48627]...ou seja, voc� pode dar um List(...,�*�) para obter todos os diret�rios e um List(...�*.�) para obter todos os arquivos.

Vitor Rubio · Answer

Tamb�m vi isso no help, mas n�o � bem assim.... Se voc� usa o �*� ele lista todos os arquivos, todos os diretorios e entra nos diretorios, listando tamb�m os arquivos e subdiretorios dentro deles.

usando em branco �� ele s� lista diretorios e arquivos.

Adriano Santos · Answer

Tive o mesmo problema.Fiz um teste aqui e o que obtive foi o mesmo resultado que o victo^_^ relatou, n�o d� pra saber quem � quem....

Massuda · Answer

Desculpe, normalmente eu n�o uso essa lista informada pelo TIdFTP.List, mas sim uso a lista TIdFTP.DirectoryListing.

No servidor que utilizo, usando �*.*� retorna todos os arquivos enquanto �*� retorna todos os arquivos mais diret�rios.

Fora isso, no in�cio de cada string tem um conjunto de caracteres que indica os atributos (estilo Unix) de cada entrada no diret�rio...

-rw-rw-r--    1 mickey.mouse ftp         12345 Jan 12  2000 imagem1.jpg
drwxrwxr-x    2 mickey.mouse ftp           512 Jan 12  2000 diretorio1
-rw-rw-r--    1 mickey.mouse ftp         12345 Jan 12  2000 imagem2.jpg

...e todo diret�rio tem um atributo �d� indicado. Mas isso depende muito do tipo de servidor que voc� estiver usando (no meu caso, � um servidor Linux).

Uma outra forma de fazer isso, que independe do tipo de servidor, � manipular a lista TIdFTP.DirectoryListing...

var
  Lista: TStringList;
  I: Integer;
...
  // passo nil porque n�o preciso da resposta do servidor
  IdFTP1.List(nil);
  
  for I := 0 to Pred(IdFTP1.DirectoryListing.Count) do begin

    // IdFTP1.DirectoryListing[I].FileName = nome do arquivo/diret�rio

    if IdFTP1.DirectoryListing[I].ItemType = ditFile then begin
        // � um arquivo
    end
    else if IdFTP1.DirectoryListing[I].ItemType = ditDirectory then begin
        // � um diret�rio
    end;
    ...
  end;
...

...note que passei nil em TIdFTP.List porque n�o preciso do texto enviado pelo servidor, mas sim vou usar a lista gerada pelo componente.

Adriano Santos · Answer

Firmeza Massuda, consegui usar o esquema que passou. S� fiquei com duas d�vidas (j� pensando em montar meu pr�prio programa ftp, rs).

1 - Como usar s� o DirectoryListing?
Vc disse que que uma outra forma seria usando um FOR e tals, fiz de acordo com seu exemplo:

procedure TForm1.Button1Click(Sender: TObject);
var
  I : Integer;
begin
  Application.ProcessMessages;
  with IdFTP1 do
  begin
    Connect;
    List(Nil);
    for I := 0 to Pred(DirectoryListing.Count)-1 do
      if DirectoryListing[I].ItemType = ditFile then
        ListBox1.Items.Add(�Arquivo: � + DirectoryListing[I].FileName)
      else if DirectoryListing[I].ItemType = ditDirectory then
        ListBox1.Items.Add(�Diret�rio: � + DirectoryListing[I].FileName);
    Disconnect;
  end;
end;

Mas e qual seria a primeira forma?

2 - Como eu fa�o para navegar, ou seja, quero abrir a pasta PUB no meu servidor FTP? Direto no idFtp n�o tem como informar certo?

valeu

Massuda · Answer

[quote:be0dbb3cb2=�Adriano Santos�]Mas e qual seria a primeira forma?[/quote:be0dbb3cb2]Desculpe, acho que escrevi de uma forma que d� impress�o que tem outra forma de usar o DirectoryListing... eu quis dizer que al�m de tentar parsear o texto retornado pelo List, outra forma � processar o DirectoryListing.

[quote:be0dbb3cb2=�Adriano Santos�]2 - Como eu fa�o para navegar, ou seja, quero abrir a pasta PUB no meu servidor FTP? Direto no idFtp n�o tem como informar certo?[/quote:be0dbb3cb2]Voc� tem que navegar usando TIdFTP.ChangeDir(...caminho...) e TIdFTP.ChangeDirUp (equivalem a usar �CD� e �CD ..� no prompt do DOS).

F�rum diferen�as entre arquivo e diretorio via ftp #292541