David el grande si que lo eres gracias por tu respuesta ahora me funciona a la perfeccion
Ahora abusando de tu buena disposicion te quiero hacer otra pregunta.
Mira tengo que actualizar unos datos la idea es que cuando se ingrese el numero de telefono (text19) se pueda validar si este se encuentra o no en la base de datos sql server 2000. Si esta que carge todos los datos existentes en los text que sigen para asi modificar solo los que son necesarios y no tener que ingresar todos los datos nuevamente que es como lo esta haciendo hasta ahora.
Adjunto el codigo para que los campos no esten en blanco:
Código asp:
Ver original<script language=JavaScript>
function no() {
var myForm = document.Formc;
if (myForm.text13.value == "" || myForm.text19.value == "") {
alert("Los campos Número de Teléfono y Número de Chip son obligatorios");
return false;
if (myForm.text19.value == "") {
myForm.text19.focus();
}
else {
myForm.text19.focus();
}
}
else {
alert("El Celular Número " + myForm.text19.value + " a sido ingresado");
}
}
</script>
Y este es el codigo del form
Código asp:
Ver original<%
If num_chip0 = "" then
%>
<form name="Formc" method="Post" onSubmit="return no();" action="actualizachip.asp">
<table width="308" border="2" align="center" cellpadding="1" cellspacing="0" name="tabla1">
<tr><td colspan=2 align="center" class="Estilo5">Ingrese los Nuevos Datos de Chip</td>
</tr>
<tr><td colspan="2" height=5></td></tr>
<tr>
<td width="38%" nowrap class="Estilo7">Número de Teléfono:</td>
<td colspan="2">
<input name="text19" size="25" maxlength="12" onKeyPress="LP3_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">Número de Chip:</td>
<td colspan="2">
<input name ="text13" size="25" maxlength="20" onKeyPress="LP_data()" onMouseover="showtip2(this,event,'Ingrese el Número de Chip. Este campo no debe estar vacio');" onMouseout="hidetip2();" STYLE="cursor: hand"><BR>
</td>
</tr>
<tr>
<td width="38%" nowrap class="Estilo7">Dato1:</td>
<td colspan="2">
<input name="text14" size="25" maxlength="12" onKeyPress="LP_data()" onMouseover="showtip2(this,event,'Ingrese Dato1');" onMouseout="hidetip2();" STYLE="cursor: hand"><BR>
</td>
</tr>
<tr>
<td width="38%" nowrap class="Estilo7">Dato2:</td>
<td colspan="2">
<input name="text15" size="25" maxlength="5" onKeyPress="LP_data()" onMouseover="showtip2(this,event,'Ingrese Dato2');" onMouseout="hidetip2();" STYLE="cursor: hand"><BR>
</td>
</tr>
<tr>
<td width="38%" nowrap class="Estilo7">Serie de Carpeta:</td>
<td colspan="2">
<input name="text16" 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 name="text17" 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 name="text18" 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">Fecha Entrega Chip:</td>
<td colspan="2">
<input name="text20" size="25" maxlength="10" onKeypress="if(event.keyCode == 13) event.returnValue = false;" onChange="valFecha(document.Formc.text20)" 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="text21" size="25" maxlength="10" onKeypress="if(event.keyCode == 13) event.returnValue = false;" onChange="valFecha(document.Formc.text21)" 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="text22" 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 name="text23" 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="text24" 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 type="Submit" value="Actualizar" onMouseover="showtip2(this,event,'Pulse el Botón para poder grabar los nuevos datos del usuario');" onMouseout="hidetip2();" STYLE="cursor: hand">
</td>
<td width="13%"></td>
</tr>
</table>
<%
num_chip0 = request.Form("text13")
dato1_0 = request.Form("text14")
dato2_0 = request.Form("text15")
serie_carpeta0 = request.Form("text16")
pin0 = request.Form("text17")
puk0 = request.Form("text18")
movil0 = request.Form("text19")
fecha_entrega_chip0 = request.Form("text20")
fecha_retiro_chip0 = request.Form("text21")
asignado0 = request.Form("text22")
no_asignado0 = request.Form("text23")
notas0 = request.Form("text24")
SQL1_0 = "UPDATE CHIP SET NUM_CHIP = '" & num_chip0 & "', DATO1 = '" & dato1_0 & "', DATO2 = '" & dato2_0 & "', SERIE_CARPETA = '" & serie_carpeta0 & "', PIN = '" & pin0 & "', PUK = '" & puk0 & "', FECHA_ENTREGA_CHIP = '" & fecha_entrega_chip0 & "', FECHA_RETIRO_CHIP = '" & fecha_retiro_chip0 & "', ASIGNADO = '" & asignado0 & "', NO_ASIGNADO = '" & no_asignado0 & "', NOTAS = '" & notas0 & "' WHERE MOVIL = '" & movil0 & "'"
set obj_conn0 = server.createobject ("ADODB.Connection")
obj_conn0.Open "PRUEBA"
obj_conn0.Execute sql1_0
obj_conn0.Close
set obj_conn0 = Nothing
%>
</form>
<%
end if
%>
De ante mano muchas gracias a todos
