Estimado EUDELORIA, esto es muy fácil de hacer. Simplemente ponés un formulario en la página con un campo que se llame por ejemplo: email y después haces un select en base a ese email. O sea:
Dim useremail
useremail = Request.form("email")
if useremail <> "" then
Dim strSql, rs, i
strSql = "SELECT * FROM Usuarios WHERE Email = '" & useremail & "'"
'Acá agregás todo el código de conexión a tu base de datos y abrís el recordset, por ej:
rs.open strSql, conexionactiva, 0, 1
'y ahora mostrás el valor de los campos
for i = 0 to rs.Fields.Count-1
Response.write rs.Fields(i).Name & ": " & rs.Fields(i) & "<br>"
next
'y cerrás y destruís el recordset y la conexión como es nuestra buena costumbre
rs.Close
Set rs = Nothing
'etc, etc
Viste que es simple? Probalo y después me contás