[reg exp] estrarre tutti gli indirizzi email

[saltodifondi]

ciao a tutti,
la mia necessità è quella di estrarre un'indirizzo email del "FROM:" dall'header di un file EML.

From: "YYY YYY" <yyy@yyy.yy>
To: <xxxx@xxx.xxx>
Subject: prova
Date: Wed, 7 Feb 2007 14:40:26 +0100
MIME-Version: 1.0
Content-Type: multipart/alternative;
	boundary="----=_NextPart_000_01E1_01C74AC5.E85907B0"
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 6.00.2600.0000
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2600.0000

è possibile estrarre yyy@yyy.yy con un pattern particolare?

con

set re = server.CreateObject("VBScript.RegExp")
re.Pattern = "from: ([^\v]*?)>"
set ris = re.Execute(lcase(text("prova2.eml",false)))
if ris.count>0 then
  Response.Write ris(0).SubMatches(0)
end if

riesco ad estrarre "yyy yyy" <yyy@yyy.yy

ma io devo estrarre solo yyy@yyy.yy

come procedo?

[Santino83_02]

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

non sono un grande esperto di regExp, però ^\v dovrebbe essere piu corretto di \s\S...

[saltodifondi]

Mentre invece come faccio a ricavare tutti gli indirizzi email di una pagina?

o meglio, di una stringa

ad esempio

stringa = "www.google.com xxx@xxx.xx html.it yyy@yyy.yy"

esiste un patterne che mi restituisce una collection o un array con tutti gli indirizzi email validi?

ovvero
arraycollection(0) contiene xxx@xxx.xx
arraycollection(1) contiene yyy@yyy.yy

[saltodifondi]

oppure il patterne per catturare la riga del FROM: ? aiutatemi