prueba asi
Código:
<%
Set oConn = Server.CreateObject("ADODB.Connection")
oConn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" &Server.MapPath("usuarios.mdb")
set Recorset = Server.CreateObject("ADODB.Recordset")
SQL="SELECT count(*) FROM Tabla1 WHERE"
Recorset=oConn.execute(SQL)
de todas formas tu sql esta incompleto
"SELECT count(*) FROM Tabla1 WHERE cuantos......."