当前位置:首页 > ASP教程 > 应用技巧

FpHtmlEnCode 函数之标题过滤特殊符号的代码

'==================================================
'函数名:fphtmlencode
'作  用:标题过滤
'参  数:fstring ------字符串
'==================================================
function fphtmlencode(fstring)
   if isnull(fstring)=false or fstring<>"" or fstring<>"$false$" then
       fstring=nohtml(fstring)
       fstring=filterjs(fstring)
       fstring = replace(fstring," "," ")
       fstring = replace(fstring,""","")
       fstring = replace(fstring,"'","")
       fstring = replace(fstring, ">", "")
       fstring = replace(fstring, "<", "")
       fstring = replace(fstring, chr(9), " ")' 
       fstring = replace(fstring, chr(10), "")
       fstring = replace(fstring, chr(13), "")
       fstring = replace(fstring, chr(34), "")
       fstring = replace(fstring, chr(32), " ")'space
       fstring = replace(fstring, chr(39), "")
       fstring = replace(fstring, chr(10) & chr(10),"")
       fstring = replace(fstring, chr(10)&chr(13), "")
       fstring=trim(fstring)
       fphtmlencode=fstring
   else
       fphtmlencode="$false$"
   end if
end function
【说明】本文章由站长整理发布,文章内容不代表本站观点,如文中有侵权行为,请与本站客服联系(QQ:)!