Bonjour à tous,
voila j'ai un petit soucis de lecture de fichier

j'utilise le code contenu dans la faq soit à cette adresse

http://faqvbnet.developpez.com/?page...FileLineByLine

Cela fonctionne correctement si je lui passe l'adresse de mon fichier à lire en dure : c:\gnagnagna\gnignigni\fichier.txt

Mais ce que j'aimerais c'est pouvoir lire des fichiers contenus dans mes ressources
Je lui passe donc en paramètre :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
 
ReadFichierByLine(Global.chiffresetlettres.My.Resources.Recources._fichieralire)
mon path est égal au fichier lui même (donc tout son contenu) et donc la ligne
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
 
 monlecteur = New StreamReader(path)
n'est pas prise en compte et la boucle ou le with ne sont pas lancé.
et la bah ça coince, j'aimerais savoir si c'est donc possible de lire ligne par ligne des fichiers resources et si oui , comment dois je m'y prendre, je n'ai pas trouvé sur le net..

Merci de votre patience et j'espère que vous saurez me répondre.
Cordialement michael.

Si vous ne voulez pas vous casser le tronc à aller voir la faq, voici le code
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
 
Imports System.IO
 
    Public Shared Function ReadByLine(ByVal path As String) As ArrayList
        'DECLARER un lecteur de fichier 
        Dim monlecteur As StreamReader
        'DECLARER une collection pour les lignes du fichier 
        Dim meslignes As New ArrayList
        Try
            'path est le chemin complet du fichier à lire 
            monlecteur = New StreamReader(path)
            With monlecteur
                'POSITIONNER le flux au début du fichier 
                .BaseStream.Seek(0, SeekOrigin.Begin)
                'TANT QUE le lecteur a quelquechose à lire 
                While (.Peek > 0)
                    'LIRE une ligne du fichier et l'ajouter à meslignes 
                    meslignes.Add(.ReadLine)
                End While
            End With
        Catch ex As Exception
            Console.WriteLine(ex.Message)
        Finally
            'FERMER le lecteur en tout etat de cause 
            monlecteur.Close()
        End Try
        Return meslignes
    End Function
bien sur l'import est avant ma classe, et j'ai fait tous les tests, ça fonctionne vraiment bien que si j'ai le chemin en dur..
Merci d'avance pour votre aide