萬盛學電腦網

 萬盛學電腦網 >> 網絡編程 >> asp編程 >> asp 簡單ubb代碼轉換程序

asp 簡單ubb代碼轉換程序

function  HTMLConvert(fString)
if not isnull(fString) then
fString = replace(fString,   ">",   ">")
fString = replace(fString,   "<",   "&lt;")
fString = Replace(fString,   CHR(34),   "&quot;")
fString = replace(fString,   CHR(32),"&nbsp;")
fString = Replace(fString,   CHR(39),   "&#39;")
Fstring = Replace(fString,   "-[ChangeLine]-","<br>")
HTMLConvert = fString
end if  
end function

copyright © 萬盛學電腦網 all rights reserved