AdvertCN - 广告中国

 找回密码
 立即注册

QQ登录

只需一步,快速开始

PropellerAds
Google-Bing-Mediago-Criteo开户
⚡️按条S5代理⚡️静态⚡️独享⚡️5G广告专用虚拟卡/U充值/高返点皇家代理IP⚡️#1性价比⚡️
Mediabuy⚡️玩家开户首选【鲁班跨境通-自助充值转账】FB/GG/TT❤️官方免费开户Affiliate 全媒体流量资源⚡️
Taboola/Outbrain /Bing⚡️一级代理开户投流-7*24h❤️人工在线【官方】❤️搜索套利买量投流开户独立站⚡️开户投放
⚡️AdsPower:安全不封号,高效自动化Google FB TK游戏代投⚡️E.PN 虚拟卡⚡️BINOM TRACKER 60% OFF!
比Adplexity还好用的Spy工具ADPLEXITY + ADVERTCN7200W全球动态不重复住宅IP代理全球虚拟卡, 支持U充值
各种主页、账单户、BM户(优势)⚡️TikTok企业户,bm户,账单户IPCola原生住宅IP⚡️$1.8/条双ISP提供TK企业新户老户、谷歌新户老户
海外CL企业户源头FB虚拟卡⚡️消费越多返现越多最大欧洲Nutra网盟BA找量 FB个号1块一个
TK老户/国内外端口/预审/加白SX.ORG 高质量代理⚡235+ 地区GG,FB,TK, 欧美源头, 欢迎合作广告位出租
8500万高质量住宅IP,助力各种需求虚拟卡返佣1%,国内持牌机构  
查看: 9795|回复: 7

[业界] 求推荐一个一键提取网站里面的URL且根据域名去重复的小...

[复制链接]

36

主题

210

广告币

294

积分

初级会员

Rank: 2

积分
294
发表于 2016-2-26 16:08:04 | 显示全部楼层 |阅读模式
回复

使用道具 举报

2

主题

1475

广告币

1818

积分

高级会员

Rank: 4

积分
1818

社区QQ达人

发表于 2016-2-26 16:17:11 | 显示全部楼层
  1. #region 抓取全站链接
    " g' y9 m, B- c. A7 I1 F8 t  A6 y
  2.         public static List<string> GetAllHref(string url)6 B3 z- Q# z3 o. W0 W. u# N# l0 T
  3.         {. E; ]( A$ V8 @+ D+ N
  4.             List<string> allHref = new List<string>();, i/ A& f$ ~3 [) G7 g
  5.             try
    % V( T1 S$ G2 D+ q
  6.             {
    ' F1 [9 C9 c9 d9 P
  7.                 string strhtml = soso.getHtml(url, "", true);) {2 t, W; O1 q) X
  8.                 if (strhtml != "error")* W4 h: m! \* I# v  ~! y: O+ m
  9.                 {+ ]6 u/ \& [0 k; b  U! U0 X' h9 ]8 o
  10.                     Regex reg = new Regex(@"(?is)<a[^>]*?href=(['""]?)(?<url>[^'""\s>]+)\1[^>]*>(?<text>(?:(?!</?a\b).)*)</a>");9 H8 v9 m  `2 ~/ e
  11.                     MatchCollection mc = reg.Matches(strhtml);. o$ w" S# t5 L8 a5 y
  12.                     foreach (Match m in mc)
    " _- u2 Y$ T9 _! K2 b. t
  13.                     {
    # L. X4 s9 D/ K
  14.                         Uri uri = new Uri(url);8 }0 r! B/ d0 s, L
  15.                         Uri thisUri = new Uri(uri, m.Groups["url"].Value);
      e+ W% y$ C* y/ L; h6 T9 A
  16.                         string fullUrl = "";3 f+ i  K, H/ {6 j+ ~
  17.                         if (m.Groups["url"].Value.StartsWith("http"))4 U, u$ y9 n. z) X) ~* @3 _7 T) [6 W
  18.                         {& [8 F) n6 h5 y  o" w
  19.                             fullUrl = m.Groups["url"].Value;
    ( I5 }9 f: }' U
  20.                         }
    . ?( {. ^; A0 U2 G1 i1 Y2 [
  21.                         else
    6 I* M+ j( m7 Y% l
  22.                         {
    , M9 I0 h) e/ u! E& l( E2 Y% d7 u
  23.                             fullUrl = thisUri.ToString();
    ' [4 H& J' T% s. ?4 k' K' P
  24.                         }* o4 P5 s. `* x) Y, V4 ]
  25.                         allHref.Add(fullUrl);& `% M, `* u, B4 Q) u) [  l
  26.                         //Console.WriteLine("原链接:" + m.Groups["url"].Value);
    / y' i5 d9 S0 n8 @2 X$ g
  27.                         //Console.WriteLine("文本标记:" + m.Groups["text"].Value);/ r" n) T4 p/ K: V2 x5 T& `9 x6 L! o
  28.                         //Console.WriteLine("补全链接:" + fullUrl);
    ' v/ z! E. Y" b4 S/ e3 x- E
  29.                         //Console.WriteLine("…………………………………………");, ~# F* Q/ B% B, A. m; p
  30.                     }/ h- \3 C! W; B( L- P* [8 u
  31.                 }! [( I( i/ K$ \
  32.             }5 V7 t5 Q- D) N4 Q% P# d' O6 u
  33.             catch (Exception ex)
      L, I8 v3 s* U1 J. c
  34.             { }
    % U/ J! t6 D  A4 b( ~  E: Z1 H
  35.             return allHref;
    / E! [/ {( b7 D, B3 B* M
  36.         }% C7 e/ e7 w2 Q) B- k# |4 A
  37.         #endregion
复制代码

5 o( P4 ]9 ~/ a6 w% l: j
" f5 G& p, p, J, J  H) a

  1. . [  [4 [' ^4 ~% s
  2. # B7 [4 y( c3 r, G6 K* ?
  3. ; V& U8 I9 ]7 h0 |* E: y$ @
  4. #region 数据去重$ x' s5 w3 v8 N( ?. e
  5.         /// <summary>
    % P: h$ V9 r- C/ b; d
  6.         /// List<string>去重1 l% s- f4 Q& g+ \$ F, d
  7.         /// </summary>6 o7 X; U3 N% w& f* c2 r
  8.         /// <param name="list"></param>
    " ?6 \/ m5 m9 |5 ?; w
  9.         /// <returns></returns>
    * {8 m; `$ k) ]- W& M2 J
  10.         public static List<string> getUnqueList(List<string> list)1 f* L0 Y( `- c, d7 K. K( Y7 x
  11.         {
    : w' }* _: C; B4 n- f' L
  12.             List<string> list1 = new List<string>();0 R7 G% N* l, W- o, `9 \
  13.             Hashtable hash = new Hashtable();1 o3 U1 t# T" x. m8 T4 f
  14.             foreach (string s in list)6 N, w: ]' L7 {; D. ]
  15.             {
    & j- L4 x( b' k- I/ l& y& O
  16.                 if (!hash.ContainsKey(s))
    : o/ J1 J! t0 n$ J
  17.                 {0 A. ]% g5 n. |! e
  18.                     hash.Add(s, s);8 }3 \! M% @9 d" M) u3 L" r* l
  19.                     list1.Add(s);( Y# k5 {/ P4 H. l7 `
  20.                 }
    * z) Z. j" @" T. [
  21.             }
    # n) i7 a) Q$ y' ~) k/ l, q- r$ r
  22.             hash.Clear();
    $ R" s6 L5 a  z" s4 e
  23.             hash = null;
    7 d7 C1 |- r  @
  24.             return list1;- ]3 N5 \/ j' Y  m
  25.         }. O" P% ]$ b+ o8 B" B
  26.         #endregion
复制代码
' M) J" h* m( `
  ]9 _" C) Z5 t/ H' P! \* o

点评

谢谢分享  发表于 2016-2-27 15:15
十分感谢!!!非常感谢!!  详情 回复 发表于 2016-2-26 16:20
回复 支持 反对

使用道具 举报

36

主题

210

广告币

294

积分

初级会员

Rank: 2

积分
294
 楼主| 发表于 2016-2-26 16:20:16 | 显示全部楼层

6 \; @3 A; ]! s十分感谢!!!非常感谢!!

点评

缺少一个gethtml,用下面这个:  详情 回复 发表于 2016-2-26 16:23
回复 支持 反对

使用道具 举报

2

主题

1475

广告币

1818

积分

高级会员

Rank: 4

积分
1818

社区QQ达人

发表于 2016-2-26 16:23:12 | 显示全部楼层
guys 发表于 2016-2-26 16:20; Y5 N" C, i" B! W( s  s. H
十分感谢!!!非常感谢!!

4 d7 Y* S0 v/ O; U/ ?+ I; h缺少一个gethtml,用下面这个:
% Z- @. J1 F  u. h9 H
  1.      public string getHtml(string url, string charSet, bool UseUTF8CharSet)//url是要访问的网站地址,charSet是目标网页的编码,如果传入的是null或者"",那就自动分析网页的编码 $ t& F& \' @; y) R3 p9 {" c* m
  2.         {: @" {0 Q4 i+ d  H1 I6 E
  3.             string strWebData = "error";, g2 y2 d, w6 u2 G% @7 @
  4.             try
    % X/ ~( M  c- a" L2 B1 Q
  5.             {" A9 C$ ^0 H: ~0 Q4 p/ g/ ?" m& c
  6.                 WebClient myWebClient = new WebClient(); //创建WebClient实例myWebClient
    7 A2 m1 S0 X1 i: x0 r) B
  7.                 // 需要注意的:
    # k& O4 `' J7 O
  8.                 //有的网页可能下不下来,有种种原因比如需要cookie,编码问题等等
    : l% S& I% a$ D. V
  9.                 //这是就要具体问题具体分析比如在头部加入cookie & w0 m( X- c' g/ K
  10.                 // webclient.Headers.Add("Cookie", cookie);
    & H) v" l1 d# Y+ B% j0 W
  11.                 //这样可能需要一些重载方法。根据需要写就可以了
    ' q& f6 e0 h+ G4 q" B
  12.                 myWebClient.Headers.Add("User-agent", "Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 6.1; Trident/4.0; SLCC2; .NET CLR 2.0.50727; .NET CLR 3.5.30729; .NET CLR 3.0.30729; Media Center PC 6.0; .NET4.0C; .NET4.0E)");
    ) _9 i: t2 S! B& p. y0 w
  13.                 //myWebClient.Headers.Add("User-agent", "Mozilla/5.0 (compatible; Baiduspider/2.0; +http://www.baidu.com/search/spider.html)");8 ~# D" P0 d% ?$ _+ R
  14.                 //获取或设置用于对向 Internet 资源的请求进行身份验证的网络凭据。 $ @% t+ B+ z* w3 ?# n% D
  15.                 myWebClient.Credentials = CredentialCache.DefaultCredentials;: y  c7 T6 m" k6 m/ S" h# a% Q
  16.                 //如果服务器要验证用户名,密码
    " w, _: {: L9 D: }+ A6 l  I
  17.                 //NetworkCredential mycred = new NetworkCredential(struser, strpassword); % u+ x" Q$ `; m
  18.                 //myWebClient.Credentials = mycred;
    5 b0 }+ Y& V! y& t# A. m  s; `  s+ F
  19.                 //从资源下载数据并返回字节数组。(加@是因为网址中间有"/"符号)
    * z# v$ o' H, V1 N9 E
  20.                 byte[] myDataBuffer = myWebClient.DownloadData(url);( F' W7 `% Z1 \; o# g, Z
  21.                 strWebData = Encoding.Default.GetString(myDataBuffer);
    7 `, S: [  {) I  x3 _

  22. . ~6 V* v: B) E* D- [
  23.                 //获取网页字符编码描述信息
    6 b. y. `( k# t
  24.                 Match charSetMatch = Regex.Match(strWebData, "<meta([^<]*)charset=([^<]*)"", RegexOptions.IgnoreCase | RegexOptions.Multiline);4 x- [" Z" `! E. Y3 `
  25.                 string webCharSet = charSetMatch.Groups[2].Value;4 J5 J+ w& y& j! X7 r: M0 l
  26.                 if (charSet == null || charSet == "")
    + b: U) q3 P$ r; V' w# d$ X
  27.                     charSet = webCharSet;
    + r$ \0 \9 i  c+ M) o* ^, {
  28.                 if (charSet.Length > 0)# E) E# ~; X% s/ m1 H6 ?
  29.                 {
    - G% t! X% p1 D* A/ D! D; U) o
  30.                     charSet = charSet.Replace(""", "");, M8 \& {! \. \' I+ n
  31.                 }
    * F0 ^3 \- m1 V. X& ^1 S% y% B/ q
  32.                 if (UseUTF8CharSet)
    ' E( P; b8 R* V2 T
  33.                 {
    & l4 _5 n8 `: m0 c7 ?" y
  34.                     if (charSet == null || charSet.Length == 0)% e) t$ P( X5 w' Q9 h8 z: X
  35.                     {
    8 I. c) Y5 W( p" ?, ~
  36.                         charSet = "utf-8";
    - \5 w8 C5 r% e
  37.                     }
    5 }: b: ?2 |9 Z1 p0 Z" T5 e4 G
  38.                 }
    4 t9 g+ X) W4 |( Y* V3 [/ F8 h
  39.                 if (charSet != null && charSet != "" && Encoding.GetEncoding(charSet) != Encoding.Default)
    / y0 Y7 k: Z) k0 ^% w. i
  40.                     strWebData = Encoding.GetEncoding(charSet).GetString(myDataBuffer);
    8 R8 O, R2 t3 u. q
  41.   Z' p7 @; l9 ?. v4 u& h
  42.             }2 ?0 _6 H& z0 V! W
  43.             catch (Exception)# U$ `/ a3 M" g; M' r8 C) ]6 I
  44.             {- o" z! y7 U4 w, ?
  45.                 strWebData = "error";
    1 g$ c  ^7 k3 {, ^) m' C% F
  46.             }
    . k9 c. v. T7 o$ k& n  w% K
  47. 9 ^+ D# v/ h+ |) q) @
  48.             return strWebData;6 {4 t0 m: g2 X. S" h
  49.         }
复制代码

1 J2 \0 k/ w# ^; t
! }/ L; |% v9 `! Y
回复 支持 反对

使用道具 举报

0

主题

0

广告币

13

积分

新手上路

Rank: 1

积分
13
发表于 2016-2-26 19:05:59 | 显示全部楼层
weishaneweishane
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

关于我们|联系我们|DMCA|广告服务|小黑屋|手机版|Archiver|Github|网站地图|AdvertCN

GMT+8, 2026-2-28 16:11 , Processed in 0.051363 second(s), 17 queries , Gzip On, MemCache On.

Copyright © 2001-2023, AdvertCN

Proudly Operating in Hong Kong.

快速回复 返回顶部 返回列表