ecco,l'ho scritta:

<%
Dim DBConn
Set DBConn = Server.CreateObject("ADODB.Connection")
strConn= "driver=(Microsoft Access Driver (*.mdb); dbq=" & Server.MapPath ("database/db_prova.mdb"))
DBConn.Open strConn
DBConn.Close
Set DBConn=Nothing
%>

nn devo dirti che nn funzia ovviamente vero?