Message de rapport:
 

Re: fichier texte vers hyper file

Sujet: Re: fichier texte vers hyper file
par drcharly93 sur 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

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

Connexion
Menu
Chercher WDForge
Chercher Web
Partenaires
Visualiser tous les Partenaires...
WinDev, WebDev, WinDev Mobile et HyperFile sont des marques déposées par PCSoft. |  Voter |  Legal |  Contact |   XOOPS 2.0.13.2