'========================================================================
'関数名:Scripthtml
'効果:HTMLタグをフィルターします
'Arguments: ConStr----------------------------------------------------------------------------------------------------------------------
'========================================================================
functionscripthtml(byvalconst、tagname、ftype)
薄暗い
setre = newRegexp
re.ignorecase = true
re.global = true
selectcaseftype
case1
re.pattern = "<"&tagname& "([^>])*>"
const = re.replace(connt、 "")
ケース2
re.pattern = "<"&tagname& "([^>])*>。*?</"&tagname& "([^>])*>"
const = re.replace(connt、 "")
ケース3
re.pattern = "<"&tagname& "([^>])*>"
const = re.replace(connt、 "")
re.pattern = "</"&tagname& "([^>])*>"
const = re.replace(connt、 "")
EndSelect
scripthtml = const
setre =何もない
エンド機能