Los Foros de ASPTutor.com
Home | Perfil | Registrarse | Temas Activos | Miembros | Buscar | FAQ
Usuario:
Password:
 Todos los Foros
 ASP
 problemas con formulario de nuevo usuario
 Foro Bloqueado  Tema Bloqueado


Autor Temas
juglarmrr
Starting Member

España
23 Posts
Mensajes - 29 Oct 2004 :  17:50:07  Ver Perfil  Enviar Email
Buenas,tengo he creado un formulario para ingresar "nombre de usuario" pero cuando repito un usuario,logicamente me dice que está duplicado en la base de datos, pero no me sale poner un mensaje que ese usuario ya está repetido.
También he pensado poner en la contraseña un mínimo de 5 caracteres, como se pondría esto.
Gracias y espero noticias

Henrydesousa
New Member

Venezuela
88 Posts
Posted - 30 Oct 2004 :  20:49:52  Ver perfil  Enviar e-mail
"no me sale poner un mensaje que ese usuario ya está repetido.". Te refieres a que no puedes mandar un mensaje al usuario?. Hazlo con un response.write("tu mensaje"), o si prefieres con javascript alert("tu mensaje").
Podrias mandar tu codigo y asi seria mas facil ayudarte.

"También he pensado poner en la contraseña un mínimo de 5 caracteres, como se pondría esto."
Te refieres a poner un maxlentgh de 5 a la caja de texto?
hazlo asi:
<input type="text" name="txtContrasena" maxlength="5">
Con la propiedad maxlength pones el maximo de caracteres si a eso te refieres.
Ahh disculpa no recuerdo muy bien como se escribe maxlentgh pero se que va por ahi. Saludos.

Henry de SousaInicio Pagina

juglarmrr
Starting Member

España
23 Posts
Posted - 01 Nov 2004 :  22:26:11  Ver perfil  Enviar e-mail
Este el el código cuando se quieren dar de alta, pero cuando repiten el "nombre usuario" sale error, por haber datos duplicados, para que salga un mensaje que ese usuario ya está cogido y no de error, como sería. Gracias
<%
if request.form("usuario")<>"" then
set conexion=server.createobject("adodb.connection")
conexion.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("data\datos.mdb"))
inSQL="INSERT INTO usuarios (usuario,clave) values ('"&request.form("usuario")&"','"&request.form("clave")&"')"
conexion.execute(inSQL)

end if
%>Inicio Pagina

ASP_MEXICO
Starting Member

Mexico
23 Posts
Posted - 02 Nov 2004 :  04:23:57  Ver perfil  Enviar e-mail
Hola:

Prueba este código, espero te sirva.


<%
Usuario = Request.Form("Usuario")
Clave = Request.Form("Clave")
Set ADOConexion=Server.CreateObject("ADODB.Connection")
Set rsRecordset=Server.CreateObject("ADODB.Recordset")
strConexion="DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("data\datos.mdb")
strSQL = "SELECT * FROM [Usuarios] Where Usuario = '"&Usuario&"'"
ADOconexion.Open strConexion
rsRecordset.Open strSQL,ADOConexion, 0, 2
If rsRecordset.EOF Then
'El usuario no existe, así que lo registramos
rsRecordset.AddNew
rsRecordset.Fields("Usuario") = Usuario
rsRecordset.Fields("Clave") = Clave
rsRecordset.Update
Response.Write "¡Sus datos fueron almacenados exitosamente!"
Else
'Alto, este nombre de usuario ya está en uso
Response.Write "El Usuario " & Usuario & " ya existe en la Base de Datos.<br><br>"
Response.Write "Por favor <a href='javascript:history.back()'>elija otro</a>."
End If
rsRecordset.close
Set rsRecordset = Nothing
ADOConexion.Close
Set ADOConexion = Nothing
%>


Saludos!

No te caería mal, pensar en ser autodidácta antes de visitar estos foros.Inicio Pagina

juglarmrr
Starting Member

España
23 Posts
Posted - 02 Nov 2004 :  22:50:10  Ver perfil  Enviar e-mail
gracias, por el código, funciona, pero el response:
Response.Write "¡Sus datos fueron almacenados exitosamente!"
me sale del principio,he probado otras cosas pero no sale, para que salga una vez que he metido los registros.
Habría alguna forma que al meter un dato repetido, no aumente el id en la tabla.
Gracias por todo

Inicio Pagina

   
 Foro Bloqueado  Tema Bloqueado
Ir a:
Los Foros de ASPTutor.com Los Foros de ASPTutor.com
Ir al principio de la Página

 Imprimir Tema
 

Descargas de manuales¦ Ejemplos de código ¦ Artículos mas visitados ¦ Envía tu articulo ¦ Foros ¦
  Libro de visitas ¦Crea un enlace con ASPTutor 
 

    © 2001-Hasta hoy  Pedro Rufo Martín  contactar