Re: maj structure fichiers temp. : stratégie... |
Sujet: Re: maj structure fichiers temp. : stratégie... par R&B sur 13/3/2003 9:29:56 la voie en cours (pardonc je sis dans une classe, il se peut alors que des membres soit glissé dans le code.. en fait en cas d'erreur dans la structure, je pense ouvrir le fichier, faire un dump (export en txt), hcréer le fichier et récupérer les données (himportetexte) QUAND EXCEPTION DANS HCréationSiInexistant(cNomFic) FAIRE cFicPhys est une chaîne = :m_cRep+"\"+cNomFic+".fic" ctxt est une chaîne = :m_cRep+"\"+cNomFic+".txt" nfic est un entier SI fRep(cFicPhys,frFichier)<>"" ALORS Info("le fichier existe déja",HListeRubrique(cNomFic)) // DUMP le fichier dans un txt Sablier nfic=fOuvre(ctxt,foCréation+foLectureEcriture) SI nfic<>-1 ALORS POUR TOUT cNomFic fEcritLigne(nfic,HRécupèreEnregistrement(cNomFic)) FIN fFerme(nfic) FIN // crée avec nouvelle structure HCréation(cNomFic) // re-importe les données HImporteTexte(cNomFic,ctxt,TAB+Caract(127)+""""+Caract(127)+RC,hImpSansDélimiteur) HOuvre(cNomFic) Sablier(Faux) FIN FIN saut que je ne puis parcourir le fichier, il n'as pas la structure voulue... J'ai trouvé une solution, mais cela soulève un autre cas qui sera une grosse surprise... les fichiers HF vont souffir |