Asp remove HTML Format

Function stripHTML (strHTML)
Dim objRegExp, strOutput
Set objRegExp = New Regexp
ObjRegExp. IgnoreCase = True
ObjRegExp. Global = True
ObjRegExp. Pattern = "<. +?> "
StrOutput = objRegExp. Replace (strHTML ,"")
StripHTML = strOutput
Set objRegExp = Nothing
End Function

======================================

'Limited to 100 strings
Function cutstr (tempstr, tempwid)
If len (tempstr)> tempwid then
Cutstr = left (tempstr, tempwid )&"..."
Else
Cutstr = tempstr
End if
End function

If 'is an image, it is not displayed.
Function cutimg (cutnew)
If instr (cutnew, "IMG")> 0 then
Cutimg = "..."
Else
Cutimg = cutnew
End if
End function