Discussion :

[Xsara 167 cv]

Bonjour à tous,

Ne réussissant pas à ouvrir un fichier .fic qui est en version 5.5 j'essaye de passer par un fichier .txt. But du jeux mettre les enregistrements du fichier txt dans un fichier Hyperfile sous windev 11. Mais là n'est pas encore le problème

J'arrive à ouvrir un fichier txt mais juste après le logiciel me pose l'erreur ci-dessous.

Erreur à la ligne 8 du traitement Clic sur BTN_Bouton_Txt1.
Vous avez appelé la fonction fLitLigne.
Vous avez demandé à manipuler le fichier n°1 qui n'a pas été ouvert par fOuvre ou fCrée.

Voici mon petit code :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
ResOuv55 est un booléen
champ est une chaîne
 
ResOuv55=fOuvre("c:\mes projets\gestemps\gestemps\tva.txt")
SI ResOuv55=Vrai ALORS
//	fOuvre("c:\mes projets\gestemps\gestemps\tva.txt")
	Info("ouverture ok")
	champ=fLitLigne(ResOuv55)
SINON
	Erreur("Erreur Hyper File : " + HErreurInfo())
FIN

est-ce que quelqu'un saurait m'aider svp ?

Merci par avance.

[Jannus]

L'exemple de l'aide (adapté, non testé):

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
// Déclaration des variables
NomCheminFichier est une chaîne
IdFichier est un entier
// Sélection du nom et du chemin du fichier
NomCheminFichier = ("c:\mes projets\gestemps\gestemps\tva.txt")
// Ouverture du fichier
IdFichier = fOuvre (NomCheminFichier, foLectureEcriture )
// Affichage du message d'erreur si l'ouverture n'a pas été effectuée
SI IdFichier = -1 ALORS
   Erreur(ErreurInfo( errMESSAGE ))
SINON
   // Traitements dans le fichier ouvert
   champ=fLitLigne(IdFichier)
   // Fin de traitements
FIN

Tes erreurs :
L'ID du fichier est un entier pas un booléen
Tu utilises les erreurs HF

[Xsara 167 cv]

Je vais tester ça et je te remercie par avance.

[Xsara 167 cv]

Ca fonctionne merci. Il n'y a plus d'erreur. Désolé de demander tout ça mais je débute sous windev...

Encore une petite question. maintenant que le fichier tva.txt est lu, comment écrire ce que j'ai lu dans un fichier tva.fic ? Il faut que je fasse une boucle ?

[Jannus]

Tu ouvres les 2 fichiers
Tu fais une boucle (TANQUE NOT EOF() par exemple)
:début
Tu lis une ligne du .txt
Tu ajoutes les données (formattées en fonction des rubriques) dans le fichier HF avec HAjoute()
:Fin
Tu fermes les fichiers

[Xsara 167 cv]

Je vais tester ça. Merci beaucoup.