recuperare meta tag

[puffetto]

Ciao a tutti
è possibile recuperare il contenuto dei meta tag della pagina default di un sito attraverso l'inserimento dell'url (come accade per l'inserimento su alcuni motori di ricerca) con asp e/o con l'eventuale supporto di xml?

grazie1000

[puffetto]

[albis]

potresti utilizzare Microsoft.XMLHTTP per leggere una pagina remota
prova a dare una occhiata quì
http://forum.aspitalia.com/forum/pos...own.aspx#10482

[puffetto]

fin ci sono arrivato ricavo l'html della pagina ma i problemi li sto incontrando nel ricavare i dati che mi interessano
non riesco a ricavare il contenuto per esempio di questi tag:

<meta name="keywords" content="foto, video, divertente, blog, barzellette, giochi">
<meta name="description" content="il piu bel sito di internet">
<title>il piu bel sito</title>

come posso fare?

[Roby_72]

Tramite espressioni regolari.
Documentati un po' in giro.

Roby

[puffetto]

con le RegExp sono riuscito ad ottenere il contenuto tra i tag <title>
ma non riesco a tirare fuori niente dal tag
<meta name='keywords' content="bla, bla, bla">

questo è il codice che sto utilizzando:

<%
'Dichiaro la variabile
Dim objXMLHttp

'Instanzio l'oggetto XMLHttp
Set objXMLHttp = Server.CreateObject("Msxml2.ServerXMLHTTP.3.0")
response.Buffer=true
'Costruisco e invio la richiesta
objXMLHttp.Open "GET", "http://www.ilsito.com", false

objXMLHttp.Send

'Stampo la risposta
dim stringa
stringa=objXMLHttp.responseText

'Faccio pulizia
Set objXMLHttp = Nothing

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

[santino83_11_04]

non stampa nulla quello script^?

[puffetto]

no zero

[santino83_11_04]

re.Pattern="<title>([^\v]*?)<\/title>"

[moribura]

Mh...grazie ma non l' avevo trovata...forse ho capito come potrei fare...

grazie mille