Ouvrir un fichier txt dans un textbox [Résolu]
dsigmoun
- Messages postés
- 134
- Date d'inscription
- jeudi 31 juillet 2008
- Statut
- Membre
- Dernière intervention
- 15 février 2011
- Messages postés
- 134
- Date d'inscription
- jeudi 31 juillet 2008
- Statut
- Membre
- Dernière intervention
- 15 février 2011
A voir également:
- Txt visual
- Textbox visual basic - Meilleures réponses
- Visual basic textbox - Meilleures réponses
- Visual Basic / VB.NET : Choisir au hasard une ligne de texte d'un .txt - CodeS SourceS - Guide
- Visual Basic / VB.NET : Un loto qui prends les chiffre au hasard dans un fichier txt - CodeS SourceS - Guide
- Visual Basic / VB.NET : Cacher n'importe koi(*.txt, *.bmp, *.ico, *.dll...) dans un bmp... - CodeS S - Guide
- Visual Basic / VB.NET : Txt viewer - CodeS SourceS - Guide
- Visual Basic / VB.NET : Txt drawer d'essiné votre .txt - CodeS SourceS - Guide
4 réponses
Meilleure réponse
- Messages postés
- 843
- Date d'inscription
- mercredi 22 octobre 2003
- Statut
- Membre
- Dernière intervention
- 7 janvier 2009
Oups pardon, pas de "e" à Text :
TextBox1.Text = IO.File.ReadAllText("C:\MonFichier.txt")
TextBox1.Text = IO.File.ReadAllText("C:\MonFichier.txt")
Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire
121 internautes nous ont dit merci ce mois-ci
- Messages postés
- 13368
- Date d'inscription
- lundi 13 décembre 2004
- Statut
- Modérateur
- Dernière intervention
- 3 février 2018
<hr />
' RÉCUPÉRER LE TEXTE CONTENU DANS UN FICHIER
' http://www.codyx.org/snippet_recuperer-texte-contenu-dans-fichier_32.aspx#100
' Posté par [ Nix ] le 23/03/2006
<hr />
Public
Shared
Function
OuvrirFichierTexte(
ByVal
Chemin
As
String
)
As
String
Try
' Vous pouvez changer/retirer l'encodage
Dim
FichierStreamRead
As
New
System.IO.StreamReader(Chemin, System.Text.Encoding.GetEncoding(
"iso-8859-1"
))
Dim
ContenuFichier
As
String
=
FichierStreamRead.ReadToEnd()
FichierStreamRead.Close()
FichierStreamRead = Nothing
Return
ContenuFichier
Catch
ex
As
Exception
Return
""
End
Try
End
Function
'----------------------------------------------------------------
'Remarques :
'L'encodage est optionnel, mais généralement par défaut l'UTF-8
est par défaut et cela peut poser des problèmes
' RÉCUPÉRER LE TEXTE CONTENU DANS UN FICHIER
' http://www.codyx.org/snippet_recuperer-texte-contenu-dans-fichier_32.aspx#100
' Posté par [ Nix ] le 23/03/2006
<hr />
Public
Shared
Function
OuvrirFichierTexte(
ByVal
Chemin
As
String
)
As
String
Try
' Vous pouvez changer/retirer l'encodage
Dim
FichierStreamRead
As
New
System.IO.StreamReader(Chemin, System.Text.Encoding.GetEncoding(
"iso-8859-1"
))
Dim
ContenuFichier
As
String
=
FichierStreamRead.ReadToEnd()
FichierStreamRead.Close()
FichierStreamRead = Nothing
Return
ContenuFichier
Catch
ex
As
Exception
Return
""
End
Try
End
Function
'----------------------------------------------------------------
'Remarques :
'L'encodage est optionnel, mais généralement par défaut l'UTF-8
est par défaut et cela peut poser des problèmes