cadena=(contingut_noticia) Cadena=Split(cadena," ") max = 75 if ubound(Cadena) < 75 then max = ubound(Cadena) end if For i =0 to max-1 Response.Write Cadena(i)& " " Next