| |||
base de datos ayuda hola, tengo una paguina en asp con registro de participantes en base de datos, pero no se que e echo mal ya que dos personas pueden registrar el mismo nick, si alguien sabe como solucionarlo agradeceria la ayuda.gracias. |
| ||||
Más explicito, usando la SQL de pempas, haríamos: set mr = miconxion.open(SQL) If mr.eof or mr.bof then ' sentencias para añadir otro registro, esto ya lo tienes tú cotnrolado Else response.write "Error. El usuario ya existe" End if mr.close set mr = nothing |
| |||
aver quiero hacer una pagina que antes de insertar los datos en la base de datos, quiero que me compruebe el campo e mail para que no este ya registrado y si lo esta no te permita registrar ese email este es el codigo de la paguina que tengo echa, pero me da este error HTTP 500.100. Error interno del servidor: error de ASP Servicios de Internet Information Server -------------------------------------------------------------------------------- Información técnica (para personal de soporte técnico) Tipo de error: Error de compilación de Microsoft VBScript (0x800A03F3) Se esperaba '=' /sitios/smnchat/intdatos.asp, línea 50, columna 26 set Registros.execute(SQL) pongo el codigo de la paguina en el siguiente mensage que aqui no me cabe, si alguien me puede ayudar se lo agradeceria.gracias |
| |||
este es el codigo de la paguina. <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=windows-1252"> <title>SMNChat- Home</title> <link href="estilos.css" rel="stylesheet" type="text/css"> </head> <body> <% 'no cache Response.addHeader "pragma", "no-cache" Response.CacheControl = "Private" Response.Expires = 0 'Recupero los datos del formulario y los introduzco en sus respectivas variables ses=session("inses") nombre=request.form("nombre") apellidos=request.form("apellidos") email=request.form("email") nick=request.form("nick") pass=request.form("pass") direccion=request.form("direccion") ciudad=request.form("ciudad") provincia=request.form("provincia") pais=request.form("pais") telf=request.form("telf") cp=request.form("cp") estadocivil=request.form("estadocivil") sexo=request.form ("sexo") ocupacion=request.form("ocupacion") intereses=request.form("intereses") 'si telf, ocupacion o intereses estan vacios añade un if telf=""then telf=" "end if if ocupacion="" then ocupacion=" " end if if intereses=""then intereses=" " end if 'consulta SQL SQL="Select EMAIL From USUARIOS where EMAIL="&email 'creo el objecto ADOB Set conexion=Server.CreateObject("ADOB.Connection") 'abro la conexion conexion.open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="&Server.MapPath("db0001/db0001.mdb") 'Ejecuto la Consulta SQL set Registros.execute(SQL) 'si no encuantra coincidencia if Registros.eof or Registros.bof then 'inserto la consulta sql en la variable Consul Consul="INSERT INTO USUARIOS (NOMBRE,APELLIDOS,EMAIL,DIRECCION,CIUDAD,PROVINCIA ,PAIS,CP,TELF,OCUPACION,SEXO,ESTADOCIVIL,INTERESES ,NICK,PASS) VALUES ('"&nombre&"','"&apellidos&"','"&email&"','"&direc cion&"','"&ciudad&"','"&provincia&"','"&pais&"','" &cp&"','"&telf&"','"&ocupacion&"','"&sexo&"','"&es tadocivil&"','"&intereses&"','"&nick&"','"&pass&"' )" 'Creo el objeto conexion Set Conn=Server.CreateObject("ADODB.Connection") 'Abro la conexion a la base de datos Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="&Server.MapPath("db0001/db0001.mdb") 'Ejecuto la consulata Sql de entrada de datos set rs=Conn.execute(Consul) 'cierro conexion Conn.close set rs=nothing set conn=nothing 'si no redirecciono else response.Redirect("plantilla.asp") end if 'cierro conexion conexion.close set Registros=nothing set conexion=nothing %> <table height="62" cellSpacing="0" cellPadding="1" width="777" align="center" border="0" bgcolor="#000000"> <tbody> <tr> <td align="right" width="299"> <p align="center"><strong><font color="#FFFFFF" face="tahoma" size="1">SMNChat</font></strong></p> </td> <td align="right" width="474"><img src="img/smnchat.gif" width="468" height="60"></td> </tr> </tbody> </table> <table borderColor="#000000" cellSpacing="1" cellPadding="3" width="777" align="center" bgColor="#000000" border="0"> <tbody> <tr> <td width="143" align="left" borderColor="#000000" bgColor="#6487DC" class="text"><%if ses="" then%> <a href="iniciarses.asp" class="text"><strong>Iniciar Sesion </strong></a> <%else%> <a href="cerrar.asp" class="text"><strong>Cerrar Sesion</strong></a> <%end if%></td> <td width="611" colSpan="3" align="right" borderColor="#000000" bgColor="#6487DC" class="texteblanc"><a href="Home.asp" class="text">Pagina principal</a> | <a href="javascript:window.external.addfavorite('http ://www.aldeavirtual.com/byte/smnchat/Home.htm','SMNChat System Message Network')" class="text">Agregar mis favoritos</a> | <a href="Helpdesk.htm" class="text">Helpdesk</a> | <a href="mailto:[email protected]" class="text">Contáctese</a></td> </tr> <tr vAlign="top"> <td width="143" bgColor="#6487DC"> <table cellSpacing="0" cellPadding="3" width="142" bgcolor="#000000"> <tr> <td width="142" height="19" bgcolor="#FF9900"> <p class="text">Menú</p> </td> </tr> </table> <table width="142" border="0" cellspacing="0" cellpadding="0"> <tr> <td>- <a href="Home.asp" class="text">Pagina principal</a> <br> <span class="link">- </span><span class="link"><a href="Conducta.asp" class="text">Código De Conducta</a></span><br> <span class="link">- <a href="Staff.asp" class="text">Staff</a> <br> - <a href="create.asp" class="text">Crea tu Sala</a> <br> - <a href="inforegistro.asp" class="text">Registrarse</a></span></td> </tr> </table> <p> </p> <p> </p> <table cellSpacing="0" cellPadding="3" width="142" bgcolor="#000000"> <tbody> <tr> <td width="142" height="19" bgcolor="#FF9900"> <p class="text">Categorías</p> </td> </tr> </tbody> </table> <p align="left" class="MsoNormal" style="tab-stops: 36.0pt; mso-layout-grid-align: none; text-autospace: none; margin-left: 3.6pt; margin-right: .9pt; margin-top: 0cm; margin-bottom: .0001pt"><a href="General.asp" class="text">General</a> -</p> <p align="left" class="MsoNormal" style="tab-stops: 36.0pt; mso-layout-grid-align: none; text-autospace: none; margin-left: 3.6pt; margin-right: .9pt; margin-top: 0cm; margin-bottom: .0001pt"><a href="Informatica.asp" class="text">Informática</a> -</p> <p align="left" class="MsoNormal" style="tab-stops: 36.0pt; mso-layout-grid-align: none; text-autospace: none; margin-left: 3.6pt; margin-right: .9pt; margin-top: 0cm; margin-bottom: .0001pt"><a href="Scripting.asp" class="text">Scripting</a> -</p> <p align="left" class="MsoNormal" style="tab-stops: 36.0pt; mso-layout-grid-align: none; text-autospace: none; margin-left: 3.6pt; margin-right: .9pt; margin-top: 0cm; margin-bottom: .0001pt"><a href="Urbanos.asp" class="text">Chat Urbanos</a> -</p> <p align="left" class="MsoNormal" style="tab-stops: 36.0pt; mso-layout-grid-align: none; text-autospace: none; margin-left: 3.6pt; margin-right: .9pt; margin-top: 0cm; margin-bottom: .0001pt"><a href="Adolescentes.asp" class="text">Adolescentes</a> -</p> <p align="left" class="MsoNormal" style="tab-stops: 36.0pt; mso-layout-grid-align: none; text-autospace: none; margin-left: 3.6pt; margin-right: .9pt; margin-top: 0cm; margin-bottom: .0001pt"><a href="Religion.asp" class="text">Religión</a> -</p> <p align="left" class="MsoNormal" style="tab-stops: 36.0pt; mso-layout-grid-align: none; text-autospace: none; margin-left: 3.6pt; margin-right: .9pt; margin-top: 0cm; margin-bottom: .0001pt"><a href="Noticias.asp" class="text">Noticias</a> -</p> <p align="left" class="MsoNormal" style="tab-stops: 36.0pt; mso-layout-grid-align: none; text-autospace: none; margin-left: 3.6pt; margin-right: .9pt; margin-top: 0cm; margin-bottom: .0001pt"><a href="Amor.asp" class="text">Amor</a> -</p> <p align="left" class="MsoNormal" style="tab-stops: 36.0pt; mso-layout-grid-align: none; text-autospace: none; margin-left: 3.6pt; margin-right: .9pt; margin-top: 0cm; margin-bottom: .0001pt"><a href="Amistad.asp" class="text">Amistad</a> -</td> <td width="455" bgColor="#ffffff"> <p align="center" class="text">Los Datos han sido introducidos correctamente, ya esta registrado puede modificar los datos de su perfil cuando usted así lo desee. </p> <p align="center" class="text">Como Usuario Registrado, usted disfruta de ciertos privilegios como el de tener un perfil personal, tambien podra entrar a las salas con su nick regsitrado, en vez de entrar como Invitado.</p> <p align="center" class="text">Usted podra modificar los datos introducidos en su perfil o eliminarlos si así lo desea. </p> <p align="center" class="text"><a href="iniciarses.asp" class="text">Para Ver su Perfi Haga click Aquí </a></p></td> <td width="144" bgcolor="#6487DC"> <table cellSpacing="0" cellPadding="0" width="142" bgcolor="#000000"> <tbody> <tr> <td width="142" height="19" bgcolor="#FF9900"> <p class="texteblanc"> <span class="text">Nuestros salones</span></p> </td> </tr> </tbody> </table> - <a href="Helpdesk.htm" class="text">HelpDesk</a> <p> </p> <table cellSpacing="0" cellPadding="0" width="142" bgcolor="#000000"> <tbody> <tr> <td width="142" height="19" bgcolor="#FF9900"> <p class="text"> Contactos</p> </td> </tr> </tbody> </table> - <a href="mailto:[email protected]" class="text">Contáctese</a> <p> </p> </td> </tr> <tr> <td class="texteblanc" align="middle" bgColor="#FF9900" colSpan="3" height="6" width="761"> <p align="center" class="text"><span class="texteblanc">© Copyright 2003-2004 </span><span class="texteblanc"><a href="home.asp" class="text">SMNChat</a> - Todos los derechos reservados</span></p> </td> </tr> </tbody> </table> </body> no me cabe entero el resto lo pongo en otro mensage |
| |||
</html> <SCRIPT language=JavaScript> function blockError(){return true;} window.onerror = blockError; </SCRIPT> <script language="JavaScript"> <!-- mensaje=" |======| .: SMNChat - System Message Network :. " function hora() { var h = new Date(); window.status="|======| " + h.getHours() +":"+ h.getMinutes() +"" +mensaje ; window.setTimeout('hora()',100); } hora() //--> </script> |