最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
html 过滤与敏感字符过滤转换程序
时间:2022-06-30 09:13:51 编辑:袖梨 来源:一聚教程网
Function HTMLEncode(str,isRequest)
If isRequest = 1 Then
str = safeRequest(str,0)
End If
If str = "" Or IsNull(str) Or IsEmpty(str) Then
HTMLEncode = ""
Exit Function
End If
' str = Replace(str,"&","&")
str = Replace(str,"<","<")
str = Replace(str,">",">")
str = Replace(str,"'","'")
str = Replace(str,"""",""")
str = Replace(str," "," ")
str = Replace(str,vbcr,"")
' str = Replace(str,vblf & vblf,"
")
' str = Replace(str,vblf,"
")
HTMLEncode = Str
End Function
Public Function HTMLDecode(str)
If str = "" Or IsNull(str) Or IsEmpty(str) Then
HTMLDecode = ""
Exit Function
End If
str = Replace(str,"&","&")
str = Replace(str,"<","<")
str = Replace(str,">",">")
str = Replace(str,"'","'")
str = Replace(str,""","""")
str = Replace(str," "," ")
' str = Replace(str,"
",vbcrlf)
' str = Replace(str,"
",vblf)
HTMLDecode = str
End Function
相关文章
- 解限机白虹怎么玩 白虹技能解析 07-10
- 感动女生哭的话 07-10
- 魔兽世界怀旧服埃索达怎么去暴风城-怀旧服埃索达去暴风城方法 07-10
- PS巧用图层和画笔功能制作抽象人物肖像画教程 07-10
- win11如何打开控制面板?win11控制面板的三种打开方法 07-10
- 微信公众号怎么优化排名? 07-10