asp 简单ubb代码转换程序_ASP教程-查字典教程网

",">")fString=replace(..."/>

asp 简单ubb代码转换程序

发布时间：2015-06-05 来源：查字典编辑

摘要：functionHTMLConvert(fString)ifnotisnull(fString)thenfString=replace(fS...

function HTMLConvert(fString)
if not isnull(fString) then
fString = replace(fString, ">", ">")
fString = replace(fString, "<", "<")
fString = Replace(fString, CHR(34), """)
fString = replace(fString, CHR(32)," ")
fString = Replace(fString, CHR(39), "'")
Fstring = Replace(fString, "-[ChangeLine]-","<br>")
HTMLConvert = fString
end if
end function