Acceuil  vb.net(687) La manipulation de fichiers texte (VB.Net)
|
| La manipulation de fichiers texte (VB.Net) |
2011-05-16 |
|
Tout d'abord je précise que l'espace de noms concerné est System.IO, il faudra donc l'importer pour utiliser ses différentes classes. Pour cela il faut ajouter cette ligne de code :
Imports System.IO
System.IO permet la lecture et l'écriture de fichiers et de flux de données.
Les méthodes qui vont nous être utiles sont fournies par deux classes, qui sont, File et FileInfo.
Nous allons également utiliser deux autres classes de l'espace de noms System.IO : StreamReader et StreamWriter. Leur rôle est en relation avec leur nom, StreamReader permet, en effet, de lire un flux de caractères depuis un fichier, StreamWriter, vous l'aurez compris, permet l'écriture.
Code permettant la lecture du contenu d'un fichier texte :
Sub lectureFichier( ByVal fichier As String)
Try
' Création d'une instance de StreamReader pour permettre la lecture de notre fichier
Dim As StreamReader = New StreamReader(Server.MapPath(fichier))
Dim ligne As String
'Lecture de toutes les lignes et affichage de chacune sur la page
Do
ligne = monStreamReader.ReadLine()
Response.Write(ligne)
Response.Write(balise html pour la saut de ligne )
Loop Until ligne Is Nothing
'Fermeture du StreamReader (attention très important)
monStreamReader.Close()
Catch ex As Exception
'Code exécuté en cas d'exception
Response.Write("Une erreur est survenue au cours de la lecture !")
Response.Write( "Balise html pour la saut de ligne")
Response.Write(ex.Message)
End Try
End Sub
Appel de la fonction permettant la lecture du fichier, vous pouvez voir qu'on passe le chemin relatif du fichier en paramètre.
lectureFichier( "./admin/logs/application.log")
Voilà le code permettant d'écrire dans un fichier texte :
Sub ecritureFichier(ByVal fichier As String)
Try
'Instanciation du StreamWriter avec passage du nom du fichier
Dim monStreamWriter As StreamWriter = New StreamWriter(Server.MapPat("./") & "adminlogs" & fichier)
'Ecriture du texte dans votre fichier
monStreamWriter.WriteLine("Ma toute première ligne...")
monStreamWriter.WriteLine("Ma seconde ligne...")
monStreamWriter.WriteLine("Ma troisième ligne...")
'Fermeture du StreamWriter (Trés important)
monStreamWriter.Close()
Catch ex As Exception
'Code exécuté en cas d'exception
Response.Write(ex.Message)
End Try
End Sub |
| Commentaires des visiteurs : |
|
| meriam |
merci.a ce site car il contient des informations qui nous aide a bien comprendre |
|
|
|
Avenue des F.A.R. Rsidence Niama N6 - Ttouan (Maroc)