// 过滤html代码
function htmlencode(fstring) {
    fstring = replacenocase(fstring,'>','>','all');
    fstring = replacenocase(fstring,'<','&lt;','all');
    fstring = replacenocase(fstring,chr(32),'&nbsp;','all');
    fstring = replacenocase(fstring,chr(9),'&nbsp;','all');
    fstring = replacenocase(fstring,chr(34),'&quot;','all');
    fstring = replacenocase(fstring,chr(39),'&acute;','all');
    fstring = replacenocase(fstring,chr(10),'<br />','all');
    return fstring;
} 

示例：
<cfoutput>
    <cfset html = "<JustTest>">
    #htmlencode(html)#
</cfoutput>