Ouvrir un fichier txt dans un textbox [Résolu]
dsigmoun
134
Messages postés
jeudi 31 juillet 2008Date d'inscription
15 février 2011
Dernière intervention
-
17 nov. 2008 à 15:54 - Dernière réponse :
dsigmoun
134
Messages postés
jeudi 31 juillet 2008Date d'inscription
15 février 2011
Dernière intervention
- 18 nov. 2008 à 12:35
- Ouvrir un fichier txt dans un textbox
- Comment ouvrir un fichier txt dans une textbox ? » Forum - Visual Basic
- Comment ouvrir un fichier *.txt dans une TextBox » Forum - Visual Basic
- Ouvrir contenu d un fichier txt dans une textbox » Forum - Visual Basic
- Comment faire pour ouvrir un deuxieme fichier TXT dans un Textbox ? » Forum - Visual Basic
- Ouvrir un fichier txt avec un common dialogue » Codes sources - Visual Basic / VB.NET (Texte)
4 réponses
Répondre au sujet
<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
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.