Discussion :

[KANACHE]

Bonjour à tous.

1ere Question
en chargeant un fichier text dans ma table memoire Table1 ,je trouve que l’écriture se commence à partir de la deuxième ligne de la table et nom la première ligne .comment remédier à cela ?

2eme Question

comment pouvoir ajouter à ce fichier text deux lignes spécifiques ,une ligne au début du fichier qui représente l’entête ,et l'autre ligne à la fin du fichier et qui représente le bas

code utilisé pour les 2 Question:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
idfichier est un entier
bResultat est un booléen
sSligne est une chaîne
idfichier=fOuvre(SAI_fichier,foLectureEcriture)
SI idfichier<> -1 ALORS
	TANTQUE sSligne <> EOT ET sSligne <> " "
		TableAjoute(TABLE_Table1," "+TAB+sSligne[[1 sur 24]]+TAB+sSligne[[25 sur 20]]+TAB+sSligne[[45 sur 30]]+TAB+sSligne[[75 sur 70]]+TAB+sSligne[[145 sur 15]]+TAB+" "+TAB+sSligne[[160 sur 14]])
		POUR TOUTE LIGNE DE TABLE_Table1
			TABLE_Table1.COL_Colonne1=NumériqueVersChaîne(TABLE_Table1,"06d")
			TABLE_Table1.COL_Colonne7=NumériqueVersChaîne(TABLE_Table1.COL_Colonne6,"015d")
		FIN
		sSligne=fLitLigne(idfichier)
	FIN
FIN
fFerme(idfichier)

Merci de m'aider à trouver la solution........Merci mille fois

[Sannazzarotiti]

Essai de lire ton fichier avant d'entrer dans la boucle. C'est ce qu'on nous dit de faire en cours d'algo et j'ai rencontrer un problème similaire (mais pas pour les fichiers).

En attendant que quelqu'un t'aide un peu plus, tu peut toujours tester.

[mail.spam]

bonjour,

Sannazzarotiti a raison tu n'as pas initialiser sSligne avant ton premier tableajoute donc sSligne est une chaine vide.

Ensuite dans ton test de tantque tu vérifie si sSligne <> " "
Est tu sur que tu veux arrêter ta boucle si ta ligne correspond à un caractère espace?

Il faut aussi penser, en plus de la recherche dans l'aide, de faire le débogage du projet pas à pas. Ainsi tu te serai rendu compte de ta non initialisation de ta variable.

Bon courage et bonne lecture

[KANACHE]

Bonjour

Comment initialiser sSligne avant le premier Tableajout

est ce que c est comme cà :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
sSligne=1
// la boucle

[Nicolas_Jeanneau]

Bonjour,

tout simplement en faisant :

sSligne=fLitLigne(idfichier)

avant le TANTQUE !

à bientôt,

Nicolas

[mail.spam]

Non tu fais

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

sSligne=fLitLigne(idfichier)

avant ta boucle tantque ainsi tu lira d'abord une ligne puis tu rentera dans ta boucle...

[KANACHE]

Merci beaucoup , je vais tester ce soir et je vous tiendrais au courant

[KANACHE]

Bonjour mes amis

d'abord merci pour votre aide , effectivement c’était l'initialisation du fichier text qui pose le problème ,c'est réglé.

Pour l’écriture dans le fichier au début et à la fin , j'ai réussi à ajouter la ligne de la fin avec FecritLigne() puisque elle ajoute automatiquement à la fin du fichier.
Mais pour le début je me suis bloqué , comment dire à Windev d'aller ajouter(inserer) une ligne tout à fait au debut du fichier(1 ere ligne).j'ai trouvé dans l'aide la fonction Fpostionne() ,je sais pas si ça peut sert à quelque chose ,si c'est oui merci de m'aider à formuler le bout de code ......merci..merci

[mail.spam]

Bonjour,

Dans les exemples de l'aide de Fpositionne il y a un exemple qui explique comment écrire une chaine de caractère à une position donné.
Cela devrai résoudre ton problème.

[KANACHE]

Bonjour les amis

je continue à battre pour écrire la fameuse ligne de début dans mon fichier text ,mais je n'ai pas arrivé au bout du chemin.

j'ai utilisé :

- Fpositionne(idfichier,0,fpDébut) ,ça écrit la ligne au début mais ça déforme la ligne qui suit ,ce qui est non souhaitable.

- Fpostionne(idfichier,-1,fpDébut),ça écrit aussi la ligne mais à la fin du fichier ,ce n'est pas ça encore le but.

je vous expose la situation par un exemple :

j'ai le fichier de text suivant :

000001555 855588555bonjours
552211445 895557755bonjours
225511225 785888888bonjours

je veux ajouter au début du mon fichier une ligne contenant ex :77777nom pour obtenir :

77777nom
000001555 855588555bonjours
552211445 895557755bonjours
225511225 785888888bonjours

mais windev m'a donné :

- avec Fpositionne(idfichier,0,fpDébut)

77777nom
5 855588555bonjours
552211445 895557755bonjours
225511225 785888888bonjours

- avec Fpostionne(idfichier,-1,fpDébut)

000001555 855588555bonjours
552211445 895557755bonjours
225511225 785888888bonjours
77777nom

A lors si vous avez une idée pour régler ce probleme ,je suis preneur ,et désolé d'avoir été trop long dans mes explications. Merci Merci Merci

[tatayo]

Bonjour,
Je connais une méthode "bourrin", et il y a peut-être plus efficace:
1. Tu charges le contenu de ton fichier dans une variable avec fChargeTexte()
2. Tu ajoutes ta chaines de caractères au contenu (une simple concaténation de chaine)
3. Tu sauves le tout avec fSauveTexte()

Bourrin, mais efficace...

Tatayo.

[Sannazzarotiti]

Je trouve pas sa bourin moi XD

(Je n'est jamais manipuler les fichiers sur windev).
A mon avis, si windev réagi comme sa il n'y a que deux solutions :
- Un moyen de choisir son mode d'écriture si windev le permet (à l'ouverture ou l’écriture avec un parametre en plus ?)
- Sinon la solution de tatayo simple et efficace (et pas prise de tête)

[Lo²]

Bonjour,

Tu utilises fEcritLigne(..) ou fEcrit(..) après le fPositionne(..) ?

[KANACHE]

bonjour ,

oui c'est ce que j'ai fait ,j'ai utilisé FecritLigne() après Fpositionne() ,mais ça ma donnée le résultat cité précédemment.moi je cherche pas ça.

Merci....mes amis

[jurassic pork]

Bonjour,

la méthode bourrin de tatayo est à mon avis la meilleure. Exemple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
MonTexteEnChaine est une chaine
MonTexteEnChaine = fChargeTexte("MonfichierTexte.txt")
 MonTexteEnChaine = "LachaineARajouter" + RC + MonTexteEnchaine
fSauveTexte("MonfichierTexte.txt", MonTexteEnChaine)

Ami calmant, J.P