Un consejo: cuando pruebes no hagas inventos
Piensa que quien responde no ve tu pc, no ve tu código completo, y no ve lo que te sale en el navegador. Si uno sugiere y el otro lo coge y lo cambia, quien sugiere se pierde y así no hay forma de seguirle el error al código
Veamos, tenemos esto:
Código:
do while not rs.eof
if fecha<>myrecordset("fecha") then
exit do
end if
(...) 'muestra noticia, etc
fecha=myrecordset("fecha")
myrecordset.movenext
loop
(Corregido ahora el error obvio en myrecordset entre éste y rs)
Haz esto y dinos si chuta o no chuta:
<%
Set MyRecordSet = MyConn.Execute(strSQLHoy)
Do while not MyRecordset.EOF
If txtFechaHoy <> MyRecordset("FECHA") then
exit do
end if
'Aqui el codigo de coger las secciones etc....
txtFechaHoy = MyRecordset("FECHA")
myrecordset.movenext
loop
myrecordset.close
%>
1.
En el código html tienes que revisarlo. Mira si te has dejado un tag por el camino tipo </td> o si fue tipo <tr sin el > después. Cosas de ese estilo. Depende del que sea, cómo y dónde, provoca rarezas distintas a simples cortes en las tablas y tal.
2.
Veo que cambias la variable fecha por txtFechaHoy. En realidad no es fecha de hoy sino una fecha, la última en que se publicó algo. Este cambio me hace suponer que puede haber alguna cosilla más por ahí en relación con las fechas. Si es así elimínalo, el problema que tenías queda resuelto con ese do while
3.
¿Porqué eliminas un mensaje posteado? El html no era necesario, pero ya que estaba iba bien para dar pistas sobre cómo programas y por tanto el posible caminito al error.
Saludos.