存成.asp文件，执行，你用ASPHTTP抓内容的时候用这个很爽，当然自己要改进一下了<%Option ExplicitFunction stripHTML(strHTML)‘Strips the HTML tags from strHTML  Dim objRegExp, strOutput  Set objRegExp = New Regexp  objRegExp.IgnoreCase = True  objRegExp.Global = True  objRegExp.Patter