Ver Mensaje Individual
  #1 (permalink)  
Antiguo 24/10/2006, 07:27
Avatar de Sandino
Sandino
 
Fecha de Ingreso: octubre-2006
Mensajes: 277
Antigüedad: 18 años, 6 meses
Puntos: 1
Error en While

hola amigos tengo un error en el recorrido de los datopara hacer una especie de grilla el problema q al ejecutarse me sale error de tiempo maximo de espera o simplemente se me pega el browser

el codigo:
<%
Set Con = Server.CreateObject("ADODB.Connection")
cuenta = request.Form("cuenta")
rutcliente = request.Form("rutcliente")
sql2 = "SELECT * FROM castigos,recovery,Demanda,Fecha_de_Act WHERE RutCliente='"& cuenta & "'"
Set rs = Con.Execute(sql2)
while not rs.EOF
%>

<form method="get" name="form">
<input type="hidden" name="hdd_cuenta" value ="<%=cuenta%>" >
<script language="JavaScript">
function ventanaSecundaria(URL){
URL="pizarra.asp";
txtOculto=document.all.hdd_cuenta.value;
URL+="?hdd_cuenta=" + txtOculto;
window.open(URL,"ventana1","width=1000, height=350, scrollbars=yes, menubar=no, location=yes, resizable=yes")
}
</script>
<div>

<table width="565" height="52" border="1">
<tr>
<th width="94" height="45" class="fondo">Fecha</th>
<th width="80" class="fondo">Capital</th>
<th width="85" class="fondo">Interes Mora</th>
<th width="79" class="fondo">Gasto</th>
<th width="184" class="fondo">Lugar de Pago</th>
</tr>
<tr>
</table>

<table width="567" height="73" border="1">
<tr>
<th width="95"><%=rs("fecharec")%></th>
<th width="77"><%=formatcurrency(rs("capital"),-0)%></th>
<th width="90"><%=formatcurrency(rs("interesmora"),-0)%></th>
<th width="76"><%=formatcurrency(rs("gastosmora"),-0)%></th>
<th width="195"><%=rs("area")%></th>
<tr>
</table>
<%rs.MoveNext
wend %>

<br>

</div>

<p align="right" class="Estilo1"></p>
</form>
<p>
<%
rs.Close
Set rs = Nothing
Con.Close
Set Con = Nothing
%>
espero me ayuden gracias...