PC SOFT

FORUMS PROFESSIONNELS
WINDEV, WEBDEV et WINDEV Mobile

Accueil  |  Messages récents  | Connexion  |   | Français  FR
Accueil → WINDEV 2024 → importation d'un fichier texte
importation d'un fichier texte
Débuté par hasnaa, 27 mar. 2006 22:42 - 4 réponses
#1
Posté le 27 mars 2006 - 22:42
salut à tout le monde
je voudrais vider la base de donnée en windev et de la recharger par des nouveaux informations "données" qu'on reçoit à partir d'n fichier texte.
le fichier lorsqu'on l'ouvre se constitue comme suite: ex:
00012;FARNC;GFTY457;JULES HENRI;IVOI;01021958;JUKI; le format de fichier texte est fixe, ne change pas.
svp je veux un programme qui permet de réaliser ce travail
please je veux la reponse le plus vite possible
et merci
#2
Posté le 28 mars 2006 - 00:47
voir la fonction HImporteTexte
#3
Posté le 28 mars 2006 - 08:32
Bonjour


hcreation(TonfichierHF)

puis allez dans l'exemple dans l'aide de windev de la commande : flitligne

copiez dans un bouton tout le code puis changez cela :

.....
saisieFichier = ligneLue
Tantque LigneLue<>eot et LigneLue<>""
LigneLue=flitligne(idfichier)
saisieFichier=saisieFichier+LigneLue
fin
....

par

//supposon que les rubriques de ton fichier sont :
//00012=>Rub1
//FARNC=>Rub2
//GFTY457=>Rub3
//JULES HENRI=>Rub4
//IVOI=>Rub5
//01021958=>Rub6
//JUKI=>Rub7
....
hraz(TonfichierHF)
TonfichierHF.Rub1=extraitchaine(ligneLue,1,",")
TonfichierHF.Rub2=extraitchaine(ligneLue,2,",")
TonfichierHF.Rub3=extraitchaine(ligneLue,3,",")
TonfichierHF.Rub4=extraitchaine(ligneLue,4,",")
TonfichierHF.Rub5=extraitchaine(ligneLue,5,",")
TonfichierHF.Rub6=extraitchaine(ligneLue,6,",")
TonfichierHF.Rub7=extraitchaine(ligneLue,7,",")
si pas hajoute(TonFichierHF)
erreur("Erreur pendant l'ajout dans le fichier",herreurinfo())
fin
Tantque LigneLue<>eot et LigneLue<>""
LigneLue=flitligne(idfichier)
hraz(TonfichierHF)
TonfichierHF.Rub1=extraitchaine(ligneLue,1,",")
TonfichierHF.Rub2=extraitchaine(ligneLue,2,",")
TonfichierHF.Rub3=extraitchaine(ligneLue,3,",")
TonfichierHF.Rub4=extraitchaine(ligneLue,4,",")
TonfichierHF.Rub5=extraitchaine(ligneLue,5,",")
TonfichierHF.Rub6=extraitchaine(ligneLue,6,",")
TonfichierHF.Rub7=extraitchaine(ligneLue,7,",")
si pas hajoute(TonFichierHF)
erreur("Erreur pendant l'ajout dans le fichier",herreurinfo())
fin
fin
....

A++

Ali Hindi : AliDev7@yahoo.fr
#4
Posté le 28 mars 2006 - 08:32
Re Bonjour,


NB : emplacez le separateur "," dans la commande flitligne(...) par ";"

2 ème methode qui suppose que le fichier txt est identique au fichier HF

si pas himprtetexte("TonFichier","c:\.....\TonFichierTXT.txt","Rub1,Rub2,Rub3,Rub4,Rub5,Rub6,Rub7",himpcréation)
errreur("L'importation à rencontrer une erreur",herreurinfo())
sinon
info("C'est bon")
fin


Bon Dev.

Ali Hindi : AliDev7@yahoo.fr
#5
Posté le 28 mars 2006 - 23:05
hasnaa a formulé la demande :
salut à tout le monde
je voudrais vider la base de donnée en windev et de la recharger par des
nouveaux informations "données" qu'on reçoit à partir d'n fichier texte. le
fichier lorsqu'on l'ouvre se constitue comme suite: ex:
00012;FARNC;GFTY457;JULES HENRI;IVOI;01021958;JUKI; le format de fichier
texte est fixe, ne change pas. svp je veux un programme qui permet de
réaliser ce travail please je veux la reponse le plus vite possible et merci


Tu peux aussi utiliser WDConver en ligne de commande. voir l'aide
→ Revenir à WINDEV 2024