Visual Basic - Error al guardar en ADO

Tengo un objeto de conexion ADO a un BD acces que creo en el formulario pral. y creo todos los objetos recordset que necesito. En otro fomulario abro un filesystem object para acceder a todo los archivos de una carpeta, mi idea es que a medida que los recorro
los grabe en la BD pero si pongo addnew le asigno los valores a los text box y hago update me da un error de que no se puede añadir una fila vacia, sin embargo si hago una prueba fuera del for each file en files lo hace bien Cual puede ser el problema???
GRACIAS!!!

Hola que tal. te dire eso depende de como esta estructurada tu DB
porque si no acepta dada de campos en blanco pues.. siemrpe te va a dar ese error hasta que llenes todos los campos manyas..?

Otra cosa tienes que abrir la tabla de esta forma para que puedas hacer un add y luego un update para que se graben los datos..

lv_sql$ = Empty
lv_sql$ = " SELECT * From VSN_INVENTARIOS "

Lrs_Tablas.Open lv_sql$, AdoDbConnect_Sql, adOpenKeyset, adLockOptimistic

With Lrs_Tablas
.AddNew
.Fields("AGENCIA_ID") = Lv_Agencia_ID
.update
end with