no deformar tablas

[lexus]

No deformar tablas


saludos

este codigo lo dio CABEZOTA, que aproposito es muy buen codigo,
mi pregunta es si en vez de decir ese mensaje, habra la posibilidad de partir la cadena larga en otra cadena y si esta todavia sigue siendo muy larga volverla a partir...esto para dejar el mensaje o la palabra pero seccionada..

este es el codigo de CABEZOTA,

cad = Request.Form("texto")
cad = Replace(cad,chr(13)," ")
vec = split(cad," ")
ban = 0
for i = 0 to Ubound(vec)
If len(vec(i)) > 20 then
ban = 1
end if
next
If ban = 1 then
Response.Write("Largo de palabra no permitido")
end if