Foros del web, para los que viven de bits

natygriguol · 07/05/08, 13:09:40

Hola a todos, estoy haciendo una pagina y cuando quiero verla me da ese error en la linea 196. Podria alguien decirme como soluciono el tema del buffer? Gracias!!
<%@LANGUAGE="JAVASCRIPT" CODEPAGE="1252"%>
<%
var conex = Server.CreateObject("ADODB.CONNECTION");
var Connect = "Provider=Microsoft.Jet.Oledb.4.0; Data Source=//10.48.126.56/reporting/fpdb/TABLAS_F_ATP.mdb;"
conex.Open(Connect);
%>
<%
var as_varMes = "%";
if ( String(Request.QueryString('Meses')) != "undefined" &&
String(Request.QueryString('Meses')) != "") {
as_varMes = String(Request.QueryString('Meses'));
}
%>
<%
var as_varaño = "%";
if (String(Request.QueryString('ANO')) != "undefined" &&
String(Request.QueryString('ANO')) != "") {
as_varaño = String(Request.QueryString('ANO'));
}
%>
<%
var as_varCac = "%";
if (String(Request.QueryString('STORE')) != "undefined" &&
String(Request.QueryString('STORE')) != "") {
as_varCac = String(Request.QueryString('STORE'));
}
%>
<%
var as_cmd = Server.CreateObject ("ADODB.Command");
as_cmd.ActiveConnection = conex;
as_cmd.CommandText = "SELECT * FROM T01_FINAL WHERE STORE LIKE '"+ as_varCac.replace(/'/g, "''") + "' AND ANO LIKE '"+ as_varaño.replace(/'/g, "''") + "' AND Meses LIKE '"+ as_varMes.replace(/'/g, "''") + "'";

as_cmd.Prepared = true;
var as = as_cmd.Execute();
var as_numRows = 0;
%>
<%
var Tipo_Meses = Server.CreateObject("ADODB.Recordset");
Tipo_Meses.ActiveConnection = conex;
Tipo_Meses.Source = "SELECT distinct Meses FROM T01_FINAL ORDER BY Meses ASC";
Tipo_Meses.CursorType = 0;
Tipo_Meses.CursorLocation = 2;
Tipo_Meses.LockType = 1;
Tipo_Meses.Open();
var Tipo_Meses_numRows = 0;
%>

<%
var ANO = Server.CreateObject("ADODB.Recordset");
ANO.ActiveConnection = conex;
ANO.Source = "SELECT DISTINCT ANO FROM T01_FINAL ORDER BY ANO";
ANO.CursorType = 0;
ANO.CursorLocation = 2;
ANO.LockType = 1;
ANO.Open();
var ANO_numRows = 0;
%>
<%
var Tipo_Cac = Server.CreateObject ("ADODB.Command");
Tipo_Cac.ActiveConnection = conex;
Tipo_Cac.CommandText = "SELECT distinct STORE FROM T01_FINAL ORDER BY STORE ASC";
Tipo_Cac.Prepared = true;
var Tipo_Cac = Tipo_Cac.Execute();
var Tipo_Cac_numRows = 0;
%>
<%
var Repeat1__numRows = -1;
var Repeat1__index = 0;
as_numRows += Repeat1__numRows;
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<title>Asignación Tipo_Mesess Periodo</title>

<link href="../Soper/sopercss.css" rel="stylesheet" type="text/css">
<style type="text/css">

</style>
</head>
<body >
<table width="102%" height="75" border="0" cellpadding="1" cellspacing="0">
<tr align="left" bgcolor="#CC3300">
<td height="21" colspan="2"><table width="500" border="0" cellspacing="1" cellpadding="1">
<tr>
<td width="85%" align="center" bgcolor="#CC3300"><pre><span class="encabezado_tabla Estilo11">Cuentas y Líneas. Fechas de Execution previstas y reales - Presuspensiones Argentina</span></pre></td>
</tr>
</table>
</td>
</tr>
<tr>
<td width="94%" height="32"><form name="form1" method="get" action="T_espera.asp">
<table width="757" border="0" cellpadding="1" cellspacing="1">
<tr>
<td width="132"><select name="Meses" class="select" id="Meses">
<option value="%" <%=(("%" == Request.QueryString('Meses'))?"SELECTED":"")%>>
Tipo de Cuenta</option>
<%
while (!Tipo_Meses.EOF) {
%>
<option value="<%=(Tipo_Meses.Fields.Item("Meses").Value)% >" <%=((Tipo_Meses.Fields.Item("Meses").Value == Request.QueryString('Meses'))?"SELECTED":"")%> ><%=(Tipo_Meses.Fields.Item("Meses").Value)%></option>
<%
Tipo_Meses.MoveNext();
}
if (Tipo_Meses.CursorType > 0) {
if (!Tipo_Meses.BOF) Tipo_Meses.MoveFirst();
} else {
Tipo_Meses.Requery();
}
%>
</select></td>
<td width="167"><select name="STORE" class="select" id="STORE">
<option value="%" <%=(("%" == Request.QueryString('STORE'))?"selected=\"selected \"":"")%>>
STORE</option>
<%
while (!Tipo_Cac.EOF) {
%>
<option value="<%=(Tipo_Cac.Fields.Item("STORE").Value)%>" <%=((Tipo_Cac.Fields.Item("STORE").Value == Request.QueryString('STORE'))?"selected=\"selected \"":"")%> ><%=(Tipo_Cac.Fields.Item("STORE").Value)%></option>
<%
Tipo_Cac.MoveNext();
}
if (Tipo_Cac.CursorType > 0)
{
if (!Tipo_Cac.BOF) Tipo_Cac.MoveFirst();

}
else
{
Tipo_Cac.Requery();
}
%>
</select></td>
<td width="81"><select name="ANO" id="ANO" class="select">
<option value="%" <%=(("%" == Request.QueryString('ANO'))?"SELECTED":"")%>>
ANO</option>
<%
while (!ANO.EOF) {
%>
<option value="<%=(ANO.Fields.Item("ANO").Value)%>" <%=((ANO.Fields.Item("ANO").Value == Request.QueryString('ANO'))?"SELECTED":"")%> ><%=(ANO.Fields.Item("ANO").Value)%></option>
<%
ANO.MoveNext();
}
if (ANO.CursorType > 0) {
if (!ANO.BOF) ANO.MoveFirst();
} else {
ANO.Requery();
}
%>
</select> </td>
<td width="215"><input type="submit" name="Submit" value="Aceptar"></td>
</tr>
</table>
</form></td>
<td width="6%"><img src="Imagen2.bmp"></td>
</tr>
<tr>
<td bgcolor="#F0F0F0" width="94%">
<span class="select">Tipo_Meses:<span class="Estilo5"><%= Request.QueryString('Meses') %></span></span><span class="select">STORE</span><span class="select"><span class="Estilo5">: <%= Request.QueryString('STORE') %>  </span>ANO:</span><span class="select"><span class="Estilo5"><%= Request.QueryString('ANO') %></span></span><span class="select"> 
(%= TODOS)</span> </td>
<td> </td>
</tr>
<tr>
<td height="31" colspan="2"><table width="94%" height="25%" border="0" cellpadding="0" cellspacing="1" bgcolor="#ECE9D8" class="TablaCebra">
<tr align="center" class="href">
<td bgcolor="#F5F5F5"><div align="center" class="Estilo6">Día</div></td>
<td bgcolor="#F5F5F5"><div align="center" class="Estilo6">Cac</div></td>
<td bgcolor="#F5F5F5"><div align="center" class="Estilo6">Celular</div></td>
<td bgcolor="#F5F5F5"><div align="center" class="Estilo6">Entró</div></td>
<td bgcolor="#F5F5F5"><div align="center" class="Estilo6">Atendio</div></td>
<td bgcolor="#F5F5F5"><div align="center" class="Estilo6">Salio</div></td>
<td bgcolor="#F5F5F5"><div align="center" class="Estilo6">Atendio</div></td>
<td bgcolor="#F5F5F5"><div align="center" class="Estilo6">Proceso</div></td>
<td bgcolor="#F5F5F5"><div align="center" class="Estilo6">T. Máximo</div></td>
</tr>
<% while ((Repeat1__numRows-- != 0) && (!as.EOF)) { %>
<tr align="center" class="sopercss">
<td bgcolor="#F5F5F5"><div align="center"><%=(as.Fields.Item("DIA").Value)%></div></td>
<td bgcolor="#F5F5F5"><div align="center"><%=(as.Fields.Item("STORE").Value)% ></div></td>
<td bgcolor="#F5F5F5"><div align="center"><%=(as.Fields.Item("CELULAR").Value )%></div></td>
<td bgcolor="#F5F5F5"><div align="center"><%=(as.Fields.Item("ENTRO").Value)% ></div></td>
<td bgcolor="#F5F5F5"><div align="center"><%=(as.Fields.Item("ATENDIDO").Valu e)%></div></td>
<td bgcolor="#F5F5F5"><div align="center"><%=(as.Fields.Item("SALIO").Value)% ></div></td>
<td bgcolor="#F5F5F5"><div align="center"><%=(as.Fields.Item("ATENDIO").Value )%></div></td>
<td bgcolor="#F5F5F5"><div align="center"><%=(as.Fields.Item("PROCESO").Value )%></div></td>
<td bgcolor="#F5F5F5"><div align="center"><%=(as.Fields.Item("T_MAXIMO").Valu e)%></div></td> </tr>
<%
Repeat1__index++;
as.MoveNext();
}
%>
</table></td>
</tr>
</table>
<center><a href="http://ayuda.cti/ICP/index.php?option=com_content&task=view&id=12&Itemi d=42">
<<<-Volver </a></center>
</body>
</html>
<%
as.Close();
%>
<%
Tipo_Meses.Close();
%>
<%
ANO.Close();
%>
<%
Tipo_Cac.Close();
%>

Shiryu_Libra · 07/05/08, 15:06:57

te haz fijado que en esta parte

Cita:

<% while ((Repeat1__numRows-- != 0) && (!as.EOF)) { %>
<%
Repeat1__index++; <--- incrementando, pero que estas incrementando???
as.MoveNext();

no deberia ser

Cita:

Repeat1__numRows--

pregunto por que al parecer se queda en un ciclo infinito

no se que opinen

i_e_s27 · 07/05/08, 15:31:49

Jaja, yo tambien supuse que el error era de un ciclo infinito, pero me daba hueva mirar todo el codigo jajaja

Shiryu_Libra · 07/05/08, 17:18:23

jajaja, la diferencia es que no me jui mirando todo el codigo,

solo mire donde empezaban y terminaban los DO WHILE, jejejeje, por eso siempre empieza de atras 'pa 'delante,

natygriguol · 08/05/08, 09:25:03

Hola, lo que estoy incrementando es la variable index, que esta declarada mas arriba:
<%
var Repeat1__numRows = -1;
var Repeat1__index = 0;
as_numRows += Repeat1__numRows;
%>
ahora puede ser que sean demansiados datos y no me los traiga?
Saludos!!!!!

Myakire · 08/05/08, 10:19:44

Lo que Shiryu_Libra y i_e_s27 quieren hacer ver, es que tu ciclo lo tienes mientras la variable Repeat1__numRows decrementada sea diferente de cero haz, y como tu misma puede observar esa variable la asignas con -1. La linea as_numRows += Repeat1__numRows creo recordar lo que hace es sumar 1 a la variable y luego asignarla a as_numRows (detesto esos operadores abreviados), pero en el while lo primero que haces es restarle uno así que siempre es diferente de 0, y por ende, tienes una condición que nunca se cumple, aunque no es infinito por que se sale al terminar el recordSet.

Ahora, regresando al error, eso es por que por default todo lo que generes en ASP se va a un buffer y no al cliente hasta que haces un response.flush o se termine de cargar la página. Yo en tu lugar agregaría un Response.Flush dentro del ciclo o bien pondría un Response.Buffer = False al inicio de mi página.

Saludos