problemer med Instr når der hentes tekst fra jsp side

Jeg skal brug nogle oplysninger fra en jsp side. dette gør jeg ved at hente siden på følgende måde.

dim objXMLHTTP
set objXMLHTTP = Server.CreateObject("Microsoft.XMLHTTP")

objXMLHTTP.Open "GET", "http://test.JSP", false
objXMLHTTP.SetRequestHeader "Content-type", "text/html"
objXMLHTTP.Send

str = objXMLHTTP.ResponseText

Det virker fint. Så skal jeg have sorteret de data fra som jeg skal bruge, her er et udpluk fra siden med det "tag" jeg er intereseret i:

<div class="stext">
<a href="test.2.jsp">Det her skal jeg bruge</a>
</div>

intStart = InStr(str,"<div class=""stext"">"&vbCr&"<a href=")

men den finder ikke noget! på grund af linieskiftet (vbCr) jeg har også prøvet at skrive (vbCrLf) og:
intStart = InStr(str,"<div class=""stext""><br><a href=")

men ingen ting virker, fjerner jeg det der er efter linieskiftet virker det fint (<a href=), men det skal jeg bruge i min sortering!

Har det noget at gøre med at det er en jsp side? og hvordan løser jeg problemet?