Re: Gerer les doublon dans fichier HyperFile

Posté par boulot le 23/6/2006 11:05:51

tu avais raison KAER, il faut d'abort faire la recherche sur le fichier HF et apres seulement s'il le trouve ou pas faire l'enregistrement dans le fichier.

Voila le code qui marche

pref pdes pprix sont de chaines

pref = SansEspace(Gauche(sRes,26))
pdes = Milieu(sRes,26,25)
pprix = Droite(sRes,6)




//test est une chaine = Produit.RefProduit
//gere doublon
HLitRecherchePremier(Produit,RefProduit,pref)
SI HTrouve() ALORS
Produit.RefProduit = pref
Produit.Designation = pdes
Produit.Prix = pprix
HModifie(Produit)

SINON
Produit.RefProduit = pref
Produit.Designation = pdes
Produit.Prix = pprix
HAjoute(Produit)
// Produit.RefProduit = ""


// HModifie(Produit)
FIN