Romper lineas cada 90 caracteres

[jorge1644]

Hola

Tengo un texto largo y quiero que cada 90 caracteres se haga un "<br>" ... como lo puedo hacer?

LO QUE NO QUIERO ES "ROMPER UNA PALABRA POR LA MITAD" ... ASI QUE DEBERIA SER MAS OMENOS CADA 90 CARACTERES PERO CUANDO HAYA UN ESPACIO EN BLANCO

Gracias!

[jochesfor]

Averigua por la funcion "InStr()"

InStr([start,]string1,string2[,compare])

n = InStr(90, TextoCompleto, " ") con esta funcion busca desde el caracter 90 el siguiente espacio " " y lo almacena en n y debes sacar ese texto del texto completo

90car = left(TextoCompleto, n-1) n-1 para que no traiga el espacio, luego le restas a TextoCompleto con right(), ojo con el espacio que te queda al principio de la nueva cadena y continuas un ciclo mientras n<>0, luego imprimes lo que te queda.

Si haz hecho algo similar creo que me debes entender.

[jochesfor]

luego de hacerlo la primera vez imprime por pantalla a "90car" y a "textoCompleto" y te vas a dar cuenta que que te falta para terminar tu codigo.

[jorge1644]

Gracias ... pero soy novato ... me puedes escribir el codigo (mas o menos) por favor ? es que no lo comprendo muy bien

10000 Gracias!

[jochesfor]

Buscas el texto y lo almacenas en TextoCompleto

n = InStr(90, TextoCompleto, " ")
90car = left(TextoCompleto, n-1)
TextoCompleto = right(TextoCompleto, len(TextoCompleto)-(Len(90car)+1))

te Hago un ejemplo sencillo

TextoCompleto = "Hola como estas el dia de hoy"

n = InStr(15, TextoCompleto, " ") 'n=16 el espacio entre estas y el
90car = left(TextoCompleto, n-1) 'se almacena en 90Car="Hola como estas" sin el " "
'ahora eliminas de TextoCompleto lo que esta en 90Car

TextoCompleto = right(TextoCompleto, len(TextoCompleto)-(Len(90car)+1)) 'el +1 elimina el " "
'TextoCompleto = "el dia de hoy"

'Imprime TextoCompleto y 90car

response.write 90car &" "& TextoCompleto 'te debe salir igual al texto original

'si vuelves a aplicarle la funcion InStr a tu nuevo TextoCompleto:

n = InStr(15, TextoCompleto, " ")

'n sera = 0 porque el nuevo TextoCompleto tiene 13 caracteres y se sale del ciclo que debes armar

'si cambias a 15 por 12, esa posicion sera la primera s de "estas", como lo que busca es un " "
'igual te va a quedar 90Car="Hola como estas"

Pruebalo y terminalo.