xmlhtml

[asva]

con l'oggetto xmlhtml ho recuperato il codice html di una pagina internet senza particolari problemi utilizzando lo script:
<%
Response.Buffer = True
Dim objXMLHTTP, xml

' Create an xmlhttp object:
Set xml = Server.CreateObject("Microsoft.XMLHTTP")
' Or, for version 3.0 of XMLHTTP, use:
' Set xml = Server.CreateObject("MSXML2.ServerXMLHTTP")

' Opens the connection to the remote server.
xml.Open "GET", "http://www.miosito.it", False

' Actually Sends the request and returns the data:
xml.Send

'Display the HTML both as HTML and as text
Response.Write "<h1>The HTML text</h1><xmp>"
Response.Write xml.responseText
Response.Write "</xmp>"

Set xml = Nothing
%>

il mio problema è recuperare però solo una tabella all'interno del codice html......

cercando in giro mi è stato consigliato di usare dell'espressioni regolari per farlo ...ma sinceramente ho capito ben poco......
qualcuno può darmi un consiglio?

[asva]

ho parzialmente risolto in questo modo:

<%
'Istanzio l'oggetto XMLHTTP
set richiesta = Server.CreateObject("Msxml2.XMLHTTP.3.0")

' Apro l'oggetto ed invio la richiesta
richiesta.Open "GET", "http://www.miosito.it/gio.html", false
richiesta.Send()

'Stampo a video il contenuto del file Xml remoto

stringa=richiesta.responsetext


'Faccio pulizia
Set richiesta = Nothing

set re=server.CreateObject("VBScript.RegExp")
re.Pattern="<table>([^\v]*?)</table>"
set ris = re.Execute(stringa)
if ris.count>0 then
Response.Write ris(0).SubMatches(0)
end if
%>

ottenendo dall'oggetto la sola tabella
dovrei a questo punto estrarre dalla tabella ottenuta le sole righe comprese tra due zone "ROMA NORD" e "ROMA SUD" (la colonna contenente quetsi valori è identificata in testata come "zona")