Pequeño error en código para entrar con passwords

[Fr@Nc3$c0]

Tengo este breve código para conseguir crear entrar con password a la página web, pero no puedo, me da error en la línea 8: "ERROR DE SÍNTAXIX EN LA CADENA USUARIO='PEPE' "

<% nom = Request.Form("login")
password = Request.Form("password")

Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "bms.es.bms"
SQLQuery = "SELECT Usuario FROM datauser WHERE usuario='" & nom & ""
Set RS1 = Conn.Execute(SQLQuery)

If RS1.BOF AND RS1.EOF then
Response.Redirect("error_usuario.htm")
End If

SQLQuery = "SELECT Clave FROM datauser WHERE Clave='" & password & ""
Set RS2 = Conn.Execute(SQLQuery)

If RS2.BOF AND RS2.EOF then
Response.Redirect("error_password.htm")
End If

Response.Redirect("entrada_aceptada.htm" )

RS1.Close
RS2.Close
Conn.Close
%>



Por favor si alguien puede modificar o hacer alguna mejora o ayudarme en el código este que no lo dude, gracias de antemano.


Yo al llamar al RS1 no la utilizo, en vez de llamarla no se podría comparar directamente con el de la base de datos, como lo harían ustedes señores, un reto xDD.


Fr@Nc3$c0