Ver Mensaje Individual
  #1 (permalink)  
Antiguo 19/02/2005, 00:06
Zerg
 
Fecha de Ingreso: enero-2003
Ubicación: punta arenas
Mensajes: 65
Antigüedad: 22 años, 4 meses
Puntos: 0
borrar una id autonumerica

Amigos del foro, tengo el siguiente codigo:

borrar_registro.asp

<%
Set con = Server.CreateObject("ADODB.Connection")
Con.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("../db/base.mdb")&";"
%>

<FORM METHOD="POST" ACTION="borrar.asp">
Nombre<br>
<%
sql = "SELECT * FROM alumnos ORDER BY id DESC"
Set RS = con.Execute(sql)
%>
<select name="id ">
<%do while not RS.eof%>
<option><%=RS("id ")%>
<%RS.movenext
loop
%>
</select>
<br>
<INPUT TYPE="SUBMIT" value="Borrar">
</FORM>


borrar.asp

<HTML>
<HEAD>
<TITLE>Borrar.asp</TITLE>
</HEAD>
<BODY>
<%
id =Request.Form("id ")
Set con = Server.CreateObject("ADODB.Connection")
Con.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("../db/base.mdb")&";"
sql="Delete From alumnos Where id ='" & id & "'"
set RS = con.Execute(sql)
%>

<h1><div align="center">Registro Borrado</div></h1>
<div align="center"><a href="borrar.asp">Visualizar el contenido de la base</a></div>

<%
con.Close
%>
</BODY>
</HTML>


EL PROBLEMA ES EL SIGUIENTE, CUANDO EL ID ES, AUTONUMERICO Y/O ID PRINCIPAL O CON UN NOM_BRE CON GUIN BAJO. NO ME FUNCIONA EL CODIGO. PERO CUANDO EL ID NO TIENE NINGUNA PROPIEDAD ESPECIAL, YA SEA SOLO UN CAMPO DE TEXTO O NUMERICO Y UN NOMBRE SIN GUION BAJO. FUNCIONA CORRECTAMENTE.


MI PREGUNTA ES, ¿EXISTE OTRA FORMA DE BORRAR REGISTROS, QUE TENGAN COMO PROPIEDADES O NOM_BRES ESPECIALES? O ¿SE PUEDE MEJORAR ESTE CODIGO?

Última edición por Zerg; 19/02/2005 a las 00:07