BOm dia Meu nome é éder e sou novo na comunidade tenho uma dúvida estou desenvolvendo um programa de extração de dados estatisticos e gostaria de saber se existe algum comando via linguagem progress que eu consiga criar um diretório na raiz do computador que esta gerando os dados por exemplo assim: eu vou gerar informações de maio de 2009, ou seja o mês é o mês 05 e o ano 2009 eu gostaria que o sistema criasse dentro de uma pasta chamada massa automaticamente uma pasta da seguinte forma: mes052009 e a partir disso gerar os arquivos que deverão ser extraidos dentro dessa pasta criada. Alguém conhece uma forma de se desenvolver esse tipo de recurso na linguagem progress?
DEF VAR c-local as char NO-UNDO. assign c-local = "c:\teste". ASSIGN FILE-INFO:FILE-NAME = c-local. IF FILE-INFO:FULL-PATHNAME = ? THEN DO: OS-CREATE-DIR VALUE(c-local). END.
Se você quiser buscar algum arquivo específico: Código: define variable c-Nome-Arquivo as character no-undo. define variable c-Path as character no-undo. define variable l-Ok as logical no-undo. assign c-Path = "c:\tmp". system-dialog get-file c-Nome-Arquivo title "Informe o arquivo" filters "Arquivos Texto (*.txt)" "*.txt" "Arquivos Texto (*.ret)" "*.ret" initial-dir c-Path nust-exist return-to-start-dir use-filename update l-Ok. if not l-Ok then do: /* Na tela aberta pelo programa, caso o usuário não selecione nenhum arquivo (clique em cancelar), você pode tratar o programa para que determinadas ações sejam tomadas. */ message "Nenhum arquivo foi selecionado. Verifique" view-as alert-box warning butons ok. end. Abraços
