Find the following at the very end of inc_func_posting.asp: end if
fString = Replace(fString, "'", "'")
CleanCode = fString
end function
%>
and, immediately above it, add the following:if instr(1,fstring,"[hidden]",1)>0 and instr(1,fstring,"[/hidden]",1)>0 then
arrHidden=split(fstring,"[hidden]",-1,1)
fstring=""
for h=0 to ubound(arrHidden)
if instr(1,arrHidden(h),"[/hidden]",1)>0 then
arrHidden2=split(arrHidden(h),"[/hidden]",-1,1)
if mlev>2 then fstring=fstring&"[hidden]"&arrHidden2(0)&"[/hidden]"
fstring=fstring&arrHidden2(1)
else
fstring=fstring&arrHidden(0)
end if
next
end if