Asp y sql
Hola amigos
Tengo el siguiente problema: tengo el siguiente código en asp, y lo que pasa es que la condición del primer y segundo if no funciona(y los valores si son iguales cuando lo pruebo)... ¿qué tengo mal?, saludos!
<%
dim pass , matricula, conexionicg, sql, rs
set pass=Request.Form("pass")
set matricula=Request.Form("matricula")
Set conexionicg = Server.CreateObject("ADODB.Connection")
set rs=server.CreateObject("ADODB.Recordset")
conexionicg.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("icgbd.mdb"))
sql="SELECT * FROM Usuarios"
rs.Open sql,conexionicg
while rs.EOF=false
if rs.Fields("Clave")=matricula then
if rs.Fields("Pass")=pass then
Response.Write("Matricula: ")
Response.Write(rs.Fields("Clave")&"<br>")
Response.Write("Password: ")
Response.Write(rs.fields("Pass"))
else
Response.Write("Pass Incorrecto")
end if
end if
rs.MoveNext
wend
conexionicg.Close
%>
Tengo el siguiente problema: tengo el siguiente código en asp, y lo que pasa es que la condición del primer y segundo if no funciona(y los valores si son iguales cuando lo pruebo)... ¿qué tengo mal?, saludos!
<%
dim pass , matricula, conexionicg, sql, rs
set pass=Request.Form("pass")
set matricula=Request.Form("matricula")
Set conexionicg = Server.CreateObject("ADODB.Connection")
set rs=server.CreateObject("ADODB.Recordset")
conexionicg.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("icgbd.mdb"))
sql="SELECT * FROM Usuarios"
rs.Open sql,conexionicg
while rs.EOF=false
if rs.Fields("Clave")=matricula then
if rs.Fields("Pass")=pass then
Response.Write("Matricula: ")
Response.Write(rs.Fields("Clave")&"<br>")
Response.Write("Password: ")
Response.Write(rs.fields("Pass"))
else
Response.Write("Pass Incorrecto")
end if
end if
rs.MoveNext
wend
conexionicg.Close
%>
1 respuesta
Respuesta de wiseguy44
1