Utilisation des fichiers

Question

Salut,
je suis d&#233;butant en VB.net, et je voulais savoir comment acc&#233;der &#224; un fichier (mode al&#233;atoire) en lecture...
En ecriture,&#231;a bien march&#233; avec filePut ,mais l'ouverture  avec fileGet non.

cs_dan80 · Answer

regarde ca :

Sub FichierTexte(ByVal NomFichier As String)
    Dim sr As System.IO.StreamReader
    Dim sw As System.IO.StreamWriter
    Dim sLine As String
    Try
        If Not File.Exists(NomFichier) Then
            'Le fichier n'existe pas. On le cr&#233;e
            sw = New StreamWriter(NomFichier)
            sw.WriteLine("Bonjour. Il nous sommes le {0} et il est {1} ", _
DateTime.Now.ToLongDateString, _
DateTime.Now.ToLongTimeString)
            sw.Close()
            sw = Nothing
            'Remarque : On peut utiliser sw = File.AppendText(NomFichier) pour ajouter
            'du texte &#224; un fichier existant
        End If
        'Ouverture du fichier et Ecriture du contenu du fichier sur la console
        sr = New StreamReader(NomFichier)
        Console.WriteLine("Debut du fichier")
        sLine = sr.ReadLine()
        While Not sLine Is Nothing
            Console.WriteLine(sLine)
            sLine = sr.ReadLine()
        End While
        Console.WriteLine("Fin du fichier")
    Finally
        'Fermeture streamreader
        If Not IsNothing(sr) Then sr.Close()
        'Fermeture streamwriter
        If Not IsNothing(sw) Then sw.Close()
    End Try
End Sub

fait moi signe si tu r&#233;ussi

cs_dan80 · Answer

pour plus d'infos sur vb.net va voir sur http://faqvbnet.developpez.com

Utilisation des fichiers

2 réponses

Discussions similaires