Stocker des variables dans un fichier texte [Résolu]

Halarin 6 Messages postés lundi 20 novembre 2006Date d'inscription 25 mars 2007 Dernière intervention - 24 mars 2007 à 12:22 - Dernière réponse : Halarin 6 Messages postés lundi 20 novembre 2006Date d'inscription 25 mars 2007 Dernière intervention
- 25 mars 2007 à 01:27
Bonjour,

Je cherche désèspérement le moyen de stocker des variables dans un fichier .txt et que au lancement du programme, il vérifie ces variables et execute la suite.

Est-ce que quelqu'un sait comment faire

Merci d'avance!
Afficher la suite 

9 réponses

Répondre au sujet
PCPT 13368 Messages postés lundi 13 décembre 2004Date d'inscription 3 février 2018 Dernière intervention - 24 mars 2007 à 19:03
+3
Utile
salut,

(codyx.org)

Dim fileContents As String
fileContents = My.Computer.FileSystem.ReadAllText("C:\Test.txt")

++
Prenez un instant pour répondre à [infomsg_SONDAGE-POP3-POUR-CS_769706.aspx ce sondage] svp
Cette réponse vous a-t-elle aidé ?  
Commenter la réponse de PCPT
mortalino 6812 Messages postés vendredi 16 décembre 2005Date d'inscription 21 décembre 2011 Dernière intervention - 24 mars 2007 à 12:28
0
Utile
Salut,

rencarde toi sur Open ... For Input pour lire, et Open ... For Append pour écrire.

@++


  --Mortalino--
Le mystérieux chevalier, "Provençal, le Gaulois"
<!--
Commenter la réponse de mortalino
Halarin 6 Messages postés lundi 20 novembre 2006Date d'inscription 25 mars 2007 Dernière intervention - 24 mars 2007 à 12:39
0
Utile
Je viens d'essayer, mais je comprend pas la syntaxe d'Open... For Input et d'Open ... For Append.
Commenter la réponse de Halarin
mortalino 6812 Messages postés vendredi 16 décembre 2005Date d'inscription 21 décembre 2011 Dernière intervention - 24 mars 2007 à 12:49
0
Utile
' ***** Lire : *****




'      
Déclarations variables:


Dim 
sContenu 
As String


Dim 
ff 
As Integer

   
'      
Attribution d 'un numéro de fichier libre
ff = FreeFile

'       Lecture et stockage de tous le texte dans une
variable
Open sUrl For Input As #ff
    sContenu = Input$(LOF(ff), #ff)
Close #ff

'=================================================================






' ***** Ecrire : *****






'       Déclarations variables:


Dim 
sLigne2 
As String


Dim 
ff 
As Integer

   
'       Attribution d 'un numéro de fichier libre
ff = FreeFile
sLigne2 = "Ligne 2"

'       Lecture et stockage de tous le texte dans une
variable
Open sUrl For Append As #ff
    Print #ff, "Test ligne 1"
    Print #ff, sLigne2
Close #ff



~ <small>[code.aspx?ID=39466 Mortalino] ~
Colorisation automatique</small>

@++


  --Mortalino--
Le mystérieux chevalier, "Provençal, le Gaulois"
<!--
Commenter la réponse de mortalino
Halarin 6 Messages postés lundi 20 novembre 2006Date d'inscription 25 mars 2007 Dernière intervention - 24 mars 2007 à 12:54
0
Utile
Super merci beaucoup!

++
Commenter la réponse de Halarin
Halarin 6 Messages postés lundi 20 novembre 2006Date d'inscription 25 mars 2007 Dernière intervention - 24 mars 2007 à 14:16
0
Utile
Re-salut,

Je viens de taper le code dans VB mais il me dit qu'il y a plusieurs erreurs, les voilà:

++
Commenter la réponse de Halarin
mortalino 6812 Messages postés vendredi 16 décembre 2005Date d'inscription 21 décembre 2011 Dernière intervention - 24 mars 2007 à 14:22
0
Utile
Arf, et oui, t'es en Dotnet. Mais je ne suis pas encore à 100% en VB 2005 donc je ne peux t'aider. Désolé, j'avais pas fais gaffe à la rubrique

@++


  --Mortalino--
Le mystérieux chevalier, "Provençal, le Gaulois"
<!--
Commenter la réponse de mortalino
Halarin 6 Messages postés lundi 20 novembre 2006Date d'inscription 25 mars 2007 Dernière intervention - 24 mars 2007 à 14:35
0
Utile
Ok pas grave, merci quand même!

++

Je re-formule ma question autrement, j'ai quatre variable Integer que l'utilisateur entre la première fois, j'aimerais donc pouvoir les stocker dans un .txt  et que a chaque fois qu'on lance le programme, il vérifie ces variables. Si elle sont là, il continue l'exécution et si elles n'y sont pas, il demande à l'utilisateur de les réintroduire.

Est-ce possible?
Commenter la réponse de Halarin
Halarin 6 Messages postés lundi 20 novembre 2006Date d'inscription 25 mars 2007 Dernière intervention - 25 mars 2007 à 01:27
0
Utile
Merci beaucoup PCPT!

Le code fonctionne à merveille.

++
Commenter la réponse de Halarin

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.