Capturar Nomes de Arquivos

Fórum sobre a linguagem CA-Clipper.

Moderador: Moderadores

Dilson José
Usuário Nível 1
Usuário Nível 1
Mensagens: 24
Registrado em: 06 Jun 2007 08:09
Localização: www.pop.com.br
Contato:

Capturar Nomes de Arquivos

Mensagem por Dilson José »

Como proceder para capturar nomes de arquivos *.txt de um determinado diretório automaticamente sem a necessidade da digitação de tais nomes em uma variavel, afim de gravar dados contidos no txt para um *.dbf?

Quem tiver uma dica favor ajudar-me, a qual agradeço antecipadamente.

Obrigado!

Dilson J. Hasselmann
Avatar do usuário
Maligno
Membro Master
Membro Master
Mensagens: 6398
Registrado em: 06 Jul 2004 01:40
Localização: Londrina/PR

Mensagem por Maligno »

Você pode usar a função Directory() do Clipper, que cria uma matriz com os nomes dos arquivos que correspondem a uma determinada especificação. Veja o NG para mais detalhes.
[]'s
Maligno
---
Não respondo questões técnicas através de MP ou eMail. Não insista.
As dúvidas devem ser postadas no fórum. Desta forma, todos poderão
se beneficiar das respostas.

---
Se um dia precisar de uma transfusão de sangue você perceberá como
é importante a figura do doador. Procure o hemocentro de sua cidade e
se informe sobre a doação de sangue, plaquetas e medula óssea. Doe!
Avatar do usuário
Eolo
Colaborador
Colaborador
Mensagens: 1134
Registrado em: 08 Dez 2005 18:24
Localização: São Paulo - SP

Mensagem por Eolo »

Dilson, use o seguinte:
arquivos:=DIRECTORY("*.ntx")

A matriz ARQUIVOS vai conter tantas linhas quantos forem os arquivos TXT da pasta onde vc está, e cada linha vai ter 5 elementos: nome, tamanho, data, hora e atributo.

Ex.:
?arquivos[2,1] -> "DILSON.ntx"
?arquivos[2,3] -> 16/08/2005

(post CORRIGIDO... trocado DILSON.txt por DILXON.ntx - em negrito)
Editado pela última vez por Eolo em 16 Ago 2007 15:08, em um total de 1 vez.
diogenes_varela
Usuário Nível 3
Usuário Nível 3
Mensagens: 206
Registrado em: 04 Nov 2006 19:33
Localização: Brasília - DF

Mensagem por diogenes_varela »

...vai conter tantas linhas quantos forem os arquivos TXT
Não seria arquivos NTX, Eolo?
Os computadores não sabem o que fazem. Nós, na maioria das vezes, também não...

E disse ao Programador: "Todos os teus programas terão erros e irás corrigi-los até ao fim dos teus dias". Gen. 1:9
Avatar do usuário
Eolo
Colaborador
Colaborador
Mensagens: 1134
Registrado em: 08 Dez 2005 18:24
Localização: São Paulo - SP

Mensagem por Eolo »

É, me enganei e escrevi TXT em lugar de NTX. Já corrigi o post acima. Aliás, convém - como disse o Maligno - dar uma consultada no NG. Essa função tem mais opções.
Avatar do usuário
Maligno
Membro Master
Membro Master
Mensagens: 6398
Registrado em: 06 Jul 2004 01:40
Localização: Londrina/PR

Mensagem por Maligno »

Não tem muita importância qual arquivo, afinal de contas. Mas só pra constar: o colega mencionou TXT mesmo e não NTX. :)
[]'s
Maligno
---
Não respondo questões técnicas através de MP ou eMail. Não insista.
As dúvidas devem ser postadas no fórum. Desta forma, todos poderão
se beneficiar das respostas.

---
Se um dia precisar de uma transfusão de sangue você perceberá como
é importante a figura do doador. Procure o hemocentro de sua cidade e
se informe sobre a doação de sangue, plaquetas e medula óssea. Doe!
Responder