Write #, EOF

[Abel]

Bonjour le forum,

Je suis en train de me casser la tête pour inscrire des données dans un fichier texte en accès séquentiel.

En résumé :
Open fichier for outpout ....
Write #1, mes info
Close #1

Mon problème est que je me retrouve systématiquement avec un fichier avec un seul enregistrement.
Je cherche le moyen d'ajouter les enregistrements sans écraser ce qui existe.
Doit y avoir du End Of File par là dessous.

Je n'arrive pas à trouver la bonne syntaxe.

Faut peut être passer par un Input jusqu'à EOF avant ?

Enfin bref.

A vous lire les aminches.

Abel.

 

[bricolo]

Bonjour Abel ,
au lieu de output , essaie donc append : tes données s'inscriront à la fin du fichier .
Quand tu utilises output , tu repars du début .

Bon courage

 

[Abel]

Re,

Trop facile !

Merci bricolo.

C'était pour faire ça (cf pj).

Un petit utilitaire destiné à compter les entrées de personnes dans un magasin.
A ajouter dans le classeur de macros perso par exemple.

Je vous le mets en pj à toutes fins utiles.

Merci encore.

Abel

 

[bricolo]

Re,
Ta procedure compte fonctionne très bien . Testes la plusieurs fois en direct et regardes ensuite ton fichier .
En revanche , c'est au démarrage que ça plante problème d'index au niveau du set . Mais là , je ne maitrise pas assez bien pour te répondre tout de suite .
A bientôt

 

[Abel]

Re,

Effectivement.
Par feignantise (c'est fait pour ça l'informatique, non ?), j'avais utilisé l'enregistreur pour la ligne de code de création du bouton.
Et il se trouve que dans ma barre "Formatting", j'ai 23 boutons.

Je revoie donc ma procédure pour passer par une création de barre d'outil avant création de bouton. Ca évitera ce genre de problème.

Je remettrai le résultat en ligne.

A+

Abel

 

[Abel]

Re,

Après modif.

A la place de "msoBarRight" on peut mettre "msoBarTop".

Une autre solution aurait consisté à compter les boutons dans une barre d'outil visible et d'y adjoindre un bouton suppémentaire.

Je regarderai ça une autre fois.

Abel

 

[bricolo]

re,
Très bien , il y a un moment que je voulais m'y mettre , ce sera une bonne occasion pour commencer .
Passes une bonne soirée

bricolo

 

[Abel]

Bonjour tout le monde,

Merci bricolo, la soirée fut bonne.

Et pour finir, une autre approche.

Toujours à mettre dans le classeur de macro perso mais avec un fonctionnement en pressant F3 qui ne sert à rien.
Plus de bouton et je trouve que c'est plus pratique.

Abel