Function HTMLcode(ByVal fString)
fString = Replace(fString, ">", ">")
fString = Replace(fString, "<", "<")
fString = Replace(fString, Chr(32), " ")
fString = Replace(fString, Chr(9), " ")
fString = Replace(fString, Chr(34), "'")
fString = Replace(fString, Chr(39), "'")
fString = Replace(fString, Chr(13), "")
fString = Replace(fString, " ", " ")
fString = Replace(fString, Chr(10), "</BR> ")
HTMLcode = fString
End Function
本文介绍了一个简单的函数,用于将包含特定字符的字符串转换为适用于HTML显示的格式。该函数通过替换原始字符串中的特殊字符来防止潜在的安全风险,并确保文本在网页上正确呈现。
5967

被折叠的 条评论
为什么被折叠?



