Visual Basic - Importar .txt a Access con Visual

Por favor URGENTE necesito importar datos de un archivo de texto a Access con Visual Basic 6.0, no se como se hace y necesito un poco de orientación.

Patricio

Si cada línea del archivo de texto corresponde a un registro (no se si se trata de longitud fija o variable) y en cada línea tienes los campos separados por comas, lo puedes separar así:

Dim Registros As Variant, Campos As Variant

Registros = Split(FileToString(\"MiArchivo.txt\"),vbCrLF)

For i=LBound(Registros) To UBound(Registros)
Campos = Split(Registros(i),\",\")

For j=LBound(Campos) To UBound(Campos)

Next j
Next i

Una vez que lo tienes ya separado depende del mecanismo de acceso a datos que utilices (ADO, DAO, RDO) agregas los registros a la tabla y sus campos.

Public Function FileToString(FileName As String) As String
On Error GoTo ErrorHandler
Dim hlngFile As Long, strFile As String
hlngFile = FreeFile
Open FileName For Binary Access Read As hlngFile
FileToString = vbNullString
strFile = String(FileLen(FileName), \" \")
Get hlngFile, , strFile
Close hlngFile
FileToString = strFile
Exit Function
ErrorHandler:
FileToString = Empty
End Function