15 caracteres por linea

[Bluesman74cl]

Estimados (incluyentdote Al Zuwaga )

Estuve leyendo la funcion de CortarLargos de "Al" y bueno lo que hace es :

Tomar la siguiente cadena:

"Tengo mucha sed, voy a ir por unas Cervezas"

y lo transforma en un arreglo de 9 subindices y de cada uno de los subindices toma por ejemplo el subindice(1) = "Tengo" y compara si tiene el largo que le paso por la funcion CortarLargos.. como es menor a 15 claro , no le hae nada,,la deja igual... pero lo que necesito es que por linea me aparezcan 21 Caracteres entre los "espacios" y palabras que conforman el mensaje obtenido desde un recordset..

Es decir supongamos que tenemos la frase
"Tengo mucha sed, pienso en ir por unas Cervezas"

y mi largo de linea sea 21 caracteres... me deje esa frase como sigue...

"Tengo mucha sed, pien
zo en ir por unas cer
vezas"


Encontré algo parecido en Javascript pero deseo hacerlo desde ASP alguien me podria ayudar??

[u_goldman]

Código:

Function CortaTexto(strTexto, intLongitud, separador)
	if len(strTexto) > intLongitud then
		Dim count
		Dim strTemp
		Dim j
		strTemp = ""
		count = 0
		for j =0 to len(strTexto)
			strTemp = strTemp & mid(strTexto, j + 1, 1)
			count = count + 1
			if count = intLongitud then
				strTemp = strTemp & separador
				count = 0
			end if
		next
		CortaTexto = strTemp
	else
		CortaTexto = strTexto
	end if
End Function
strFrase = "Tengo mucha sed, pienso ir por unas cervezas"
Response.Write CortaTexto(strFrase, 21, "<br>")

Salu!

[El_Metallick]

pero en la biblioteza de funciones no habia algo que asia eso???... saludos

[Bluesman74cl]

Gracias U Goldman me sirve de pelos.. ayer estuve trabajando en esto en mi casa pero me enrredé demasiado en una funcion que estaba haciendo.. sin duda tu función es mas corta...


El Metallick...claro que en la Biblioteca de clases hay una función pero hace esto a nivel de frases sueltas, es decir por palabras.. si la palabra es demasiado larga la corta lo cual me complicaba un poco...

[Myakire]

la famosa biblioteca ......ya casi U_G, ya casi la termino

[u_goldman]

No importa master yo casi termino las FAQs je je je je

[El_Metallick]

a ok.... bueno ahora entendi la diferencia.... bueno gracias por explicarlo.. slaudos