Cantidad de caracteres

[pepelucho]

Hola a todos, como se puede hacer para mostrar una cierta cantidad de caracteres en mi pagina, el dato q voy a mostrar lo jalo de la bd es un texto grande pero solo quisiera mostrar las primeras 70 palabras

Espero q me puedan ayudar
Gracias de antemano.

SaLuDoS dE:
PePeLuChO dEl PeRú PaRa El MuNdO ;)

[CABEZOTA]

Lo que puedes hacer es usar la función Split para dividir el texto por los espacios en blanco para obtener las palabras, despúes o muestras los 70 primeros elementos del vector que obtengas con la func Split, o lo cortas al vector haciendo un redim hasta los primeros 70 elementos y luego haces un Merge para volver a formar una cadena con los 70 elementos.

Espero que te sirva. :cantar:

<center><font face=Verdana size=2>Webmaster de [/CODE]<A href="http://www.salirxtucuman.com.ar" target="_blank"><img src="http://www.efrance.fr/salirxtucuman/images/titulo.gif" border=0 align="absmiddle"></a></center>

[RsOfT]

Usa mid(string,star,length).

&lt;%
variable = tabla!campo
variable = mid(variable,1,70)
%&gt;

.::RsOfT::.
--El que se aferra a lo conocido, nunca conocerá lo desconocido--
--Es intentando lo imposible como se realiza lo posible--
--Es de pesimo gusto contentarse con algo mediocre cuando lo excelente esta a nuestro alcance--

[urjose]

Ops espero que nadie haya leido el mensaje anterior

Hay que leer las FAQ's mi querido pepelucho

<a href='ir.asp?http://www.forosdelweb.com/mensaje.asp?id=89836' target='_blank'>http://www.forosdelweb.com/mensaje.asp?i...</a>

Saludos

<center>
<a href=http://comunidadguru.com><img border=0 src=http://comunidadguru.com/imagenes/logos/logo.gif></a>
</center>

[choroy]

Lo dicho anteriormente sirve para mostrar las primeras 70 palabras, pero si te viene mejor lo que te voy a proponer pues lo usas, y si no pues nada aqui queda.

Es para coger las palabras que cogen por ejemplo en 400 caracteres (en verdad serian 400 y alguno, porque no te corta la ultima palabra).

Y si es para lo que imagino, poner el principio de un texto y al final poner un Leer más... , esto te va a venir mejor, o al menos mas estetico, pues seran todos mas o menos con el mismo contenido sin depender si las palabras son mas cortas o mas largas, (creo que me estoy liando ).

&lt;%
FUNCTION CropSentence(strText, intLength, strTrial)
Dim wsCount
Dim intTempSize
Dim intTotalLen
Dim strTemp

wsCount = 0
intTempSize = 0
intTotalLen = 0
intLength = intLength - Len(strTrial)
strTemp = &quot;&quot;

IF Len(strText) &gt; intLength THEN
arrTemp = Split(strText, &quot; &quot;)
FOR EACH x IN arrTemp
IF Len(strTemp) &lt;= intLength THEN
strTemp = strTemp &amp; x &amp; &quot; &quot;
END IF
NEXT
CropSentence = Left(strTemp, Len(strTemp) - 1) &amp; strTrial
ELSE
CropSentence = strText
END IF
END FUNCTION
%&gt;


........


&lt;% =(CropSentence(TEXTO , 400 , &quot; ...&quot;)) %&gt;


Un saludo.