Re: fichier texte vers hyper file
Posté par drcharly93 le 2/5/2006 17:46:51
Bonjour,
Si c'est pour du one shoot alors utiliser Excel pour en faire un csv ce type de fichier peut être directement importé via la fonction HImporteTexte()
Sinon vous pouvez créer une classe ou bien une collection de procedure qui lira chacune des lignes du fichier et ensuite on découpera pour les affectations
Si c'est pour du one shoot alors utiliser Excel pour en faire un csv ce type de fichier peut être directement importé via la fonction HImporteTexte()
Sinon vous pouvez créer une classe ou bien une collection de procedure qui lira chacune des lignes du fichier et ensuite on découpera pour les affectations
sSource est une chaine = fChargeTexte(<Fichier>)
sUneLigne est une chaine
sUneLigne = ExtraitChaine(sSource,rangPremier,RC)
TantQue sUneLigne <> EOT
<MonFichier>.<Reference> = SansEspace(sUneLigne[[1 A 10]])
<MonFichier>.<Designation = SansEspace(sUneLigne[[11 A 40]])
etc...
HAjoute(<MonFichier>)
sUneLigne = ExtraitChaine(sSource,rangSuivant,RC)
Fin
Cette contribution était de : http://old.wdforge.org/newbb/viewtopic.php?forum=17&topic_id=3934&post_id=16512