ubbcode简单实用
%
function ChkBadWords(fString)
if not(isnull(BadWords) or isnull(fString)) then
bwords = split(BadWords, "|")
for i = 0 to ubound(bwords)
fString = Replace(fString, bwords(i), string(len(bwords(i)),"*"))
next
ChkBadWords = fString
end if
end function
function HTMLEncode(fString)
if not isnull(fString) then
'fString = Replace(fString, CHR(38), "&")
'fString = replace(fString, "", "")
'fString = replace(fString, "", "")
'fString = Replace(fString, CHR(39), "'")
'fString = Replace(fSt...[ 查看全文 ]
2016-02-19
标签:
