Que esta mal en este pequeño codigo?

09/03/2006 - 22:55 por Marcos Galaviz | Informe spam
Hola a todos como veran soy novatote y no me funciona ni este pedacito de
codigo, que intento utilizar como para una pantalla de Login, alguien podria
ayudarme?

Gracias...

<html>
<body>
<form action="login.asp" method="post">
<p>Pon tu nombre:
<input type="text" name="fname">
</p>
<p>Password:
<input type="text" name="fname2">
<br>
<br>
<input type="submit" value="Submit">
</p>
</form>
<%@ Language=VBScript%>
<!-- #include file="conn_user.asp" -->
<%
Dim oRs
Set oRs = CREATEOBJECT("ADODB.RecordSet")
If Request.form("fname")<>"" Then
Response.Write ("Hola " & Request.form("fname") & "!")
oRs.Open "SELECT nombre, pass FROM users WHERE trim(nombre)='fname'", oConn
else
Response.Write ("<br>¿No existe?")
End If
%>

</body>
</html>

Preguntas similare

Leer las respuestas

#6 Marcos Galaviz
10/03/2006 - 18:02 | Informe spam
Perdonnnn ya resolvi estas dudas!!! :D mil gracias

"German Saer" escribió en el mensaje
news:_65Qf.44206$
Marcos,

Primero va este codigo (el que pusiste de ultimo) con algunos ajustes:

<%
If Request("submitpage")="Submit" Then
Dim oRs
Set oRs = Server.CREATEOBJECT("ADODB.RecordSet")
oRs.Open "SELECT nombre, pass FROM users WHERE trim(nombre)='" &
Request("fName") & "' AND trim(pass)='" & Request("fName2") & "'", oConn
If Not oRs.EOF Then
Response.Write (Request.form("fname") & " is logged on!")
else
Response.Write ("<br>¿No existe?")
End If
End If
%>

Luego tu codigo HTML tambien con unos cuantos cambios. (No lo probé pero
deberia funcionar)

<html>
<body>
<form action="login.asp" method="post">
<p>Pon tu nombre:
<input type="text" name="fname">
</p>
<p>Password:
<input type="text" name="fname2">
<br>
<br>
<input type="submit" name="submitpage" value="Submit">
</p>
</form>

lo grabas con el nombre "login.asp" y correlo. Ve a ver que tal te va.

Thanks,

_______________
German Saer
Orlando, FL 32810




"Marcos Galaviz" wrote in message
news:%
Humm pues mira lo que quiero mas bien es darle el nombre de un usuario y


un
password, que lo busque en la tabla y si lo encuentra que haga algo y si


no
pues un mensaje o algo asi :(, se que ta facil para los que saben pero


pues
es mi primera ves con ASP :( ayuda please



"Matías Iacono" escribió en el mensaje
news:%
> Que error te arroja?
>
> Que intentas hacer?
>
> Saludos.
>
> Matías Iacono
> Microsoft MVP ASP/ASP.net
> DCE3 v.2003 - DCE2 v.2005
> Coordinador de evento Comunidad MSDN Bolivia
> "Marcos Galaviz" escribió en el mensaje
> news:%23f$
>> Hola a todos como veran soy novatote y no me funciona ni este pedacito


de
>> codigo, que intento utilizar como para una pantalla de Login, alguien
>> podria ayudarme?
>>
>> Gracias...
>>
>> <html>
>> <body>
>> <form action="login.asp" method="post">
>> <p>Pon tu nombre:
>> <input type="text" name="fname">
>> </p>
>> <p>Password:
>> <input type="text" name="fname2">
>> <br>
>> <br>
>> <input type="submit" value="Submit">
>> </p>
>> </form>
>> <%@ Language=VBScript%>
>> <!-- #include file="conn_user.asp" -->
>> <%
>> Dim oRs
>> Set oRs = CREATEOBJECT("ADODB.RecordSet")
>> If Request.form("fname")<>"" Then
>> Response.Write ("Hola " & Request.form("fname") & "!")
>> oRs.Open "SELECT nombre, pass FROM users WHERE trim(nombre)='fname'",
>> oConn
>> else
>> Response.Write ("<br>¿No existe?")
>> End If
>> %>
>>
>> </body>
>> </html>
>>
>
>






email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una pregunta AnteriorRespuesta Tengo una respuesta
Search Busqueda sugerida