Exportation vers fichier TXT et XLS [Résolu]
Signaler
phk18
thierrydelepine
- Messages postés
- 4
- Date d'inscription
- vendredi 15 octobre 2004
- Statut
- Membre
- Dernière intervention
- 19 octobre 2004
thierrydelepine
- Messages postés
- 521
- Date d'inscription
- mardi 24 décembre 2002
- Statut
- Membre
- Dernière intervention
- 11 septembre 2008
A voir également:
- Forappending
- Visual Basic / VB.NET : Transfert d'un fichier as400(base de données) vers pc (txt, csv, xls) - Guide
- Incrementer une table acces et exportation vers fichier text ✓ - Forum - Visual Basic 6
- Visual Basic / VB.NET : [access vba] exporter sql vers fichier plat (csv, txt ou autre) - CodeS Sour - Guide
- Exportation des données access vers un fichier txt en VB6 ✓ - Forum - Visual Basic 6
- Exporter un fichier EXCEL vers un fichier TXT ✓ - Forum - Visual Basic 6
1 réponse
thierrydelepine
- Messages postés
- 521
- Date d'inscription
- mardi 24 décembre 2002
- Statut
- Membre
- Dernière intervention
- 11 septembre 2008
Const ForAppending = 2
MyString = "le message a ecrire"
objFSO.CreateTextFile("c:\ttresult.txt")
set objTextFile = objFSO.OpenTextFile ("c:\ttresult.txt", ForAppending, True)
objTextFile.WriteLine(MyString)
objTextFile.Close
Set objFSO = Nothing
MyString = "le message a ecrire"
objFSO.CreateTextFile("c:\ttresult.txt")
set objTextFile = objFSO.OpenTextFile ("c:\ttresult.txt", ForAppending, True)
objTextFile.WriteLine(MyString)
objTextFile.Close
Set objFSO = Nothing