Se me ocurre esto. No lo he probado...
Código:
Cadena="1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22"
limite = 20
arrCadena=Split(cadena," ")
For i =0 to Ubound(arrCadena) - 1
if i > limite then
response.write("...")
exit for
else
Response.Write arrCadena(i)& " "
end if
Next