per connetterti al db access usa:
codice:
Set conn = Server.CreateObject("ADODB.Connection")
sConnect = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.Mappath("PATH DEL DATABASE") & ";"
conn.Open sConnect

per inviare mail:
codice:
set mail = Server.CreateObject("CDONTS.NewMail") 
mail.From = "INDIRIZZO MITTENTE"  'mittente esistente nel dominio
mail.Body = CORPO MESSAGGIO
mail.To = DESTINATARIO
mail.Subject = OGETTO MESSAGGIO
mail.Send 
set mail = nothing
spero di esserti stato d'aiuto