The code below allows you to export to any type of database.

====================================================

Dim db as database
Set db = db.OpenDatabase(app.path & "Biblio.mdb")
'commented out syntax followed by working example
'db.execute "SELECT tbl.fields INTO [dbms type;DATABASE=path]. _
'[unqualified 'filename] FROM [table or tables]

db.execute "SELECT * INTO [dBase III;DATABASE="C:My Documents].[testa] FROM [authors]"