Lo otro como puedo hacer para que me valide que el text1 q equivale en la base al NUM_CHIP sii esta repetido me arroje un mensaje de clave repetida y no permita grabar
les adjunto el codigo
Esto es para el tipo de dato permitido en cada text
Código asp:
Ver original
<script language="javascript"> <!-- function LP0_data(){ telefono=true //si no tiene 8 caracteres no es válido if (document.Form1.text7.value.length != 8){ telefono=false else{ for (i=0;i>=8;i++){ fono = document.Form1.text7.value.charAt(i) if (LP_data(fono)==""){ telefono=false break; } } } } return CPValido } --> </script> <script language="javascript"> <!-- function LP1_data(){ var key=window.event.keyCode; if ((key < 65 || key > 90) && (key < 97 || key > 122) && key != 32){ window.event.keyCode=0; }} --> </script> <script language="javascript"> <!-- function LP2_data(){ var key=window.event.keyCode; if ((key < 65 || key > 90) && (key < 97 || key > 122) && (key < 48 || key > 57) && key != 32){ window.event.keyCode=0; }} --> </script> <script language=JavaScript> function no() { var myForm = document.Form1; if (myForm.text1.value == "" || myForm.text7.value == "") { alert("Los campos Número de Chip y Número de Teléfono son obligatorios"); if (myForm.text7.value == "") { myForm.text7.focus(); } else { myForm.text1.focus(); } } else { alert("El Celular Número " + myForm.text7.value + " a sido ingresado"); } } </script>
Y este es el Form
Código asp:
Ver original
<% dim valor valor = Request.QueryString("valor") if num_chip = "" then %> <form name="Form1" method="Post" action="agregachip.asp?valor=1"> <table width="308" border="2" align="center" cellpadding="1" cellspacing="0" name="tabla"> <tr><td colspan=2 align="center" class="Estilo5">Agregar Nuevo CHIP</td> </tr> <tr><td colspan="2" height=5></td></tr> <tr> <td width="38%" nowrap class="Estilo7">Número de Chip:</td> <td colspan="2"> <input type="text" name ="text1" size="25" maxlength="20" onKeyPress="LP_data()" onMouseover="showtip2(this,event,'Los datos deben ser númericos y no estar en blanco');" onMouseout="hidetip2();" STYLE="cursor: hand"><BR> </td> </tr> <tr> <td width="38%" nowrap class="Estilo7">Dato1:</td> <td colspan="2"> <input type="text" name="text2" size="25" maxlength="12" onKeyPress="LP_data()" onMouseover="showtip2(this,event,'Los ');" onMouseout="hidetip2();" STYLE="cursor: hand"><BR> </td> </tr> <tr> <td width="38%" nowrap class="Estilo7">Dato2:</td> <td colspan="2"> <input type="text" name="text3" size="25" maxlength="5" onKeyPress="LP_data()" onMouseover="showtip2(this,event,'Los mmmm');" onMouseout="hidetip2();" STYLE="cursor: hand"><BR> </td> </tr> <tr> <td width="38%" nowrap class="Estilo7">Serie De Carpeta:</td> <td colspan="2"> <input name="text4" size="25" maxlength="13" onKeypress="LP2_data()" onMouseover="showtip2(this,event,'Ingrese el Número de Serie');" onMouseout="hidetip2();" STYLE="cursor: hand"><BR> </td> </tr> <tr> <td width="38%" nowrap class="Estilo7">Pin:</td> <td colspan="2"> <input type="text" name="text5" size="25" maxlength="4" onKeyPress="LP_data()" onMouseover="showtip2(this,event,'Ingrese el Pin del Chip');" onMouseout="hidetip2();" STYLE="cursor: hand"><BR> </td> </tr> <tr> <td width="38%" nowrap class="Estilo7">Puk:</td> <td colspan="2"> <input type="text" name="text6" size="25" maxlength="8" onKeyPress="LP_data()" onMouseover="showtip2(this,event,'Ingrese el Puk del Chip');" onMouseout="hidetip2();" STYLE="cursor: hand"><BR> </td> </tr> <tr> <td width="38%" nowrap class="Estilo7">Número de Teléfono:</td> <td colspan="2"> <input type="text" name="text7" size="25" maxlength="12" onKeyPress="LP_data()"onblur="LP0_data()" onMouseover="showtip2(this,event,'Ingrese el Número de Teléfono asociado al Chip');" onMouseout="hidetip2();" STYLE="cursor: hand"><BR> </td> </tr> <tr> <td width="38%" nowrap class="Estilo7">Fecha Entrega Chip:</td> <td colspan="2"> <input name="text8" size="25" maxlength="10" onKeypress="if(event.keyCode == 13) event.returnValue = false;" onChange="valFecha(document.Form1.text8)" onMouseover="showtip2(this,event,'Ingrese la Fecha con formato dd/mm/aaaa. Ejemplo (01-01-2009 o 01/01/2009)');" onMouseout="hidetip2();" STYLE="cursor: hand"><BR> </td> </tr> <tr> <td width="38%" nowrap class="Estilo7">Fecha Retiro Chip:</td> <td colspan="2"> <input name="text9" size="25" maxlength="10" onKeypress="if(event.keyCode == 13) event.returnValue = false;" onChange="valFecha(document.Form1.text9)" onMouseover="showtip2(this,event,'Ingrese la Fecha con formato dd/mm/aaaa. Ejemplo (01-01-2009 o 01/01/2009)');" onMouseout="hidetip2();" STYLE="cursor: hand"><BR> </td> </tr> <tr> <td width="38%" nowrap class="Estilo7">Asignado:</td> <td colspan="2"> <input name="text10" size="25" maxlength="50" onKeypress="LP1_data()" onMouseover="showtip2(this,event,'Ingrese el El nombre de la persona asociada al Chip');" onMouseout="hidetip2();" STYLE="cursor: hand"><BR> </td> </tr> <tr> <td width="38%" nowrap class="Estilo7">No Asignado:</td> <td colspan="2"> <input type="text" name="text11" size="25" maxlength="50" onKeypress="LP1_data()" onMouseover="showtip2(this,event,'Ingrese el nombre de la persona a quien se retiro el chip');" onMouseout="hidetip2();" STYLE="cursor: hand"><BR> </td> </tr> <tr> <td width="38%" nowrap class="Estilo7">Notas:</td> <td colspan="2"> <input name="text12" size="25" maxlength="200" onKeypress="LP1_data()" onMouseover="showtip2(this,event,'Permite ingresar datos extras que no se encuentran en las otras opciones');" onMouseout="hidetip2();" STYLE="cursor: hand"><BR> </td> </tr> <tr> <td colspan="6" align="center"> <input name="agregar" type="submit" id="agregar" onClick="no()" value=" Agregar " onMouseover="showtip2(this,event,'Pulse el Botón para agregar los datos ingresados');" onMouseout="hidetip2();" STYLE="cursor: hand"> </td> <td width="13%"></td> </tr> </table> <% end if %> <% if valor = 1 then num_chip = request.Form("text1") dato1 = request.Form("text2") dato2 = request.Form("text3") serie_carpeta = request.Form("text4") pin = request.Form("text5") puk = request.Form("text6") movil = request.Form("text7") fecha_entrega_chip = request.Form("text8") fecha_retiro_chip = request.Form("text9") asignado = request.Form("text10") no_asignado = request.Form("text11") notas = request.Form("text12") SQL = "INSERT INTO CHIP (NUM_CHIP, DATO1, DATO2, SERIE_CARPETA, PIN, PUK, MOVIL, FECHA_ENTREGA_CHIP, FECHA_RETIRO_CHIP, ASIGNADO, NO_ASIGNADO, NOTAS) VALUES " & "('" & num_chip & "', '" & dato1 & "', '" & dato2 & "', '" & serie_carpeta & "', '" & pin & "', '" & puk & "', '" & movil & "', '" & fecha_entrega_chip & "', '" & fecha_retiro_chip & "', '" & asignado & "', '" & no_asignado & "', '" & notas & "')" set obj_conn=server.createobject("ADODB.connection") obj_conn.open "PRUEBA" obj_conn.execute SQL obj_conn.Close set obj_conn = Nothing end if %> </form>
Necesito ayuda urgente en esto y ya no se me ocurre como hacerlo aunq creo que debe ser una cosa poca pero no la puedo pillar