Foros del Web » Programando para Internet » ASP Clásico »

evitar <br>

Estas en el tema de evitar <br> en el foro de ASP Clásico en Foros del Web. Hola tengo un Do while para un Rs el tema es que me inserta en cada ciclo un <br> en el HTML y no lo ...
  #1 (permalink)  
Antiguo 22/11/2007, 03:39
Avatar de gagarin  
Fecha de Ingreso: enero-2002
Ubicación: Madrid
Mensajes: 550
Antigüedad: 23 años, 3 meses
Puntos: 4
evitar <br>

Hola tengo un Do while para un Rs el tema es que me inserta en cada ciclo un <br> en el HTML y no lo quiero, no sé como quitarlo me imagino que sería un replace o algo asi, lo he intentado pero no lo tengo muy claro, alguna idea.
Gracias por su ayuda

Éste es el código que uso:
Código:
IF numero < 3 AND PaginaActual = 1 THEN %>
<a href="noticia.asp?id=<%=rs("id")%>" onClick="window.open('','news','scrollbars=no');" target="news"><h1><%=rs("titulo")%></h1></a><h2><%=rs("fecha")%>, <%=rs("hora")%></h2>
<p><%=rs("copete")%>[...]</p>
<p class="derecha"><span class="leer"><img src='../../templates/img/interface/hoja.png' alt="" /></span> 
<a href="noticia.asp?id=<%=rs("id")%>" onClick="window.open('','news','scrollbars=no,height=400,width=282');" target="news">Leer m&aacute;s</a></p>
<p>....................................................................</p>


'Response.write("<a href=noticia.asp?id="&rs("id")& " 'onClick='window.open('','news','scrollbars=no,height=280,width=282');' target='news'><h1>"&rs("titulo")&"</h1></a><h2>"&rs("fecha")&", "&rs("hora")&"</h2><p>"&rs("copete")&"[...]</p>
<p class='derecha'><span class='leer'><img src='../../templates/img/interface/hoja.png' alt='' /></span> 
<a href=noticia.asp?id="&rs("id")& "onClick='window.open('','news','scrollbars=no,height=400,width=282');' target='news'>Leer m&aacute;s</a></p>
<p>....................................................................</p>")%>
<%ELSE 
IF numero=3 AND PaginaActual = 1 Then%>
	<img src='img/interface/titulo_archivo.jpg' alt='Archivo' />
<%End If%>
<ul>
	<li><a href="noticia.asp?id=<%=rs("id")%>" onClick="window.open('','news','scrollbars=no');" target="news"><h3><%=rs("titulo")%></h3></a></li><h2><%=rs("fecha")%>, <%=rs("hora")%></h2>
	<%'Response.write("<li><a href=noticia.asp?id="&rs("id")& " onClick='window.open('','news','scrollbars=no');' target='news'><h3>"&rs("titulo")&"</h3></a></li><h2>"&rs("fecha")&", "&rs("hora")&"</h2>")%>
<%END IF%>
__________________
Temiqui Iztoc Cualtlia Elhuayotl

Última edición por gagarin; 22/11/2007 a las 06:29 Razón: No se entendía
  #2 (permalink)  
Antiguo 22/11/2007, 08:20
Avatar de Myakire
Colaborador
 
Fecha de Ingreso: enero-2002
Ubicación: Centro de la república
Mensajes: 8.849
Antigüedad: 23 años, 3 meses
Puntos: 146
Re: evitar <br>

Dónde está el do while que mencionas?
Puedes poner el código generado de eso y señalar el supuesto <br>, por favor?
  #3 (permalink)  
Antiguo 22/11/2007, 09:05
Avatar de gagarin  
Fecha de Ingreso: enero-2002
Ubicación: Madrid
Mensajes: 550
Antigüedad: 23 años, 3 meses
Puntos: 4
Re: evitar <br>

Gracias Myakire:
Mira el Do while está así:

Código:
Do While Not rs.EOF AND CuantosRegistros < TamPagina 
numero= numero+1
IF numero < 3 AND PaginaActual = 1 THEN%>

'::::::::::::::::::::::::::::::::::::::::::
'Aquí Iría el código que puse en este post 
'::::::::::::::::::::::::::::::::::::::::::

<%
CuantosRegistros=CuantosRegistros + 1
rs.movenext
total= total+1
loop
%>
La paginación la hago así:

Código:
'::::::::DEFINIMOS VARIABLES PARA LA PAGINACIÓN
Dim Conn, rs, sSQL
Dim PaginaActual
Dim RegistrosTotales
Dim PaginasTotales
Dim TamPagina
Dim UltimoRegistro
Código:
' ::::::::::::: ÉSTO ES LOQ UE ESTUVE INTENTANDO
IF Request.Querystring("pagina") =1 THEN
Response.write("5")
TamPagina = 5
ELSE
Response.write("10")
TamPagina = 10
End If
Me di cuenta de que si hago esto en la segunda página, por ejemplo me mostraría a partir de dato 11 puesto que al convertir en 10 el TamPagina, pues la página uno tendría 10 registros y no 5 como quiero.

Código:
'::::::::::::::::::::::::::: AQUI SE ASIGNAN VARIABLES PARA PAGINACIÓN
if Request.Querystring("pagina") = "" then PaginaActual = 1 else PaginaActual = Cint(Request.Querystring("pagina"))
	rs.PageSize = TamPagina
	rs.CacheSize = TamPagina
	rs.Open sSQL, Conn, 1, 2
	PaginasTotales = rs.PageCount
	if PaginaActual < 1 then PaginaActual = 1	
	if PaginaActual > PaginasTotales then PaginaActual = PaginasTotales
	if PaginasTotales=0 then
	
	else
	
	UltimoRegistro = rs.Absoluteposition
	RegistrosTotales = rs.RecordCount 
	rs.AbsolutePage = PaginaActual
	textotd = "Pagina " & PaginaActual & " de " & PaginasTotales
	end if
	IF RegistrosTotales = 0 Then
	TextoSin="No se encontraron Registros"
	else
	TextoSin=""
	END IF

%>
Esto es el código
__________________
Temiqui Iztoc Cualtlia Elhuayotl
  #4 (permalink)  
Antiguo 22/11/2007, 09:19
Avatar de Myakire
Colaborador
 
Fecha de Ingreso: enero-2002
Ubicación: Centro de la república
Mensajes: 8.849
Antigüedad: 23 años, 3 meses
Puntos: 146
Re: evitar <br>

Ok, veo que haces una paginación, pero el post se refiere a que tienes un problema con un salto que se te inserta, y no veo que lo menciones ya ... entonces .. empecemos de nuevo ¿cual es el problema con el código que acabas de poner?
  #5 (permalink)  
Antiguo 22/11/2007, 09:45
Avatar de gagarin  
Fecha de Ingreso: enero-2002
Ubicación: Madrid
Mensajes: 550
Antigüedad: 23 años, 3 meses
Puntos: 4
Re: evitar <br>

JA JA JA Perdona me confundí de post puse dos diferentes sobre la misma aplicación pero diferente problema. Perdona de nuevo tengo el cerebro cocinado ya.

El problema está resuelto y no era por culpa de un etiqueta <br> sino por una <ul> que se me había colado sin darme cuenta.

Muchas gracias y si pudieras te agradecería si me ayudas con el otro problema que tengo que está en este post http://www.forosdelweb.com/f15/lista...tintos-534523/
__________________
Temiqui Iztoc Cualtlia Elhuayotl
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 14:35.