获取某网址上的所有电子邮件地址的ASP.NET代码

获取某网址上的所有电子邮件地址的ASP.NET代码

Admin | 2009-2-22 12:49:38 | TrackRecord: 1406 Times | Tag标签：asp.net 打印本页

您当前所处的位置是：〖首页〗→【文章页】本站共有16个图文教程栏目,请用心拜读!

本站提供经典的Excel公式函数实例,Word排版技巧,PPT教程;同时更兼有Flash,PowerPoint,数据库等技术文章。

using System.Text.RegularExpressions;
using System.IO;
using System.Net;

// 获取网页html代码
string html = GetPageHtml("http://www.dz37w.com","gb2312");

// 获取网页所有email
Regex regex = new Regex(@"([A-Z0-9a-z]+([-+.][A-Z0-9a-z]+)*@[A-Z0-9a-z]+([-.][A-Z0-9a-z]+)*\.[A-Z0-9a-z]+([-.][A-Z0-9a-z]+)*)");
MatchCollection match = regex.Matches(html);
for (int i = 0;i < match.Count;i++)
{
　　if (match[i].Success)
　　{
　　　　Response.Write(match[i].Groups[0].Value + "<br>");
　　}
}

//用户自定义函数
protected string GetPageHtml(string url, string charset)
{
　　WebRequest request = WebRequest.Create(url);
　　HttpWebResponse response = (HttpWebResponse)request.GetResponse();
　　Stream dataStream = response.GetResponseStream ();
　　StreamReader reader = new System.IO.StreamReader(dataStream, System.Text.Encoding.GetEncoding(charset));
　　string pageHtml = reader.ReadToEnd ();
　　reader.Close ();
　　dataStream.Close ();
　　response.Close ();