Modifier fichier texte
cs_Sylvain93
Messages postés
42
Date d'inscription
jeudi 30 mai 2002
Statut
Membre
Dernière intervention
27 avril 2011
-
30 mai 2002 à 16:29
GtommarC Messages postés 37 Date d'inscription lundi 20 mai 2002 Statut Membre Dernière intervention 25 avril 2003 - 31 mai 2002 à 18:05
GtommarC Messages postés 37 Date d'inscription lundi 20 mai 2002 Statut Membre Dernière intervention 25 avril 2003 - 31 mai 2002 à 18:05
A voir également:
- Modifier fichier texte
- Fichier .ini - Conseils pratiques -Visual Basic / VB.NET
- Fichier json - Conseils pratiques -Javascript
- Vba écrire dans un fichier texte - Conseils pratiques -Visual Basic / VB.NET
- Souligner texte illustrator - Forum Graphisme/design
- Crypter un fichier texte ✓ - Forum Visual Basic
3 réponses
GtommarC
Messages postés
37
Date d'inscription
lundi 20 mai 2002
Statut
Membre
Dernière intervention
25 avril 2003
30 mai 2002 à 22:05
30 mai 2002 à 22:05
Private Sub Command1_Click()
Dim maconstante As String
Dim mavariable As String
Dim fi As Integer
Dim intfiecriture As Integer
intfi = FreeFile
nomfichier = "c:\temp\essai.txt"
Open (nomfichier) For Input As intfi
intfiecriture = FreeFile
nomfichier = "c:\temp\essai1.txt"
Open (nomfichier) For Append As intfiecriture
Line Input #intfi, maconstante
Do While Not EOF(intfi)
Line Input #intfi, mavariable
Print #intfiecriture, maconstante & mavariable
Loop
Close
End Sub
j'ai fait l'essai
GtommarC
Dim maconstante As String
Dim mavariable As String
Dim fi As Integer
Dim intfiecriture As Integer
intfi = FreeFile
nomfichier = "c:\temp\essai.txt"
Open (nomfichier) For Input As intfi
intfiecriture = FreeFile
nomfichier = "c:\temp\essai1.txt"
Open (nomfichier) For Append As intfiecriture
Line Input #intfi, maconstante
Do While Not EOF(intfi)
Line Input #intfi, mavariable
Print #intfiecriture, maconstante & mavariable
Loop
Close
End Sub
j'ai fait l'essai
GtommarC
cs_Sylvain93
Messages postés
42
Date d'inscription
jeudi 30 mai 2002
Statut
Membre
Dernière intervention
27 avril 2011
31 mai 2002 à 09:26
31 mai 2002 à 09:26
Merci ca marche!
Mais peux ton rajouté une virgule entre COMPUWORLD ET BLN5705.
Merci
Mais peux ton rajouté une virgule entre COMPUWORLD ET BLN5705.
Merci
GtommarC
Messages postés
37
Date d'inscription
lundi 20 mai 2002
Statut
Membre
Dernière intervention
25 avril 2003
31 mai 2002 à 18:05
31 mai 2002 à 18:05