Certo che è possibile

ti ho creato questo piccolo esempio guarda :

<%
paginaCorrente=Request.QueryString("pagina")
if Len(paginaCorrente)=0 then
paginaCorrente=0
end if

testo=rs("Nome_del_tuo_campo")

numeroCaratteri=Len(testo)
'qui imposta il numero di caratteri
numeroMassCaratteri=8000
numeroIniziale=1
Dim testoXpagina()
pagine=Cint(numeroCaratteri/numeroMassCaratteri)
Redim testoXpagina(pagine-1)
For i=0 to pagine-1
if pagine > 1 then
testoXpagina(i)=Mid(testo,numeroIniziale,numeroMassCaratteri)
else
testoXpagina(i)=Mid(testo,numeroIniziale,Len(testo))
end if
numeroIniziale=numeroIniziale+numeroMassCaratteri
pagine=pagine-1
next
if (numeroCaratteri > 0) AND (numeroCaratteri>numeroMassCaratteri)then
if (paginaCorrente < 0) Or (Cint(paginaCorrente) > Cint(Ubound(testoXpagina))) then
Response.write ("Pagina inesistente")
else
Response.write(testoXpagina(paginaCorrente))
end if
Response.write ("<br><br>Pagina : ")
For x=0 to Ubound(testoXpagina)
Response.write("<a href=""Questa_pagina.asp?pagina="&x&""">"&x&"</a>&nbsp;&nbsp;" )
Next
else
Response.write(testo)
end if
%>

Bye Bye

Ciao...

Se vuoi contare le parole, devi rifarti agli spazi

Bye

Allora:

Se vuoi dividere il testo in base alle parole, la cosa più immediata che ti salta in mente di fare è quella di "spezzettare gli spazi"

esempio :

testo="CiaoSPAZIOcomeSPAZIOstaiSPAZIO?"

in pratica basta contare o tagliare lo SPAZIO

Per contare gli spazi devi ciclare il testo..... altrimenti usi la funzione Split che serve per spezzettare il testo in tanti piccoli vettori di un array

eccoti un esempio :

spazi=Split(testo,space(1))

così ottieni le singole parole...