cs_Jacky7
Messages postés63Date d'inscriptionmardi 13 mai 2008StatutMembreDernière intervention22 juin 2011
-
4 déc. 2008 à 17:25
Profil bloqué -
4 déc. 2008 à 17:48
Bonjour à tous,
Voilà mon problème, j'aimerais écrire dans un fichier texte (CSV) mais je ne comprend pas comment faire pour incrementer les lignes de mon fichier texte (et pas réecrire à chaque fois sur les memes lignes)
Voila mon bout de code :
Private Sub Command1_Click()
Dim f As Integer
f = FreeFile
Open "c:\monfichier.csv" For Output As #f
Print #f, "petit texte"
Print #f, "yes"
Print #f, "ok"
Close #f
End Sub
Serait-il possible de remplacer ce #f par un chiffre que je pourrai incrémenter à chaque écriture ?
Est-ce que quelqu'un aurait une idée ??
Le fichier csv est bien créé avec les 3 lignes (j'ai testé avec Excel qui ouvre les fichiers .csv)
Le #f n'a rien à voir avec les numéros de ligne
C'est le numéro de canal sous lequel est ouvert le fichier et on utilise Freefile pour trouver un canal libre pour ce fichier
Voir l'aide en ligne de VB pour Print #
La théorie, c'est quand on sait tout et que rien ne fonctionne. La pratique, c'est quand tout fonctionne et que personne ne sait pourquoi.
Le fichier csv est bien créé avec les 3 lignes (j'ai testé avec Excel qui ouvre les fichiers .csv)
Le #f n'a rien à voir avec les numéros de ligne
C'est le numéro de canal sous lequel est ouvert le fichier et on utilise Freefile pour trouver un canal libre pour ce fichier
Voir l'aide en ligne de VB pour Print #
La théorie, c'est quand on sait tout et que rien ne fonctionne. La pratique, c'est quand tout fonctionne et que personne ne sait pourquoi.