Ajout 2 lignes de texte

Question

Bonjour a tous, 
comme vous pouvez le constater je ne suis aps expert mais j'utilise de temps autre VB6 afin de realiser quelques script pour mes utilisateurs....
Je me retrouve confront&#233; a un petit soucis tout bete..
Je cherche a ajouter 2 ligne en entete d'un fichier texte, ces ligne seront toujours les memes ...
Une fonction ou autre puvant m'aider car j'ai beau naviguere et rechercher, je ne truve pas reponse a ma (naive) question.
Par avnace merci pour votre aide
-------------------------------------------
Have fun
Cordialement.
Hacktiviste

jrivet · Answer

Salut,

C est &#233;tonnant que tu n'ai rien trouv&#233; avec le moteur de recherche.

Private Const MonEntete As String = "Ceci est Mon Entete" & vbCrLf & "____________"



Private Sub EcritEntete(StrFichier As String)
   Open StrFichier For Output As #1
      Print #1, MonEntete
   Close #1


End Sub


Private Sub Form_Load()
Call EcritEntete("C:	est.txt")
End Sub

@+, Julien 
Pensez: Moteur de Recherche, R&#233;ponse Accept&#233;e

cs_DARKSIDIOUS · Answer

Hum, tu n'a pas du chercher bien longtemps, ce genre de question revient au moins 1 fois par semaine sur le forum... Et les réponses qui sont données à chaque fois : lecture complète du fichier, puis écriture des deux lignes, et enfin, réecrire toutes les lignes lues dans le fichier. Voir ici : http://www.vbfrance.com/recherche.aspx?r=ecrire+txt&tr=tout _ Avant de poster dans le forum, prière d'aller lire ceci : http://www.codes-sources.com/reglement.aspx

 · Answer

Hop merci beaucoup pour vos reponses rapide.
Bonne soir&#233;e a tous...

-------------------------------------------
Have fun
Cordialement.
Hacktiviste

Ajout 2 lignes de texte

3 réponses

Discussions similaires