Consultas de access?. Simplemente tienes que conectarte a la base de datos. Puedes crear un DSN de sistema y utilizar el siguiente codigo:
<%
set cnn = server.createObject("adodb.connection")
ser rstable = server.createObject("adodb.recordset")
cnn.open "midsn"
miconsulta = " select * from mitabla "
rstable.open miconsulta, cnn
%>
Este es un codigo orientativo de ejemplo, hay muchos más, segun que tipo de consulta quieras hacer.