peut etre existe t-il une autre facon de lire le contenu de mopn file dans un textbox ou autre???? je suis perdu
-----Message d'origine----- bonjour,
jai cree un textbox et je voudrais que celui ci affiche
le
contenu d'un fichier. En fait definir la source du textebox comme le contenu d'un fichier,
ca vous parle aplus .
Zoury
Salut Jp! :O)
Il n'y a pas de propriété built-in qui permette de lier un TextBox à un fichier texte. Tu dois lire le fichier toi même et copié son contenu dans le TextBox.
Jète un oeil sur cette fonction qui renvoit le contenu d'un fichier, ça devrait te mettre sur la bonne piste : '*** Private Function ReadFile(ByRef sFile As String) As String
Dim hFile As Long
' On obtient un handle de fichier libre hFile = FreeFile ' On ouvre le fichier en mode binaire Open sFile For Binary As #hFile ' On prépare le buffer qui recevra les données ReadFileBinary = String$(LOF(hFile), Chr$(0)) ' On lit le contenu du fichier Get #hFile, , ReadFile ' On ferme le fichier Close #hFile
End Function '***
-- Cordialement Yanick Lefebvre - MVP pour Visual Basic http://faq.vb.free.fr/?rubrique=0 - http://www.mvps.org/vbnet/ http://www.mentalis.org/agnet/apiguide.shtml - http://www.mztools.com/ "jp" wrote in message news:5d3601c42dbe$a798c660$
bonjour,
jai cree un textbox et je voudrais que celui ci affiche le contenu d'un fichier. En fait definir la source du textebox comme le contenu d'un fichier,
ca vous parle aplus
Salut Jp! :O)
Il n'y a pas de propriété built-in qui permette de lier un TextBox à un
fichier texte. Tu dois lire le fichier toi même et copié son contenu dans le
TextBox.
Jète un oeil sur cette fonction qui renvoit le contenu d'un fichier, ça
devrait te mettre sur la bonne piste :
'***
Private Function ReadFile(ByRef sFile As String) As String
Dim hFile As Long
' On obtient un handle de fichier libre
hFile = FreeFile
' On ouvre le fichier en mode binaire
Open sFile For Binary As #hFile
' On prépare le buffer qui recevra les données
ReadFileBinary = String$(LOF(hFile), Chr$(0))
' On lit le contenu du fichier
Get #hFile, , ReadFile
' On ferme le fichier
Close #hFile
End Function
'***
--
Cordialement
Yanick Lefebvre - MVP pour Visual Basic
http://faq.vb.free.fr/?rubrique=0 - http://www.mvps.org/vbnet/
http://www.mentalis.org/agnet/apiguide.shtml - http://www.mztools.com/
"jp" <anonymous@discussions.microsoft.com> wrote in message
news:5d3601c42dbe$a798c660$a501280a@phx.gbl...
bonjour,
jai cree un textbox et je voudrais que celui ci affiche le
contenu d'un fichier. En fait definir la source du
textebox comme le contenu d'un fichier,
Il n'y a pas de propriété built-in qui permette de lier un TextBox à un fichier texte. Tu dois lire le fichier toi même et copié son contenu dans le TextBox.
Jète un oeil sur cette fonction qui renvoit le contenu d'un fichier, ça devrait te mettre sur la bonne piste : '*** Private Function ReadFile(ByRef sFile As String) As String
Dim hFile As Long
' On obtient un handle de fichier libre hFile = FreeFile ' On ouvre le fichier en mode binaire Open sFile For Binary As #hFile ' On prépare le buffer qui recevra les données ReadFileBinary = String$(LOF(hFile), Chr$(0)) ' On lit le contenu du fichier Get #hFile, , ReadFile ' On ferme le fichier Close #hFile
End Function '***
-- Cordialement Yanick Lefebvre - MVP pour Visual Basic http://faq.vb.free.fr/?rubrique=0 - http://www.mvps.org/vbnet/ http://www.mentalis.org/agnet/apiguide.shtml - http://www.mztools.com/ "jp" wrote in message news:5d3601c42dbe$a798c660$
bonjour,
jai cree un textbox et je voudrais que celui ci affiche le contenu d'un fichier. En fait definir la source du textebox comme le contenu d'un fichier,
