AccDNSLess

<%
' dichiaro la variabile che conterra' l'oggetto Connection

Dim conn
'creo l'oggetto Connection

Set conn = Server.CreateObject("ADODB.Connection")
'apro la connessione con la fonte di dati

conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="&Server.MapPath("/data/database.mdb")
%>