Dividir campo

04/05/2006 - 18:29 por Alex | Informe spam

Hola que tal un gran saludo a todos,,

Quisiera por favor si alguien me pudiera ayudar con el siguiente
problemilla, tengo una pagina donde estoy poniendo un campo llamado
comentario que viene de una base de datos,, este campo es texto de 255
caracteres..
La pregunta es como poder dividir este campo en varias lineas??
Esto refiere porque cuando veo la vista en el navegador si se usa la
longuitud total del campo me aparece una solo linea continua y bueno dificil
de leer para el usuario,,ahi alguna forma de poder dividir el comentario de
este campo en varias lineas???

De antemano muchas gracias,, saludos!!!

Siga el debate

8 respuestas

Tengo una respuesta

Preguntas similare

Leer las respuestas

#6 Alex

05/05/2006 - 19:26 | Informe spam

Hola muchas gracia por la ayuda,, como comentan ha funcionado el ejemplo ,,,
solo una duda mas basandose en este mismo ejemplo que hiciste favor de
poner,, si se por cualquier cosa fuera un texto de serie de caracteres sin
espacios,, se podria dividir???

De antemano muchas gracias,, saludos!!!

"Jose A. Fernandez" wrote in message
news:

Alex si el texto esta dentro de un contenedor que le das el formato con
CSS tiene que respetarlo, salvo que el texto sea una serie de
caracteres sin espacios,
SI te es posible puedes postear un ejemplo de esos 255 caracteres?
No creo que tengas problemas... o hay algo que no tamos viendo lo dos
.. :)

Aqui tienes un ejemplo de lo que te comentaba...
(copia y pega este ejemplo en un arxhivo de texto renombralo como
.html)

<html>
<head>
<title>EJEMPLO TEXTO COMENTARIO</title>
<style type="text/css">
<!--
#TextoComentario {
background-color: #CCCCCC;
text-align: left;
width: 150px;

}
</style>
</head>

<body>
<p>Probando</p>
<div id="TextoComentario">Texto de Ejemplo - Texto de Ejemplo - Texto
de Ejemplo - Texto de Ejemplo - Texto de Ejemplo - Texto de Ejemplo -
Texto de Ejemplo - Texto de Ejemplo - Texto de Ejemplo - Texto de
Ejemplo - Texto de Ejemplo - Texto de Ejemplo - Texto de Ejemplo -
Texto de Ejemplo - Texto de Ejemplo - Texto de Ejemplo - </div>
<p>  </p>
<p>Probando</p>
<div

id="TextoComentario">TextoContinuoTextoContinuoTextoContinuoTextoContinuoTex
toContinuoTextoContinuoTextoContinuoTextoContinuoTextoContinuoTextoContinuoT
extoContinuoTextoContinuoTextoContinuoTextoContinuoTextoContinuoTextoContinu
oTextoContinuoTextoContinuoTextoContinuoTextoContinuoTextoContinuoTextoConti
nuoTextoContinuoTextoContinuoTextoContinuoTextoContinuoTextoContinuoTextoCon
tinuoTextoContinuoTextoContinuoTextoContinuoTextoContinuoTextoContinuoTextoC
ontinuo</div>

</body>
</html>

Responder a este mensaje

#7 Jose A. Fernandez

06/05/2006 - 00:49 | Informe spam

Si... en un texto de serie de caracteres tendrias que realizar una
FUNCION de pasar esos caracteres al formato de "estilo oracion
deseado"..
En la funcion vas recorriendo y tomando de a secciones (de un ancho de
caracteres especificos y vas colocando al final el caracter deseado o
un simple espacio o <BR />.)
(es un simple algoritmo para formatear la cadena)

Buscando en la web (googleando... :) ..encontre algo que como siempre
lo puedes mejorar o adaptar a tus necesidades
http://www.forosdelweb.com/showthre...amp;page=2

aqui esta la parte de la funcion
<%
Sub Ren(vec,renglon)
'Funcion renglonado
'Definición de variables
Dim tempo, ctotal, i
tempo="" 'Variable que contendrá el renglón imprimible en cada
ocasión
i=0 'Indice para recorrer la extensión del vector generado por split
ctotal="Cadena de texto que vamos a renglonar"
vec=Split(ctotal, " ") 'Desmiembra la cadena original en un vector de
extensión "cantidad de palabras de la cadena"
while i<=ubound(vec) 'Recorre todos los elementos del vector generado
por el split.
if (len(tempo)+len(vec(i))<=renglon) Then 'Calcula que el tamaño del
renglón imprimible no exceda la cantidad deseada
if len(tempo)=0 then 'Si es la primera palabra que carga en el
renglón, no le concatena espacio en el inicio
tempo=tempo&vec(i)
else
tempo=tempo&" "&vec(i) 'Si no es la primera, antes de colocar el
contenido del elemento del vector concatena un espacio
End If
else 'Cuando el renglón imprimible obtiene su tamaño máximo
Response.Write(tempo) 'Imprime el renglón
Response.Write("<br>") 'Imprime un salto de línea
tempo="" 'Vacía el vector. Lo reinicia.
i=i-1 'Retrocede una posición para no omitir la última palabra
leída, que generara el exceso de renglón y la impresión.
end if
i=i+1 'Incremento de elemento en el vector.
Wend
'Al salir del bucle general, controla que tempo imprima la última
línea, que muy probablemente no haya llegado a cien como para
imprimirse

if(len(tempo)<>0) Then
Response.Write(tempo)
Response.Write("<br>")
End if
End Sub
%>

Responder a este mensaje

#8 Alex

06/05/2006 - 01:06 | Informe spam

Te agradezco mucho tu atencion,, con lo que todo lo que has comentado he
resuelto mi problemita,, Muchas gracias

"Jose A. Fernandez" wrote in message
news:
Si... en un texto de serie de caracteres tendrias que realizar una
FUNCION de pasar esos caracteres al formato de "estilo oracion
deseado"..
En la funcion vas recorriendo y tomando de a secciones (de un ancho de
caracteres especificos y vas colocando al final el caracter deseado o
un simple espacio o <BR />.)
(es un simple algoritmo para formatear la cadena)

Buscando en la web (googleando... :) ..encontre algo que como siempre
lo puedes mejorar o adaptar a tus necesidades
http://www.forosdelweb.com/showthre...amp;page=2

aqui esta la parte de la funcion
<%
Sub Ren(vec,renglon)
'Funcion renglonado
'Definición de variables
Dim tempo, ctotal, i
tempo="" 'Variable que contendrá el renglón imprimible en cada
ocasión
i=0 'Indice para recorrer la extensión del vector generado por split
ctotal="Cadena de texto que vamos a renglonar"
vec=Split(ctotal, " ") 'Desmiembra la cadena original en un vector de
extensión "cantidad de palabras de la cadena"
while i<=ubound(vec) 'Recorre todos los elementos del vector generado
por el split.
if (len(tempo)+len(vec(i))<=renglon) Then 'Calcula que el tamaño del
renglón imprimible no exceda la cantidad deseada
if len(tempo)=0 then 'Si es la primera palabra que carga en el
renglón, no le concatena espacio en el inicio
tempo=tempo&vec(i)
else
tempo=tempo&" "&vec(i) 'Si no es la primera, antes de colocar el
contenido del elemento del vector concatena un espacio
End If
else 'Cuando el renglón imprimible obtiene su tamaño máximo
Response.Write(tempo) 'Imprime el renglón
Response.Write("<br>") 'Imprime un salto de línea
tempo="" 'Vacía el vector. Lo reinicia.
i=i-1 'Retrocede una posición para no omitir la última palabra
leída, que generara el exceso de renglón y la impresión.
end if
i=i+1 'Incremento de elemento en el vector.
Wend
'Al salir del bucle general, controla que tempo imprima la última
línea, que muy probablemente no haya llegado a cien como para
imprimirse

if(len(tempo)<>0) Then
Response.Write(tempo)
Response.Write("<br>")
End if
End Sub
%>

Siga el debate Respuesta

Responder a este mensaje

Ads by Google

Hacer una pregunta

Tengo una respuesta

1 2

Busqueda sugerida