Slette html mv.

Hej

Jeg har følgende vb-script, som sletter start-taggene.

Function RegReplaceHTML(inStr)
  Dim regEx
  Set regEx = New RegExp
  regEx.Global = True
  regEx.IgnoreCase = True
  regEx.Pattern = "<[^>]+>"
  inStr=regEx.Replace(inStr, "")
  RegReplaceHTML=inStr
End Function

Men jeg vil gerne have det udbygget til også at slette
1) Slut-taggene - dvs. f.eks. "</html>"
2) Alt som står inde i et script-taget.
3) Alle hyperlinks inkl. teksten i linket
4) Alt CSS.

Så der kun bliver ren tekst tilbage.