Comment enregistrer dans un fichier txt

aiimenn Messages postés 2 Date d'inscription mardi 6 décembre 2005 Statut Membre Dernière intervention 11 juin 2010 - 21 avril 2010 à 12:59
lediablo Messages postés 214 Date d'inscription mercredi 26 avril 2006 Statut Membre Dernière intervention 2 août 2012 - 21 avril 2010 à 13:23
j'ai une probléme de souvegardée l'exécution d'un programme dans un fichier .txt en vb6
s'il vous plais répond moi et donner une solution
merci.

2 réponses

cs_DARKSIDIOUS Messages postés 15814 Date d'inscription jeudi 8 août 2002 Statut Membre Dernière intervention 4 mars 2013 130
21 avril 2010 à 13:15
Salut,

Qu'est-ce que tu veux dire par "souvegardée l'exécution d'un programme dans un fichier .txt" ? Qu'est-ce que tu veux enregistrer ?

Pour enregistrer un texte dans un fichier :
Dim lFile as Long

Let lFile = FreeFile
Open "C:\tonfichier.txt" for output as #lFile
print #lFile, "texte"
Close #lFile

______________________________________

AVANT de poster votre message, veuillez lire, comprendre, et appliquer notre réglement
0
lediablo Messages postés 214 Date d'inscription mercredi 26 avril 2006 Statut Membre Dernière intervention 2 août 2012
21 avril 2010 à 13:23
bonjour aussi

lire à partir d'un fichier texte:
Dim ff As Integer, vartemp As String
Dim resu
ff = FreeFile
Open App.Path & "\test.txt" For Input As #ff
    vartemp = Input$(LOF(ff), #ff) 'ici on a lut le texte et on la stoqué dans une variable nomé vartemp
Close #ff


exrire dans un fichier texte
Dim ff As Integer
ff = FreeFile
Open App.Path & "\test.txt" For Output As #ff
Print #ff, "kikou"; 
Close #ff


ajouter une ligne
Dim ff As Integer
ff = FreeFile
Open App.Path & "\test.txt" For append As #ff
Print #ff, "kikou"; 
Close #ff
0
Rejoignez-nous