
10/09/2002, 10:44
|
| | Fecha de Ingreso: julio-2002
Mensajes: 106
Antigüedad: 22 años, 9 meses Puntos: 0 | |
Re: registro de usuarios nuevos asi mira, esta es la forma en que yo lo hago, solo debes ajustarlo a tu tabla usuarios.
'se verifica que el nombre de empresa no sea repetido
set conn=conecta()
set rs = CreateObject("ADODB.Recordset")
sql="Select usu_nombre from usuarios"
rs.Open sql, conn
if (rs.eof) then
nombre="nuevo"
else
while not (rs.eof)
if lcase(trim(rs("usu_nombre")))=lcase(trim (request("usu_nombre"))) then
nombre="repetido"
End if
rs.movenext
Wend
end if
rs.close
set rs=nothing
desconecta(conn)
if nombre="repetido" then
%>
<script language="VBScript">
<!--
r=msgbox("Ya existe un usuario de nombre <%=request("usu_nombre")%>, elija otro nombre de usuario para el nuevo usuario ",VbInformation,"ERROR")
location.href="ing_nuevo_usuario.asp"
-->
</script>
<% response.end
end if
Se supone que esta es la segunda pagian, osea donde se reciben los datos del formulario, por eso comparo lo del request con lo que sacod e la base de datos pa cachar si el nombre se repite. si lo queris mas refinado, usa el like de sql.
chaum.
;) ;) ;)
<html>
<head>
<title></title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<body bgcolor="#FFFFFF" text="#000000">
<img src="http://pukem.face.ubiobio.cl/sapi/gta2.jpg">
"And Remember...Respect is everything. |