Lupa para escolher diretório

Carlos Alberto Giusti · Junho 5, 2024

rafael.andrade disse: ↑
Tu pode rodar esse comando via OS-COMMAND e depois ler o lista.txt via INPUT FROM:
Código:
DEFINE VARIABLE cDir AS CHARACTER NO-UNDO INITIAL 'C:\'.
DEFINE VARIABLE cFileStream AS CHARACTER FORMAT "x(50)" NO-UNDO.
OUTPUT TO "C:\Temp\Lista.txt" NO-CONVERT.
INPUT FROM OS-DIR(cDir).
REPEAT:
    IMPORT cFileStream.
    FILE-INFO:FILENAME = cDir + cFileStream.
    PUT UNFORMAT cFileStream " - " FILE-INFO:FILE-TYPE SKIP.
END.
INPUT CLOSE.
OUTPUT CLOSE.
OS-COMMAND NO-WAIT VALUE("notepad " + QUOTER("C:\Temp\Lista.txt")).
DRW = DIRETÓRIO
FRW = ARQUIVO
Clique para expandir...
Preciso que inicie na pasta C:\ aí o usuário escolhe a pasta e salva colocando no campo diretório do programa.

Estou fazendo conforme abaixo mas não traz o caminho. É de importação de arquivo. O que preciso mudar para trazer o caminho que o usuário indicar?

rafael.andrade · Junho 5, 2024

Veja os arquivos em anexo de exemplo

Carlos Alberto Giusti · Junho 5, 2024

rafael.andrade disse: ↑

Veja os arquivos em anexo de exemplo
Clique para expandir...

Fiz e deu certo. Muito obrigado.

Logar ou Criar uma Conta

Lupa para escolher diretório

Carlos Alberto Giusti Membro Ativo

rafael.andrade Membro Master Moderador Equipe de Suporte

Arquivos Anexados:

Seleção de pasta.p

Seleção de Arquivo.p

Carlos Alberto Giusti Membro Ativo

Compartilhe esta Página

Logar ou Criar uma Conta

Lupa para escolher diretório

Carlos Alberto Giusti Membro Ativo

rafael.andrade Membro Master Moderador Equipe de Suporte

Arquivos Anexados:

Seleção de pasta.p

Seleção de Arquivo.p

Carlos Alberto Giusti Membro Ativo

Compartilhe esta Página

Pesquisas Úteis