Ouvrir un fichier txt à partir un bouton de comande

Signaler
Messages postés
54
Date d'inscription
lundi 30 décembre 2002
Statut
Membre
Dernière intervention
15 août 2007
-
Messages postés
232
Date d'inscription
samedi 11 mai 2002
Statut
Membre
Dernière intervention
27 octobre 2007
-
J'ai créé une feuille FORM sur laquelle j'ai placé un bouton de commande et une TEXTBOX. Je voudrai qu'en cliquant sur ce bouton, mon fichier texte (c:\note.txt) s'ouvre dans ma TEXTBOX. Pouvez-vous me dire quelles sont les lignes de commande à écrire. Merci

1 réponse

Messages postés
232
Date d'inscription
samedi 11 mai 2002
Statut
Membre
Dernière intervention
27 octobre 2007

alors pour ca, il faut faire:
dim ligne as string
open "c:\note.txt" for input as #1
do while not eof(1)
line input #1,ligne
textbox.text=textbox.text & ligne
loop
close #1

open ouvre le fichier(close ben, il le ferme), et on attribue au fichier ouvert un numero(regarde l aide pour plus d info)
eof correspond au end of file(fin de fichier)
line input permet d obtenir la ligne du fichier lu
on concatene ligne a ligne ...et le tour est joué!

voila
++
psycho :-p
0