asp 去掉html中的table正则代码函数

'去掉html中的table代码

Function OutTable(str)

dim a,re

set re=new RegExp

re.pattern="\<[^>]+()\>"

re.global=true

a=str

OutTable=re.replace(a,"")

End Function