texto=""
for I=LBound(descipcion) to UBound(descipcion)
Cantidaddescripciones = UBound(descipcion)
texto = texto&Replace(Replace(RS5("TEXTOS")&"",chr(13),"<b r>"),descipcion(I),"<a href=palabras.asp?titulo="&Replace(Trim(descipcion (I))," ","%20")&">"&descipcion(I)&"</a>")
next
response.write texto
esto te visualiza el texto con las palabras que quieres.
en la variable texto vas concatenando hasta que llegas a la condicion de parada
A ver si ahora tienes las cosas mas claras