Fichier INI
JLV1975
Messages postés
55
Date d'inscription
jeudi 16 octobre 2003
Statut
Membre
Dernière intervention
15 septembre 2006
-
30 mars 2005 à 12:12
Fullnet Software Messages postés 90 Date d'inscription vendredi 23 juillet 2004 Statut Membre Dernière intervention 27 août 2006 - 30 mars 2005 à 14:34
Fullnet Software Messages postés 90 Date d'inscription vendredi 23 juillet 2004 Statut Membre Dernière intervention 27 août 2006 - 30 mars 2005 à 14:34
1 réponse
Fullnet Software
Messages postés
90
Date d'inscription
vendredi 23 juillet 2004
Statut
Membre
Dernière intervention
27 août 2006
1
30 mars 2005 à 14:34
30 mars 2005 à 14:34
j'en ai un pour toi: [heureusement]
ca c'est un mode d'écriture:
Open App.Path & "/options.ini" For Output As #1
Write #1, Text5.Text, Text6.Text, Text7.Text
Close #1
End Sub
dans cela, j'écris les valeur de texte des textbox 5, 6, et 7
App.path c'erst l'emplacement du programmme (ton logiciel)
pour lire ce petit code et "l'importer":
Open App.Path & "/options.ini" For Input As #3
Dim parm8 As String 'déclaration des variables
Dim parm9 As String
Dim parm10 As String
Input #3, parm8, parm9, parm10
Close #3
'affectation des variables a leur textbox
Text5.Text = parm8
Text6.Text = parm9
Text7.Text = parm10
Donc si t'a des question n'hésite pas...
p-s: noublie jamis de fermer le fichier avec close #3 (ou le chiffre avec lequel tu a "nommé" le fichier... Donc n'oublie jamias de ne pas ouvrir deux fichier en même temps avecle même numéro, sinon tout est beau tu peut ouuvrir en meme temps...
pour changer le numéro, il suffi de changer tout les numéro à coté du signe # dans la procédure
bye et @+
Une tarte au pommes sans pommes n'est pas une tarte aux pommes.... mais une tarte à... RIEN!
ca c'est un mode d'écriture:
Open App.Path & "/options.ini" For Output As #1
Write #1, Text5.Text, Text6.Text, Text7.Text
Close #1
End Sub
dans cela, j'écris les valeur de texte des textbox 5, 6, et 7
App.path c'erst l'emplacement du programmme (ton logiciel)
pour lire ce petit code et "l'importer":
Open App.Path & "/options.ini" For Input As #3
Dim parm8 As String 'déclaration des variables
Dim parm9 As String
Dim parm10 As String
Input #3, parm8, parm9, parm10
Close #3
'affectation des variables a leur textbox
Text5.Text = parm8
Text6.Text = parm9
Text7.Text = parm10
Donc si t'a des question n'hésite pas...
p-s: noublie jamis de fermer le fichier avec close #3 (ou le chiffre avec lequel tu a "nommé" le fichier... Donc n'oublie jamias de ne pas ouvrir deux fichier en même temps avecle même numéro, sinon tout est beau tu peut ouuvrir en meme temps...
pour changer le numéro, il suffi de changer tout les numéro à coté du signe # dans la procédure
bye et @+
Une tarte au pommes sans pommes n'est pas une tarte aux pommes.... mais une tarte à... RIEN!
