como mostrar un mensaje que me diga la direccion email ya existe.

[El_Metallick]

Claro pues fijate que habres 2 veces el RS

Código:

...
RS.Open "loginuser", Conn, 2, 3

  Rs.Open "select * from tabla where email = '" & request.form("email") & "'", Objconn
...

saludos