Hola!!!...otra vez necesito su ayuda!!!...tengo una consulta en la cual me despliega una serie de datos: code, nombre, peso, etc...los datos se van introduciendo cada seg aprox a mi bd, y yo quiero generar una tabla de una sola fila y los campos a mostrar en la cual solo me muestre el ultimo dato que se acaba de introducir a mi bd, siempre y cuando cumpla con la condicion de la consulta...me explico?...estoy manejando un refresh, y lo de la tabla pensé que lo podía arreglar con el recorset.MoveLast, pero me marca un error, quizá la solución esté por otro lado...aquí está el código (garcias!!):
<%
Response.Expires = 0
Response.Buffer = True
'la siguiente linea escribe el encabezado... produciendo el refresh.
Response.AddHeader "Refresh", "1"
%>
<%
vFecha1= Day(Now) & "/" & Month(Now) & "/" & Year(Now) & " " & "00:00"
vFecha2= Day(Now) & "/" & Month(Now) & "/" & Year(Now) & " " & "23:59"
'Conección con la BD
sConnStr = "Driver={SQL Server};Server=MGV;Database=Rssql;UID=sa;Password= sa;"
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open sConnStr
'Crear tabla temporal
Set rsMon = Server.CreateObject("ADODB.Recordset")
' *MONITOREO
'Ligamos la tabla temporal a la vista de la BD
strSQL_N = "SELECT CODE, NAME, EQUIPMENT, SIDEWALL, AVG(WEIGHT) AS PPROM, WAREHOUSE, REJECT, MIN(FECHC) AS FECHMIN FROM ESCANER1 WHERE FECHC >='" & vFecha1 & "' AND FECHC <='" & vFecha2 & "' GROUP BY CODE, NAME, EQUIPMENT, SIDEWALL, WAREHOUSE, REJECT HAVING (CODE > '0') AND (NAME > '0') AND (EQUIPMENT > '0') AND (WAREHOUSE = 0) AND (REJECT = 0) ORDER BY CODE"
'Abre tabla temporal
rsMon.ActiveConnection = objConn
rsMon.Open strSQL_N, objConn,2,2
rsMon.Requery
%>
<table width="564" height="62" border="1" align="center" bordercolor="#333333" bgcolor="#FFFFFF">
<tr align="center" bgcolor="#F4F4F4">
<th width="75" height="32" align="center" valign="middle" bordercolor="#FFFFFF" bgcolor="#999999" scope="col"><div align="center" class="Estilo12">CÓDIGO</div></th>
<th width="185" bordercolor="#FFFFFF" bgcolor="#999999" scope="col"><div align="center" class="Estilo5 Estilo4"><strong>MEDIDA</strong></div></th>
<th width="85" bordercolor="#FFFFFF" bgcolor="#999999" scope="col"><div align="center" class="Estilo12">CLIENTE </div></th>
<th width="90" valign="middle" bordercolor="#FFFFFF" bgcolor="#999999" scope="col"><div align="center">SIDEWALL</div></th>
<th width="95" valign="middle" bordercolor="#FFFFFF" bgcolor="#999999" scope="col"><div align="center">PESO PROMEDIO</div></th>
<% do while not rsMon.EOF%>
<tr bgcolor="#F4F4F4">
<td width="75" height="22" align="center" valign="middle"><div align="center" class="Estilo19"><%=rsMon("CODE")%></div></td>
<td width="185"><div align="center" class="Estilo19"><%=rsMon("NAME")%></div></td>
<td width="85"><div align="center" class="Estilo19"><%=rsMon("EQUIPMENT")%></div></td>
<td width="90" bgcolor="#F4F4F4"><div align="center"><span class="Estilo19"><%=rsMon("SIDEWALL")%></span></div></td>
<td width="95" bgcolor="#F4F4F4"><div align="center"><span class="Estilo19"><%=rsMon("PPROM")%></span></div></td>
</tr>
<%
rsMon.MoveNext
loop%>
</table>