Visual Basic - subir archivos planos delimitados

ola espero me puedan orientar mi problema es el siguiente:debo subir un archivo plano a una tabla por medio de visual lo hize con un archivo pero con otro que esta delimitado por coma no logro subirlo me sale este error"erro 62 en tiempo de ejecucion la entrada de datos ha sobrepasado el final del archivo"
este es el codigo
Open "E:TRICOTTRICOT.CSV" For Input As #2
Do Until EOF(2)
Input #2, emisor, rut_financiado, tms, fecha, hora, rut_cliente, codigo_iswitch, codigo_emisor, monto, cuotas, semana, ComisionIva, Costo_Tx_Iva, MontoaPago
Loop
'bd.CommitTrans
'cnn1.Open
'SQL = " exec limpiatricot "
'Set respuesta = cnn1.Execute(SQL)
a = MsgBox("ARCHIVO SUBIDO CORRECTAMENTE", vbInformation, "correcto")
Close canalapertura
gracias

El delimitador de campos para archivos planos, VB lo guarda en el registro en el valor "Format". Seguramente en el registro de la máquina estará como "Delimited(,)" y como el delimitador de los archivos csv es el punto y coma (;) no hace la separación de campos.

Tienes entre otras estas opciones:
1.- Sustituir en el archivo el punto y coma por una coma con la función Replace con el riesgo que esto conlleva si un campo tiene por medio una coma, o
2.- Modificar en el registro el valor Format a "Delimited(;)" o a "Delimited(,)" según el tipo de archivo que quieras abrir.

Hay una tercera opción más profesional que es hacer lo del punto 2 pero por código, leyendo primero el registro y si el delimitador no coincide, modificar el valor y una vez listado el archivo volverlo a dejar como estaba.

gracias por tu respuesta consulta donde cambio ese valor en la configuracion regional del equipo????

NO, en la configuración regional, no!!

Dije en el registro del Windows.

y como llego a ese registro???? me di una vuelta por el registro y no lo pille

es bastante sencillo;

te vas al menú Inicio -> "Ejecutar" y en Abrir le escribes "Regedit"
una vez que ya estás en el editor del registro pulsa Ctrl+B y en el cuadro de texto "Buscar" escribes:

Delimited

Buscará en todo el registro esa palabra, y al final te saldrá:

HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Jet \3.5\Engines\Text

Busca la clave "Format" y haz doble click sobre ella, y en el cuadro de diálogo modifica el valor.

el valor que tiene el format es tabdelimited que valor debo dejar ? un punto y coma";" es asi de simple??

No, le tienes que poner

"Delimited(;)"

Tal como está <Delimited_abreparéntesis_puntoycoma:cierraparéntesis> Sin las comillas

así de simple.