Discussion :

[Titiso]

Bobjour,
Je lis un fichier texte avec objStreamReader.ReadLine, et je voudrais mettre chaque ligne (il y en a 3) dans des variables, et je n'arrive à le faire que pour la première :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
objStreamReader = New StreamReader(System.IO.Directory.GetCurrentDirectory + "\chemin.txt") 
strLigne = objStreamReader.ReadLine 
strCheminBase = strLigne 
Do While Not strLigne Is Nothing 
strLigne = objStreamReader.ReadLine 
strListingExcel = strLigne 
Loop 
objStreamReader.Close()

Je récupère bien la 1ere ligne dans strCheminBase, mais je n'ai rien dans strListingExcel alors que j'ai bien une deuxième ligne dans mon fichier txt.
Si vous pouvez m'aider...Merci beaucoup
Titi

[Graffito]

Avec des parenthèses ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Do While Not (strLigne Is Nothing)

[Mario Rousson]

Moi je procède ainsi

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Dim StrRap() As String = File.ReadAllLines(Chemin)

[Titiso]

Moi je procède ainsi

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Dim StrRap() As String = File.ReadAllLines(Chemin)

Finalment j'ai fait :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Dim list As New List(Of String) 'créons une collection de String List(Of String): Elle est typée car elle ne peut contenir que des 'String'.
 
        list = IO.File.ReadAllLines(System.IO.Directory.GetCurrentDirectory + "\chemin.txt").ToList
        strCheminBase = list(0)
        strListingExcel = list(1)
        strDossierEtiq = list(2)