pasar un archivo txt a una tabla de access

[Jose_minglein]

Oye, ya se hace que hace tiempo de este post, pero es que yo estoy intentando hacer algo como eso, y cada fichero.readline() se me come 2 o tres líneas, además pasa de los acentos y creo que de algún otro carácter.

¿Por qué puede ser todo esto? Mi codigo:

Dim p As String = ruta
Dim a As New System.IO.StreamReader(p)
Dim texto As String
dim arr as arraylist= new arraylist()
texto = a.ReadLine
While Not texto Is Nothing
arr.add(texto)
texto = a.ReadLine()
End While

a.Close()