<!--#include file="../inc/jc_conn.asp"-->
<!--#include file="../inc/const.asp"-->
<%
function htmlencode2(fString)
if fString<>"" and not isnull(fstring) then

fString = replace(fString, ">", "&gt;")
fString = replace(fString, "<", "&lt;")

fString = Replace(fString, chr(32), "&nbsp;")
fString = Replace(fString, CHR(10) & CHR(10), "</P><P>")
fString = Replace(fString, CHR(10), "<BR>")
htmlencode2=fString
else
htmlencode2=""
end if
end function
%>