Lire un fichier et en retirer des infos

Commenter

Contenu du snippet

voila une fontion qui vous permet de lire un fichier en retournant un string contenant la totalité du ficher.
et voila ses deux petites soeurs qui vous aident à en retirer les infos
attention ces fonctions sont parametrées celon mais besoins à vous de les modifiés celon vos besoins

Source / Exemple : 


Function lecture(ByVal path As String) As String

        Dim file As New StreamReader(path) 'Ouvre le fichier 

        Dim test As String = "0"

        While Not test = "" 'La boucle s'arrête dès qu'il y a une ligne vide

            test = file.ReadLine()

            lecture += test

        End While

        file.Close()

    End Function

  Function decoupage(ByVal texte As String, ByVal cle As String) As String
        Dim i As Integer
        Dim section() As String
        Dim subsection As String

        decoupage = ""
        section = texte.Split(";")
        For i = 0 To section.Length() - 1
            If Not section(i) = section(i).Replace(cle, "") Then
                subsection = section(i).Replace(cle, "")
                decoupage = subsection.Substring(2)
            End If
        Next
    End Function

    Function getValeur(ByVal Texte As String, ByVal cle As String) As String
        Dim tab() As String
        Dim cleValeur() As String
        Dim i As Integer

        getValeur = ""
        tab = Texte.Split(",")
        For i = 0 To tab.Length() - 1
            cleValeur = tab(i).Split("=")
            If Not cleValeur(0) = cleValeur(0).Replace(cle, "") Then
                getValeur = cleValeur(1)
            End If
        Next
    End Function

A voir également

S'inscrire maintenant

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.

Du même auteur (tribals)