PC SOFT

FOROS PROFESIONALES
WINDEVWEBDEV y WINDEV Mobile

Inicio → WINDEV 2024 → transformer un table HYPERFILE en fichier texte
transformer un table HYPERFILE en fichier texte
Iniciado por laure, 14,mar. 2006 10:06 - 6 respuestas
Publicado el 14,marzo 2006 - 10:06
Bonjour,

Je souhaite ecririre tous les enregistrements d'une table hyperfile dans un fichier texte avec des champs séparés par des points virgule.

Comment faire ?

Merci de votre aide ...
Publicado el 14,marzo 2006 - 10:34
"laure" <laure.mouchet@free.fr> a écrit dans le message de news:
44167362$1@news.pcsoft.fr...

Bonjour,

Je souhaite ecririre tous les enregistrements d'une table hyperfile dans
un fichier texte avec des champs séparés par des points virgule.

Comment faire ?

Merci de votre aide ...

L'utilitaire WDMAP.EXE permet d'exporter un fichier HF dans un fichier texte
avec séparateurs TAB ou point virgule
Publicado el 14,marzo 2006 - 10:51
Bonjour,

Ce n'est peut pas la meilleur solution mais ca marche, tu recopie le code et tu le fais tourner :

machaine est une chaine
IDFichier est un entier

IDFichier=fOuvre("C:/tonfichier.txt",foCreation+foAjout+foLectureEcriture)

Si IDFichier=-1 ALORS
info("Erreur du fichier")
SINON
HLitPremier(TaTable)

TantQue PAS HEnDehors(TaTable)
machaine=Champs1+";"+Champs2+";"+...+";"+Champsn
fEcritLigne(IDFichier,machaine)
HLitSuivant(TaTable)
FIN
FIN
Publicado el 14,marzo 2006 - 11:02
Ok, mais il faut que je le fasse par programmation....
Tu aurais un petit exemple stp?

Merci
Publicado el 14,marzo 2006 - 14:11
Ou utiliser hlisterubrique() et des indirections, ça rend le tout indépendant de la structure du fichier.
Publicado el 14,marzo 2006 - 14:33
ou alors: utilise le code ci-dessus mais avec HRécupèreEnregistrement()

Plus simple . . .
Publicado el 15,marzo 2006 - 10:53
Pour ce dont j'ai besoin (recuperer tous les enregs d'un table et les mettre dans un fichier texte avec les champs separés pae ";" ) la syntaxe est bien la suivante ??

Je fais HRECUPEREENREGISTREMENT(NOMTABLE,";") dans une boucle et c'est tout ?

Merci