stai sparando
praticamente vai a leggere l'html generato dalla pagina web come se fosse un testo contenuto in una variabile e con le funzioni testuali recuperi la parte di testo che ti interessa

guarda questo esempio, l'ho scritto ieri per recuperare le coordinate di un luogo da google maps

codice:
<%
Dim objXMLHttp
Set objXMLHttp = Server.CreateObject("Msxml2.xmlhttp")
objXMLHttp.Open "GET", "http://maps.google.it/maps?q=como", false
objXMLHttp.Send


inizio=(Instr(objXMLHttp.responseText, "lat:")-1)
nuovo_testo=right(objXMLHttp.responseText,(len(objXMLHttp.responseText)-inizio))
fine=(Instr(nuovo_testo, "}")-1)
nuovo_testo=left(nuovo_testo,fine)

array_coord=split(nuovo_testo,",")

lat1=replace(array_coord(0),"lat:","")

long1=replace(array_coord(1),"lng:","")

response.write "latitudine:"&lat1&"
"
response.write "longitudine:"&long1&"
"

%>
praticamente in objXMLHttp.responseText ho il codice html della pagina "http://maps.google.it/maps?q=como" sottoforma di testo e da li recupero i dati che mi servono