Supponendo che ti sei già connesso al database e hai già scritto la tua query usi:

rs = Nome dell'oggetto RecordSet

rs.MoveFirst
valore = rs("NomeCampo").value
Response.Write valore

rs.MoveLast
valore = rs("NomeCampo").value
Response.Write valore