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

ayuda con este codigo

Estas en el tema de ayuda con este codigo en el foro de ASP Clásico en Foros del Web. Tengo este codigo insertado en una pagina html , el tema esel sigiente : este codigo consulta a una base de datos y muestra la ...
  #1 (permalink)  
Antiguo 30/11/2002, 14:19
 
Fecha de Ingreso: noviembre-2002
Mensajes: 18
Antigüedad: 21 años, 6 meses
Puntos: 0
ayuda con este codigo

Tengo este codigo insertado en una pagina html , el tema esel sigiente : este codigo consulta a una base de datos y muestra la noticia en si que se carga desde un formulario, pero cuando me muestra la noticia me repite la noticia 2 veces por ejemplo

si en el fomulario pongo


titulo : hola

noticia : probando


en la pagina me sale

hola

probandoprobando

por que me pasa esto ?

paso el codigo:


Set con = Server.CreateObject("ADODB.Connection")
Con.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("novedades.mdb")&";"

'Ejecuta un sentencia SQL de consulta
sql = "SELECT TOP 2 * FROM Novedades ORDER BY id DESC"
Set result = con.Execute(sql)
%>
</p>
<%Left cadena, cantidad%>
<p align="center"><font face="Arial" size="3" color="#0080C0"><%=result("titulo")%></font></p>
<p align="justify"><font face="Arial" size="2"><%=Left(result("noticia"),1550)%>
<%
noticia = result("noticia")
noticia = Replace(noticia, chr(10), "<br>")
Response.Write(noticia)
%>
  #2 (permalink)  
Antiguo 30/11/2002, 14:22
Avatar de CHuLoSoY  
Fecha de Ingreso: febrero-2002
Ubicación: Ribeira (Galicia)
Mensajes: 1.900
Antigüedad: 22 años, 4 meses
Puntos: 29
el problema está aquí:

<p align="justify"><font face="Arial" size="2"><%=Left(result("noticia"),1550)%>
<%
noticia = result("noticia")
noticia = Replace(noticia, chr(10), "<br>")
Response.Write(noticia)
%>

primero pones la noticia con 1550 caracteres y luego reemplazas los espacios y vuelves a imprimir la noticia, pon así:

<p align="justify"><font face="Arial" size="2"><%
noticia = result("noticia")
noticia = Replace(noticia, chr(10), "<br>")
Response.Write(left(noticia,1550))
%>

Cuéntame qué tal por si acaso, no lo he probado.
__________________
ESQUIO Dominios y Hosting
Las mejores características con los mejores precios.
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

SíEste tema le ha gustado a 1 personas




La zona horaria es GMT -6. Ahora son las 13:00.