1. This site uses cookies. By continuing to use this site, you are agreeing to our use of cookies. Learn More.
  2. Anuncie Aqui
    Anuncie aqui você Também: fdantas@4each.com.br

Listar arquivos

Discussão em 'Progress 4GL' iniciado por demetriusbarbosa, Maio 19, 2010.

  1. demetriusbarbosa

    demetriusbarbosa Membro Participativo

    Bom dia pessoal.
    Estou precisando listar somente os arquivos com extensão igual a TXT de um diretório.

    Alguém tem alguma idéia?

    Obrigado.
  2. felix

    felix Membro Participativo

    Ola Demetrius.

    Se for em ambiente unix vc pode usar os comandos.

    ls -l *.TXT
    ls -tl .TXT

    O primeiro vem ordenado por nome e o segundo por data de alteração.

    []'s
  3. eduardo.leite

    eduardo.leite Equipe de Suporte Moderador Equipe de Suporte

    Se você deseja ver direto do progress, vê se te atende a lógica abaixo:

    Código:
    
    def var c-arq           as character    format "x(20)"      no-undo.                   
    def var c-arq-com       as character    format "x(40)"      no-undo.                   
    def var c-arq-typ       as character    format "x(03)"      no-undo.                   
                       
    input from os-dir("c:\temp").
    
    repeat:
    
        import c-arq c-arq-com c-arq-typ.
    
        if c-arq-typ   = "F"     and 
           c-arq matches "*.txt" then
            disp c-arq c-arq-com c-arq-typ.
    
    end.
    
    input close.
    
    
  4. demetriusbarbosa

    demetriusbarbosa Membro Participativo

    Amigo, muito obrigado.
    Funcionou perfeitamente.

Compartilhe esta Página