Para los mas capos

[byte]

Holas, como les va, mi duda es la siguiente:
Tengo un foro que estoy configurando para que no me salgan errores ni desconfigraciones, y ahora pasa esto:
Tengo que limitar esto ---> <%= Formata(Rs("Assunto")) %>
para que si los caracteres que contiene no tienen ningun espacio dentro de los primeros 30 (caracters) entonces que solamente me muestre los primeros 20. he intentado con esto -->If Instr(left(Rs("Assunto"),30)," ")= 0 OR Instr(left(Rs("Assunto"),30)," ")= 2 then<-- que programe ayer hasta las cuatro de la mañana me tuvo luchando pero me funciona, pero para esto ---> <%= Formata(Rs("Assunto")) %> no funciona (Formata es un formato de texto que me reemplaza los caracteres "<" y ">" por < y > respectivamente) _el error que me sale es este:

Microsoft VBScript runtime error '800a005e'

Invalid use of Null: 'Replace'

/*********/foros/comunidad/config.asp, line 40 ---> el config.asp
es la configuracion que reemplaza los caracteres por los smileys y es alli donde tambien esta la configuracion de "formata", aunque no tenga nada que ver <%= Formata(Rs("Assunto")) %> con los smileys y el replace, ese es el error. Mil gracias maestros del Web.
salu2