Maybe can use RecordSet to retrieve records an then insert. Even you can have control of your inserted records,etc..
Something like
con=CreateObject("ADODB.Connection")
cStropen="" && put the connection string to the Access file
con.open(cStropen)
rs=CreateObject("ADODB.Recordser")
rs.open("myaccesfile",con,,,2)
DO While !rs.EOF
m.vffield1=rs.fields("accfield1").value
m.vffield2=rs.fields("accfield2").value
.
.
Insert into myvfptable from memvar
ENDDO
Juan C.
"Anyone who has never made a mistake has never tried anything new." A.E
"The important thing is not to stop questioning. Curiosity has its own reason for existing." A.E