Forums Últimos mensajes - Powered by IBM
 
Tags Palabras claves

Que esta mal en este pequeño codigo?

09/03/2006 - 22:55 por Marcos Galaviz | Informe spam
Ayuda Hacer una pregunta
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 debateRespuesta 6 respuestasRespuesta Tengo una respuesta

Preguntas similare

Leer las respuestas

#1 Marcos Galaviz
10/03/2006 - 00:09 | Informe spam
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>





Respuesta Responder a este mensaje
#2 German Saer
10/03/2006 - 03:02 | Informe spam
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>
>>
>
>


Respuesta Responder a este mensaje
#3 Matías Iacono
10/03/2006 - 03:09 | Informe spam
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>

Respuesta Responder a este mensaje
#4 Marcos Galaviz
10/03/2006 - 17:37 | Informe spam
Perdon por tantas dudas pero que significado tiene la & aqui?

"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>
>>
>
>






Respuesta Responder a este mensaje
#5 Marcos Galaviz
10/03/2006 - 17:42 | Informe spam
German de antemano gracias pero con tu codigo me sale este error:

Información técnica (para personal de soporte técnico)

a.. Tipo de error:
Error de compilación de Microsoft VBScript (0x800A03EA)
Error de sintaxis
/fox/Login.asp, línea 7, columna 64
oRs.Open "SELECT nombre, pass FROM users WHERE trim(nombre)='" &
^


"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>
>>
>
>






Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaSiguiente Respuesta Tengo una respuesta
Search Busqueda sugerida