18/06/2003, 06:05
|
 | | | Fecha de Ingreso: diciembre-2002 Ubicación: san juan de los morros
Mensajes: 887
Antigüedad: 22 años, 5 meses Puntos: 1 | |
| Seran que me pueden ayudar??????
Cita: Mensaje Original por 8461277
Estmados amigos como estan creo que esto yo lo e preguntado mil veces pero no me sale, a lo mejos es que no soy bueno para esto, pero tengo el empeño y el teson de aprender, y por que no de fastidiar un poco, con los buenos amigos que encuentro aqui. Bueno mi pregunta es por que la precarga que tengo en este codigo no me funciona???alguien me lo podria explicar:
<html>
<head>
<meta http-equiv="Content-Language" content="es">
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<title>Consulta de una Base de Dato</title>
<!-- PRIMER PASO: Copiar dentro del tag HEAD -->
<script language="JavaScript">
ns=document.layers
ie=document.all
function esconde() {
if (ie) document.precarga.style.visibility="hidden";
if(ns) document.precarga.visibility="hide";
}
// -->
</script>
</head>
<body>
<!-- SEGUNDO PASO: Copiar dentro del tag BODY -->
<body onload="esconde();">
<script language="JavaScript">
if(ie || ns) document.write('<div id="precarga" align="center"><br><h2><b>Cargando....</b><br>Por Favor Espere...!!!</div>');
</script>
<%
Response.Flush
' Aquí while para iterar el recordset
%>
</table>
</head><body bgcolor="#808000">
<div align="center">
<center>
<table border="2" width="50%" bgcolor="#008000">
<tr>
<td width="100%">
<p align="center"><font color="#FFFFFF"><B>RESULTADO DE LAS NOTAS</B></font></td>
</tr>
</table>
</center>
</div>
<BR>
<CENTER><a href="fconsulta3.html"><H2><B>Volver al Formulario</B></H2></a></CENTER>
<BR>
<%
'Aqui compruebo que esta colocando 8 digitos
If Len(Request.Form("cedula")) <8 then
'el campo no fue llenado, entonces...
response.write "<CENTER><H1><B>¡ERROR!</B></H1></CENTER>"
response.write "<CENTER><B><H1>Por Favor rellenar con Tú Cédula de 8 Dígitos, presiona Volver al Formulario, para intentarlo otra vez</H1></B></CENTER>"
response.end
End If%>
<%ccedula=request.form("cedula")
set rs=createobject("ADODB.Recordset")
sqltxt="select cedula, Nombre, Parcial1, PC1, T1, P1, As1, A1, Parcial2, PC2, T2, P2, As2, A2, Parcial3, PC3, T3, P3, As3, A3, Definitiva from Alumnos where cedula like '%"&ccedula&"%'"
'response.write (sqltxt)
rs.open sqltxt,"Provider=Microsoft.Jet.OLEDB.4.0; Data Source=C:\Inetpub\wwwroot\asp\bdfisica2.mdb;"%>
Hojala que me puedan ayudar, Gracias
Miguel |