<%’去掉HTML标记Public Function ReplaceHTML(Textstr)    Dim Str, re    Str = Textstr    Set re = New RegExp    re.IgnoreCase = True    re.Glob...