codice:
Dim DB 
Set DB = Server.CreateObject("ADODB.Connection")
DB.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.MapPath("/mdb-database/archivio.mdb")
Ricordati sempre di distruggere la connessione a fine pagina...

Roby