Necesito ayuda para eliminar (YA SOLUCIONADO)

[TonyChile]

Hola les cuento lo que pasa es que necesito eliminar un registro de una base de datos sql server 2000 por intermedio de una pagina asp. pero no lo consigo hacer ya que no se como si se agrega el "num_serie" que es el que debo ver si existe para eliminarlo. lo haga ya pero no consigo entrar al else, el boton creo que esta mal ya que solo envia un mensaje pero no pasa al else por lo tanto no elimina los datos que necesito.

este es el codigo:

Código:

<%
if num_serie3 = "" then
%>
<form method="post" action="eliminacelular.asp"  >
<table width="318" border="2" align="center" cellpadding="1" cellspacing="0" name="tabla2"> 

  <tr><td colspan=6 align="center" class="Estilo5">Ingrese el N&uacute;mero de Serie que desee eliminar</td>
  </tr>
  <tr><td colspan="6" height=5></td></tr>

  <tr>
     <td width="38%" nowrap class="Estilo4">N&uacute;mero de Serie:&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;</td>
     <td colspan="2">
           <input name="text23" size="25" maxlength="15">
        <BR>
     </td>
  </tr>

  <tr>
     <td colspan="6" align="center">
         <input type="submit" name="Eliminar" value="&nbsp;&nbsp;Eliminar&nbsp;&nbsp;" onClick="return window.confirm('Eliminar el registro')">
     </td>
     <td width="13%"></td>
     </tr>
</table>    

</form>
<%
else
  dim obj_conn3, sql3_3,num_serie3
  
  num_serie3 = request.Form("text23") ' NOMBRE DEL CAMPO EN EL FORMULARIO
  sql3_3 = "delete * from CELULAR  where NUM_SERIE ='" & num_serie3& "'" 'LOS AVIA PUESTO MAL PERO AHORA ESTAN COMO DEBEN ESTAR
  set obj_conn3 = server.createobject ("ADODB.Connection")
  obj_conn3.open "CELULAR"
  obj_conn3.execute sql3_3
  obj_conn3.Close
  set obj_conn3 = Nothing
%>
   <center><h3>Datos Eliminados</h3></center>
<%
End if

espero que me puedan ayudar gracias

[sonick2006]

a ver, segun esta linea:

sql3_3 = "delete * from CELULAR where num_serie3 ='" & NUM_SERIE & "'"

debo suponer que el campo en tu base de datos se llama num_serie3 y el campo del formulario se llama NUM_SERIE

ahora bien tambien estas declarando una variable llamada num_serie3 en la que almacenas el contenido del formulario

num_serie3 = request.Form("NUM_SERIE")

entonces deberias cambiar esta linea

sql3_3 = "delete * from CELULAR where num_serie3 ='" & NUM_SERIE & "'"

por esta otra

sql3_3 = "delete * from CELULAR where num_serie3 ='" & num_serie3 & "'"

suerte

[TonyChile]

Gracias sonick2006 por la respuesta ahora que me respondiste me di cuenta que me equivoque avia puesto los nombres al revez.

Pero sabes el problema persiste aun no me elimina nada me sale el mensaje del onclick pero no pasa nada.
Ya que veo en la base de datos y no a eliminado nada.
no pasa por el else

espero que me puedas ayudar y gracias nuevamente por tu respuesta

[JuanRAPerez]

verificastes la variable num_serie3 realmente va llena?????

[juanmi321]

haz un response.write(sql3_3)

Para ver la cadena que esta poniendo (delete * from CELULAR where ....)

y en cuanto la tengas pegala directo en el sql haber si ahi no te manda error

[TonyChile]

Gracias por sus respuestas
pero donde tengo que poner el response.write(sql3_3)
para ver que es lo que trae num_serie3.
Porque lo puse antes y despues de:

num_serie3 = request.Form("text23")

de las siguientes fromas pero no paso nada:

num_serie3 = request.Form("text23")
response.write(sql3_3)

response.write(sql3_3)
num_serie3 = request.Form("text23")

[Muzztein]

Código asp:

num_serie3 = request.Form("text23") ' NOMBRE DEL CAMPO EN EL FORMULARIO
sql3_3 = "delete * from CELULAR where NUM_SERIE ='" & num_serie3& "'" 'LOS AVIA PUESTO MAL PERO AHORA ESTAN COMO DEBEN ESTAR
 
 
 
reponse.write sql3_3
response.end
 
 
 
set obj_conn3 = server.createobject ("ADODB.Connection")
obj_conn3.open "CELULAR"
obj_conn3.execute sql3_3
obj_conn3.Close
set obj_conn3 = Nothing
 

[TonyChile]

Muchas gracias a todos ya lo arregle y lo tengo listo ahora lo publico por si le sirve a alguien mas espero que sea de utilidad

Código:

<%
if num_serie3 = "" then
%>
<form method="post" action="eliminacelular.asp"  >
<table width="318" border="2" align="center" cellpadding="1" cellspacing="0" name="tabla2"> 

  <tr><td colspan=6 align="center" class="Estilo5">Ingrese el N&uacute;mero de Serie que desee eliminar</td>
  </tr>
  <tr><td colspan="6" height=5></td></tr>

  <tr>
     <td width="38%" nowrap class="Estilo4">N&uacute;mero de Serie:&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;</td>
     <td colspan="2">
           <input name="text23" size="25" maxlength="15">
        <BR>
     </td>
  </tr>

  <tr>
     <td colspan="6" align="center">
         <input type="submit" name="Eliminar" value="&nbsp;&nbsp;Eliminar&nbsp;&nbsp;">
     </td>
     <td width="13%"></td>
     </tr>
</table>    
<%
  num_serie3 = request.Form("text23") 
  sql3_3 = "delete from CELULAR  where NUM_SERIE ='" & num_serie3& "'" ' COMETI EL ERROR DE PONER delete * CUANDO ACA :no: LO LLEVA 
  set obj_conn3 = server.createobject ("ADODB.Connection")
  obj_conn3.open "PRUEBA"
  set rs = obj_conn3.execute(sql3_3) ' FALTABA ESTO 
  obj_conn3.Close
  set obj_conn3 = Nothing 'ESTO ES MUY IMPORTANTE CUANDO COMO EN MI CASO LAS BASES TIENEN MILES DE REGISTROS
%>
</form>
<%
End if
%>

BUENO Y POR úLTIMO ESTO DEBIA IR TODO DENTRO DEL IF Y NO SEPARADO COMO LO HABIA HECHO ANTERIORMENTE YA QUE SI ESTABA SEPARADO NUNCA PASABA POR EL ELSE

Gracias a todos nuevamente por su tiempo lo damos por cerrado el tema que esten todos muy bien

[Myakire]

Ok, gracias por el aviso, con la modificación que hiciste en el título, cuando otros usuarios lo vean sabrán que encontrarán una solución (por eso lo importante de NO usar títulos como Necesito ayuda )