Discussion :

[warubi]

Bonjour a tous ! J'aimerais par exmple remplacer le 3eme ligne
d'un fichier et la remplacer par "developpez.com" mais je sais comment comment on fait ! Pouvez-vous m'aider

[Aspic]

Une idée serait de créer un autre fichier. Ensuite tu lis ligne à ligne ton fichier et lorsque tu arrives à la 3eme ligne au lieu de l'ecrire dans le new fichier, tu ecris "Developpez.com".

C'est pas forcement la bonne solution mais ca marche !

[ptit_tof]

Salut voici un exemple qui n'est surement pas le meilleur :

Private Sub test()
'Déclaration d'un tableau pour contenir les données précédentes
Dim MonTableau(3) As String

'Si le fichier existe, on l'ouvre on et assigne les valeurs des lignes au tableau
Try
'Déclaration d'un stream en lecture
Dim strRead As New System.IO.StreamReader("c:\test.txt")

MonTableau(0) = strRead.ReadLine()
MonTableau(1) = strRead.ReadLine()
MonTableau(2) = strRead.ReadLine()

'Fermeture du stream
strRead.Close()
Catch
End Try

'Déclaration d'un stream en lecture
Dim strWrt As New System.IO.StreamWriter("c:\test.txt")

'Ecriture des valeurs contenu dans le tableau
strWrt.WriteLine(MonTableau(0))
strWrt.WriteLine(MonTableau(1))
strWrt.WriteLine("Developpez.com")
strWrt.Close()

End Sub

A+ Tof

[Aspic]

J'ai eu exactement la meme idée mais le code est trop lourd ...