Once you have your data, you can build it into an SQL string, and append it to the table with the something like the following:
Code:
Sub Whatever()
Dim db As Database
Dim strSQL As String
' Define SQL statement for action query.
strSQL = "INSERT INTO tblMAIN ( Fld1, Fname) " & _
"VALUES ('Stuff', 'Bob')"
Set db = OpenDatabase("MyDB.mdb")
db.Execute strSQL
End Sub