'==================================================
'函数名：FpHtmlEnCode
'作用：标题过滤
'参数：fString------字符串
'==================================================
FunctionFpHtmlEnCode(fString)
IfIsNull(fString)=FalseorfString<>""orfString<>"$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$"
EndIf
EndFunction
【FpHtmlEnCode 函数之标题过滤特殊符号的代码】相关文章：
★ 用ASP VBS xmlhttp adodbstream下载和保存图片的代码