defini la base
y la tabla a utilizar
luego empezas a mostrar registros
------------------
<html>
<%
Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open("DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("TuNombredeBase.mdb"))
%>
<%
SQL = "SELECT * FROM TuNombredeTabla"
Set objRS = oConn.Execute(SQL)
if objRS.bof and objRS.eof then
Response.write "no hay registros que mostrar."
else
%>
<%
while (not objRS.Eof)
%>
<p><%=objRS("NombreDeCampodeLaBase")%></p>
<%
objRS.MoveNext
wend
%>
<%
end if
objRS.Close
set objRS = nothing
oConn.Close
set oConn = nothing
%>