Faut utiliser le composant ADOX.
Exemple :
' tu crées ta tables avec ses champs
set tbl = server.createobject("adox.table")
tbl.Name = "Export"
tbl.Columns.Append "SiteID", adSmallInt
tbl.Columns.Append "SiteNom", adLongVarWChar
tbl.Columns.Append "SiteListeAttributNom", adLongVarWChar
tbl.Columns.Append "SiteListeAttributValeur", adLongVarWChar
' connection à ta base de données
set cnn = server.createobject("ADODB.Connection")
cnn.Provider = "Microsoft.Jet.OLEDB.4.0"
' le Type=5 correspond à 2000, Type=4 correspond à 97
cnn.Open "Jet OLEDB:Engine Type=5;Data Source=NomDeTaBase.mdb"
' tu ajoutes la table que tu viens de créer à ta base
cnn.Tables.Append tbl
Si tu veux remplir cette table, tu fais comme d'hab : tu te connectes, tu construis ta requête SQL et tu l'exécutes (après avoir créer ta table bien sûr!!)