Visual Basic - Cargar un Txt en una Tabla de Access

Hola , nuevamente molestando, bueno tengo un archivo txt en donde guardo ( como copia de seguridad) los datos de una tabla de access, lo que quisiera saber es como cargar esos datos a la tabla (poniendo el caso de que borran el contenido de la tabla original y yo quiero restaurarla).
Gracias

hnd = FreeFile
I = 0
Open x For Input As hnd ' x es el nombre del txt
Do While Not EOF(hnd)
I = I + 1
Linea = ""
Line Input #hnd, Linea

If Trim$(Linea) = "" Then Exit Do

dun = Mid$(RTrim$(Linea), 1, 1) ' el primer 1 indica la posicion del caracter que va a contar y el segundo hasta donde

pro = Mid$(RTrim$(Linea), 2, 2)
par = Mid$(RTrim$(Linea), 4, 2)
des = Mid$(RTrim$(Linea), 4, 10)
sel = Mid$(RTrim$(Linea), 14, 8)

Adodc3.Recordset.AddNew ' aca agregas a la base de datos
Adodc3.Recordset.Fields("tipo") = dun ' asi con todos
Adodc3.Recordset.Update
Adodc3.Refresh
Loop

espero que te sirva, sino escribi de nuevo

EL GRINGO