EXCLUIR VARIOS ARQUIVOS

Projeto [x]Harbour - Compilador de código aberto compatível com o Clipper.

Moderador: Moderadores

EduardoSPno
Usuário Nível 2
Usuário Nível 2
Mensagens: 59
Registrado em: 03 Mai 2012 16:23
Localização: Sao Paulo/SP

EXCLUIR VARIOS ARQUIVOS

Mensagem por EduardoSPno »

Boa tarde a todos !! estou iniciando no HARBOUR e tenho uma duvida, no CLIPPER quando ia excluir um conjunto de arquivos (POR EXEMPLO *.NTX) eu usava RUN DEL *.NTX, tem algo diferente que possa se usado no HARBOUR, tentei o ERASE e o ERASE FILE, mas eles só excluem um arquivo especifico.

Muito Obrigado pela ajuda
Avatar do usuário
Jairo Maia
Moderador
Moderador
Mensagens: 2785
Registrado em: 16 Ago 2010 13:46
Localização: Campinas-SP

EXCLUIR VARIOS ARQUIVOS

Mensagem por Jairo Maia »

Olá Eduardo,

Use a função FileDelete( "*.NTX" ) Essa função é da lib hbct, então acescente hbct.hbc em seu arquivo .HBP.
Abraços, Jairo
Harbour / Clipper 5.2e - Blinker 7
(Não respondo dúvidas por MP ou E-mail. Por favor, não encaminhe via mensagem privada ou e-mail, dúvidas que podem ser compartilhadas com todos no fórum)
Avatar do usuário
JoséQuintas
Administrador
Administrador
Mensagens: 20267
Registrado em: 26 Fev 2007 11:59
Localização: São Paulo-SP

EXCLUIR VARIOS ARQUIVOS

Mensagem por JoséQuintas »

Só pra mostrar outra opção, também disponível no Clipper:

Código: Selecionar todos

#include "directry.ch"
AEval( Directory( "*.ntx" ), { | e | fErase( e[ F_NAME ] } )
Directory retorna um array, AEval executa o codeblock pra cada elemento do array, e o codeblock apaga o arquivo.
José M. C. Quintas
Harbour 3.2, mingw, gtwvg mt, fivewin 25.04, multithread, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui mt), (hmg3), (hmg extended), (oohg), PNotepad, ASP, stored procedure, stored function, Linux (Flagship/harbour 3.2)
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
EduardoSPno
Usuário Nível 2
Usuário Nível 2
Mensagens: 59
Registrado em: 03 Mai 2012 16:23
Localização: Sao Paulo/SP

EXCLUIR VARIOS ARQUIVOS

Mensagem por EduardoSPno »

Bom dia!!
Muito obrigado pelas dicas, vou fazer os testes e volto a postar aqui ok!
Obrigado Jairo e José
Abrços
EduardoSPno
Usuário Nível 2
Usuário Nível 2
Mensagens: 59
Registrado em: 03 Mai 2012 16:23
Localização: Sao Paulo/SP

EXCLUIR VARIOS ARQUIVOS

Mensagem por EduardoSPno »

Deu certinho!
Muito obrigaduuuu
Responder