Página 1 de 1
Limpar PASTA Com DBF.
Enviado: 08 Ago 2023 20:25
por pedromvl
Perdão se eu estiver postando em local errado , mas eu preciso limpar arquivos dbf de uma pasta, eu consigo fazer isso manualmente, só que são muitos arquivos, andei pesquisando e tentei fazer isso em python mas não obtive sucesso, eu gostaria de limpar todos os dados da tabela sem modificar a estrutura.
Limpar PASTA Com DBF.
Enviado: 09 Ago 2023 08:07
por Mario Mesquita
Bom dia a todos.
Penso que seria encher um vetor com o nome de todas as tabelas, dar um FOR/NEXT e dar um comando ZAP em cada uma.
Acho que tem um comando ou função DIRECTORY que pode pegar os nomes de tabela...
Saudações,
Mario.
Limpar PASTA Com DBF.
Enviado: 09 Ago 2023 08:46
por JoséQuintas
Coisa meio básica, talvez não tenha pensado direito....
Como você mesmo disse, pegar a lista de DBFs e limpar.
pegar lista de DBFs: Directory()
limpar: em modo exclusivo, USE e ZAP
Código: Selecionar todos
#include "directry.ch"
LOCAL aList, aFile
aList := Directory( "*.dbf" )
FOR EACH aFile IN aList
? aFile[ F_NAME ]
USE ( aFile[ F_NAME ] ) EXCLUSIVE
ZAP
USE
NEXT
Limpar PASTA Com DBF.
Enviado: 09 Ago 2023 17:57
por alxsts
Olá!
Seja bem-vindo ao Fórum Pedro!
pedromvl escreveu:tentei fazer isso em python mas não obtive sucesso
JoséQuintas escreveu:Coisa meio básica, talvez não tenha pensado direito....
Creio que o OP não seja um programador xBase. Apenas se deparou com a necessidade de manipular algumas tabelas DBF.
A solução já foi apresentada (talvez dar um PACK após o ZAP).
Não se esqueça de verificar se estas tabelas tem índices (arquivos com extensão .NTX ou .CDX). Se tiver, precisa atualizar ou recriar os mesmos).
Outra opção, se não quiser "limpar" as tabelas originais, seria abrir cada uma delas e copiar a estrutura para outro DBF, usando outro nome para a nova tabela.
Limpar PASTA Com DBF.
Enviado: 10 Ago 2023 02:18
por pedromvl
Agradeço a ajuda e resposta de todos, não sou programador xbase apenas li por alguns poucos minutos para fazer o que precisava , programo em PHP, agradeço a todos , já consegui