Visual Basic - Conexión Text Driver

Hola a todos, tengo una conexión a un archivo txt delimitado y separado por comas que no me funciona, aquí mi conexión

Dim rs As ADODB.Recordset
Dim cn As ADODB.Connection

Set cn = New ADODB.Connection
cn.Open "DRIVER={Microsoft Text Driver (*.txt; *.csv)};DBQ=" & App.Path & ""
Set rs = New ADODB.Recordset
rs.Open "Select * From MiArchivo.txt", cn, adOpenStatic, adLockReadOnly, adCmdText
Set DataGrid1.DataSource = rs

El caso es que muestra todos los registros pero sólo del primer campo.

El txt está en este formato

Registro-1 "0001","224.10","","","31/12/2005","3516,6","UTJE AÑO 1979", .......
Registro-2 "0002","225.10","","","16/02/2006","172774,58","INSTALACION", ...
etc.

y me muestra sólo este campo:
0001
0002
......

Agradeceré cualquier ayuda.
Gracias

Es urgente, porfi!

Grax

como te van a ayudar aqui, con la panda de aprendices de programadores que no saben lo que dicen cuando las respuestas no se corresponden con las preguntas.

si quieres que te respondan y coherentemente busca otro foro de vb los hay a montones pero la mayoria en ingles y no creo que ese sea tu problema

http://www.mvp-access.com/softjaen/articulos/texto/jet_text_isam.htm#Index1