webcode 发表于 2013-2-7 18:28:11

清除HTML格式

function clearHTMLCode(originCode)
dim reg
set reg = new RegExp
reg.Pattern = "<[^>]*>"
reg.Global = true
clearHTMLCode = reg.Replace(originCode, "")
end function
页: [1]
查看完整版本: 清除HTML格式