Enregistrer des parametre dans la Base de Registre ou dans un fichier
cs_CloudStrife
Messages postés
12
Date d'inscription
dimanche 10 mars 2002
Statut
Membre
Dernière intervention
14 janvier 2006
-
25 mai 2002 à 23:04
leneuf22 Messages postés 156 Date d'inscription samedi 12 janvier 2002 Statut Membre Dernière intervention 4 mars 2003 - 26 mai 2002 à 17:13
leneuf22 Messages postés 156 Date d'inscription samedi 12 janvier 2002 Statut Membre Dernière intervention 4 mars 2003 - 26 mai 2002 à 17:13
A voir également:
- Enregistrer des parametre dans la Base de Registre ou dans un fichier
- Fichier .ini - Conseils pratiques -Visual Basic / VB.NET
- Vba écrire dans un fichier texte - Conseils pratiques -Visual Basic / VB.NET
- Javascript base de données - Conseils pratiques -Javascript
- Fichier json - Conseils pratiques -Javascript
- Base de données e-commerce - Forum PHP
1 réponse
leneuf22
Messages postés
156
Date d'inscription
samedi 12 janvier 2002
Statut
Membre
Dernière intervention
4 mars 2003
1
26 mai 2002 à 17:13
26 mai 2002 à 17:13
Pour enregistrer dans un fichier :
dim fichier as integer
fichier = freefile
open "c:\fichier.txt" for output as #fichier
print #fichier, "ce que tu veux enregistrer sur la ligne 1"
print #fichier, "ce que tu veux enregistrer sur la ligne 2"
print #fichier, "ce que tu veux enregistrer sur la ligne 3"
'et caetera...
close #fichier
pour lire un fichier :
dim fichier2 as integer, ligne1 as string, ligne2 as string, ligne3 as string
fichier2 = freefile
open "c:\fichier.txt" for input as #fichier2
line input #fichier2, ligne1 'met la 1ère ligne dans ligne1
line input #fichier2, ligne2 'met la 2ème ligne dans ligne2
line input #fichier2, ligne3 'met la 3ème ligne dans ligne3
'et caetera...
close #fichier2
dim fichier as integer
fichier = freefile
open "c:\fichier.txt" for output as #fichier
print #fichier, "ce que tu veux enregistrer sur la ligne 1"
print #fichier, "ce que tu veux enregistrer sur la ligne 2"
print #fichier, "ce que tu veux enregistrer sur la ligne 3"
'et caetera...
close #fichier
pour lire un fichier :
dim fichier2 as integer, ligne1 as string, ligne2 as string, ligne3 as string
fichier2 = freefile
open "c:\fichier.txt" for input as #fichier2
line input #fichier2, ligne1 'met la 1ère ligne dans ligne1
line input #fichier2, ligne2 'met la 2ème ligne dans ligne2
line input #fichier2, ligne3 'met la 3ème ligne dans ligne3
'et caetera...
close #fichier2