probleme importation donneés fichier a une bd via vb.net

salut tous le monde !

aider mois svp !  

j'ai un probleme dans mon application de stage
je doit  importer des donneés d' un fichier texte vers une base de données acces (le code est  vb.net)
le probleme c'est  que l'mportation marche bien mais elle importe une seul ligne de fichier  a la table de la base de données(la première ligne)
voila le code :

 

Dim monStreamReader AsNew StreamReader("C:\essai.txt")

Dim ligne, nom, prenom, age,MyTab()   AsString

ligne = monStreamReader.ReadLine

Dim insertion_FIN As OleDbTransaction

 

MyTab = Split(ligne, "|")

DoUntil  ligne =nothing

ligne = monStreamReader.ReadLine

 

nom= MyTab(0)

prenom= MyTab(1)

age= MyTab(2)

myconn.Open()
mycomm.CommandText = "insert into personnes(nom,prenom,age) values ('" & nom & "' ,'" & prenom & "','" & age &  "')"

mycomm.Transaction = insertion_FIN

mycomm.ExecuteNonQuery()

ligne = monStreamReader.ReadLine

 

Loop

monStreamReader.Close()

*****************************le fichier texte essai.txt***************************************
Nom1|Prenom1|Age1
Nom2|Prenom2|Age2

j'attend  vous reponses  mes amis !!

Salut,
Si tu essayés plutôt ta boucle de cette manière ?

While monStreamReader.EndOfStream = False
   
   nom= MyTab(0)
   prenom= MyTab(1)
   age= MyTab(2)

   myconn.Open()
   mycomm.CommandText = "insert into personnes(nom,prenom,age) values ('" & nom & "' ,'" & prenom & "','" & age &  "')"
   
   mycomm.Transaction = insertion_FIN
   mycomm.ExecuteNonQuery()

End While

Aussi le myconn.Open()  met le avant d'entrer dans la boucle l'erreur peut également venir de la si tu ouvres la connexion à chaque itération.

il me soulinge sur

While monStreamReader.EndOfStream = False

l'objet  monStreamReader.   ne contient pas EndOfStream

Oui cette propriété est une nouveauté du framework 2.0
Remplace par ceci par la méthode Peek exemple ci-dessous.

While monStreamReader.Peek() >= 0
......
End While

toujours le meme probleme mon ami il insere une seul ligne

Fait le tourner en mode debug tu verras mieux comment sa se passe.
Quelle est la valeur de 'ligne' quand tu rentres pour la 1ière fois ?
As-tu une erreur quelque part ?

Un truc m'étonne :

Dans le premier code, le split de la ligne est en dehors de la boucle...

A+

Alain 31

Lol, c'est clair asecher, c'est sa le problème, il split qu'une fois alors il ne fait l'enregistrement de la même ligne à chaque itération.
Mais comment j'ai pu passé à côté....

oui j'ai courigé l'erreu et j'ai fait la split dans la boucle mais il me donne un autre probleme  dans 

mycomm.ExecuteNonQuery()