I was able to figure this out using this code.
Code:
<%End if
If Not rsItems.Eof Then
sDescription = rsItems("WEBDESC")
If Not rsParent.Eof Then%>
<%Function stripHTML(strHTML)
Dim objRegExp, strOutput
Set objRegExp = New Regexp
objRegExp.IgnoreCase = True
objRegExp.Global = True
objRegExp.Pattern = "<(.|\n)+?>"
strOutput = objRegExp.Replace(strHTML, "")
strOutput = Replace(strOutput, "<", "<")
strOutput = Replace(strOutput, ">", ">")
stripHTML = strOutput 'Return the value of strOutput
Set objRegExp = Nothing
End Function%>
<%=stripHTML(sDescription)%>
<%End if%>