AdvertCN - 广告中国

 找回密码
 立即注册

QQ登录

只需一步,快速开始

PropellerAds
Google-Bing-Mediago-Criteo开户
⚡️按条S5代理⚡️静态⚡️独享⚡️5G广告专用虚拟卡/U充值/高返点皇家代理IP⚡️#1性价比⚡️
⚡️AdsPower:安全不封号,高效自动化Google FB TK游戏代投⚡️E.PN 虚拟卡⚡️BINOM TRACKER 60% OFF!
比Adplexity还好用的Spy工具ADPLEXITY + ADVERTCN7200W全球动态不重复住宅IP代理虚拟信用卡+独立站收款
全球虚拟卡, 支持U充值Facebook 批量上广告尤里改 - FB 稳定投放免费黑五教程(持续更新、欢迎交流)
FB 三不限源头 - 自助下户充值转款各种主页、账单户、BM户(优势)⚡️TikTok企业户,bm户,账单户IPCola原生住宅IP⚡️$1.8/条双ISP
FB海外户、GG老户、TK加白老户PTM虚拟卡[全新卡BIN+高返点]FB虚拟卡⚡️消费越多返现越多最大欧洲Nutra网盟BA找量
FB个号1块一个TikTok2审户/老户/国内外端口/加白SX.ORG 高质量代理⚡235+ 地区GG,FB,TK, 欧美源头, 欢迎合作❤️
跨境债务催收/风险代理DataImpulse⚡️纯净住宅代理仅 $1FB企业户海外户,授信户,TK加白户广告位出租
8500万高质量住宅IP,助力各种需求虚拟卡返佣1%,国内持牌机构  
查看: 9967|回复: 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 抓取全站链接2 R( o8 J  N+ Q$ h+ |; T/ r& \3 M# s
  2.         public static List<string> GetAllHref(string url)0 A) j# j9 V4 C. C& Y# o- P
  3.         {
    ' O8 F+ s, `3 k  C  H' t
  4.             List<string> allHref = new List<string>();2 R. `: Y. s" D
  5.             try
    ) k( s- n6 y0 Q' k" Q' f
  6.             {9 I! `' O4 c; u0 [  ?7 U: [
  7.                 string strhtml = soso.getHtml(url, "", true);
    # H& A0 U/ A, M6 V0 v4 }; @
  8.                 if (strhtml != "error")9 l4 }: Q, X, w& h/ s! L
  9.                 {
    7 n* ^( v5 ?5 @2 `
  10.                     Regex reg = new Regex(@"(?is)<a[^>]*?href=(['""]?)(?<url>[^'""\s>]+)\1[^>]*>(?<text>(?:(?!</?a\b).)*)</a>");& X: T9 Y" E5 l& I# e8 N3 ~) i
  11.                     MatchCollection mc = reg.Matches(strhtml);4 F; ^/ g7 Q5 Q* n2 M& ^" Y
  12.                     foreach (Match m in mc)
    5 T+ p" I% u% B" X* I' ^; z
  13.                     {
    & S  u# A& F6 _& L( L* j
  14.                         Uri uri = new Uri(url);
    6 l4 I6 _: `% e' V1 @. o
  15.                         Uri thisUri = new Uri(uri, m.Groups["url"].Value);8 d; _5 w( D2 u
  16.                         string fullUrl = "";
    8 g- ~9 ?2 N! C
  17.                         if (m.Groups["url"].Value.StartsWith("http"))/ j0 R8 m0 i. G. P3 _" F3 H
  18.                         {
    # q8 [* q+ N( p4 D/ R) x: N
  19.                             fullUrl = m.Groups["url"].Value;/ p3 Z; N3 K( N" ?$ s, O- n  w  \1 @3 e
  20.                         }+ M" R& O+ Y$ _# Z' j2 P
  21.                         else
    , c$ ]! ^' r9 T) k  Z, S1 t
  22.                         {
    0 n' _& H, l) Q  S. Y- I: D
  23.                             fullUrl = thisUri.ToString();3 k! J" I  ~# m7 C, ~; Z0 c2 t
  24.                         }
    6 z# \6 z# L  i' @3 k
  25.                         allHref.Add(fullUrl);
    * _: b5 R3 \- {7 L4 U/ a; g
  26.                         //Console.WriteLine("原链接:" + m.Groups["url"].Value);4 H5 C% l( c  l& U0 R6 T/ @( S2 D0 M
  27.                         //Console.WriteLine("文本标记:" + m.Groups["text"].Value);+ N# h7 m6 _. s
  28.                         //Console.WriteLine("补全链接:" + fullUrl);
    6 g9 k! {: u$ y- r6 p; g% P' k
  29.                         //Console.WriteLine("…………………………………………");
    - Q4 S8 \' G1 o3 B+ R+ m* R" d
  30.                     }
    , p3 O) P( j0 G  v/ l
  31.                 }
    . f1 t  p7 }) W
  32.             }0 K" b5 x/ R2 c. K" q
  33.             catch (Exception ex)
    * m( ~* C+ o  m
  34.             { }& e+ m8 L8 W/ I0 \
  35.             return allHref;
      t# |5 k1 @1 B$ U' v
  36.         }
    ; C2 D6 v- w* G% \4 H; K" L  p
  37.         #endregion
复制代码

" M2 M/ `( s; Y3 y1 y2 W% y0 k4 ~) a5 j
  1. ( M8 c) r1 h$ A# X# @

  2. 8 S" v4 l/ S, d
  3. ! S  P2 E1 [& ~! H' s
  4. #region 数据去重# Z0 G) s" i5 A! q
  5.         /// <summary>7 Z0 R( H9 W+ y7 S
  6.         /// List<string>去重( ?- u1 o" l$ ^' F, }* W! G4 r0 J8 S  x
  7.         /// </summary>! I; ~  r# S' }6 J( \# F' [
  8.         /// <param name="list"></param>) ]3 m+ @; }2 H/ f+ x
  9.         /// <returns></returns>
    7 x* j7 q9 O, c! c
  10.         public static List<string> getUnqueList(List<string> list); m$ o/ {7 m: j/ B! Z4 R+ N$ O$ B
  11.         {3 }9 e5 j: h2 k1 \
  12.             List<string> list1 = new List<string>();
    6 `/ q' Z, e3 s9 X- c) U
  13.             Hashtable hash = new Hashtable();
    * k8 U/ w( R- k* S
  14.             foreach (string s in list)
    1 e+ X* R1 [; o- ~; y
  15.             {" m. i* u9 L8 X
  16.                 if (!hash.ContainsKey(s))
    - T9 k) ]# _- G) p
  17.                 {; j9 `" L  U; A* U- b( E
  18.                     hash.Add(s, s);
    & A! U- [* l) D, t! t
  19.                     list1.Add(s);: y" b: L" Z' p5 U" h' ?( y+ d- F
  20.                 }
    # O; D1 |& r; l
  21.             }8 F4 C9 O" s, t6 o# C( V# P
  22.             hash.Clear();) W+ K' i  h2 i7 w6 o
  23.             hash = null;
    $ D/ o! r. S" w2 S3 C+ S: K# C
  24.             return list1;, s3 t0 s" G) {- X" l7 ^) m
  25.         }
    ( }* E2 }2 {6 i& {! F& A7 j
  26.         #endregion
复制代码

( Y7 m6 r1 Z2 f1 w( \$ o0 V! G9 W! q: ]: q+ C! U3 x/ Z! c

点评

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

使用道具 举报

36

主题

210

广告币

294

积分

初级会员

Rank: 2

积分
294
 楼主| 发表于 2016-2-26 16:20:16 | 显示全部楼层
$ Q; f; T' N3 o! W& w/ z
十分感谢!!!非常感谢!!

点评

缺少一个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
, q, b: d4 U  L十分感谢!!!非常感谢!!
; I$ F2 t0 e( C) k- x' i: s- k3 ~) a
缺少一个gethtml,用下面这个:2 d: I$ r% r5 Z4 ]8 n
  1.      public string getHtml(string url, string charSet, bool UseUTF8CharSet)//url是要访问的网站地址,charSet是目标网页的编码,如果传入的是null或者"",那就自动分析网页的编码
    9 |6 z2 H5 Q9 i9 Q
  2.         {
    7 I, r6 w: }! I9 k* a
  3.             string strWebData = "error";
    6 `- U! Z3 w- l/ J$ j- a
  4.             try5 j3 G! i3 z5 h  x4 B" R, w( Y+ L5 k& V
  5.             {
    & ?) C3 \0 R  J) b  b: F' {
  6.                 WebClient myWebClient = new WebClient(); //创建WebClient实例myWebClient
    - y" D& H8 D* S) {" w
  7.                 // 需要注意的:
    " M8 k: {# H& ~3 u' d
  8.                 //有的网页可能下不下来,有种种原因比如需要cookie,编码问题等等 $ H) C5 ?& M' \- l
  9.                 //这是就要具体问题具体分析比如在头部加入cookie
    5 D5 n7 |; c/ k9 N* j
  10.                 // webclient.Headers.Add("Cookie", cookie);
    . a9 Q6 s/ v7 g0 [
  11.                 //这样可能需要一些重载方法。根据需要写就可以了) Z: `( x8 T2 X' G  c$ P. E
  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 h1 v6 g( K6 E' Z5 g( p$ a" }  U3 w* R
  13.                 //myWebClient.Headers.Add("User-agent", "Mozilla/5.0 (compatible; Baiduspider/2.0; +http://www.baidu.com/search/spider.html)");' V( o+ L. k" D
  14.                 //获取或设置用于对向 Internet 资源的请求进行身份验证的网络凭据。 ! O, N- ^+ x. D/ u) K
  15.                 myWebClient.Credentials = CredentialCache.DefaultCredentials;
    - w) B( v, u9 e6 j* S
  16.                 //如果服务器要验证用户名,密码
      B* f6 r4 P5 y' r6 e
  17.                 //NetworkCredential mycred = new NetworkCredential(struser, strpassword); ! v1 M" p" F, I& x6 s1 X
  18.                 //myWebClient.Credentials = mycred; ( z1 g0 z- N  W' ?. O, l) ~
  19.                 //从资源下载数据并返回字节数组。(加@是因为网址中间有"/"符号) 3 I- b6 O& {% o* n5 l. J
  20.                 byte[] myDataBuffer = myWebClient.DownloadData(url);! a9 M- m. ^8 U3 o
  21.                 strWebData = Encoding.Default.GetString(myDataBuffer);
    - x" |  f9 C4 u1 F; [, T' ~9 z

  22. ( b$ ~3 R5 M* ?& |; a8 y& V8 w
  23.                 //获取网页字符编码描述信息
    : V1 X, Z- r" r5 ?* K: t5 P9 q
  24.                 Match charSetMatch = Regex.Match(strWebData, "<meta([^<]*)charset=([^<]*)"", RegexOptions.IgnoreCase | RegexOptions.Multiline);6 }: x# F9 I, N) n" @6 W3 O' Y
  25.                 string webCharSet = charSetMatch.Groups[2].Value;
    ' G- z8 }5 m2 T4 |
  26.                 if (charSet == null || charSet == ""), \& _; y. j- {
  27.                     charSet = webCharSet;5 M! w% p- V2 s7 ]- k8 t% z" l
  28.                 if (charSet.Length > 0)
    5 U' Z. D! a! `" c) S. W
  29.                 {/ L) O% m% R. d- h3 {/ o/ Y8 @* U
  30.                     charSet = charSet.Replace(""", "");
    # E5 u% ?' A) ^0 E$ v6 Q1 u
  31.                 }4 V2 u) b  I5 l
  32.                 if (UseUTF8CharSet)
    & Q! _4 w. c9 _1 I( `
  33.                 {
    3 z! g: L7 d0 s1 V5 h9 ?' U
  34.                     if (charSet == null || charSet.Length == 0)
    8 C, p$ x  ^/ k9 i% r
  35.                     {
    / V5 s6 t$ b6 I: p8 W% [
  36.                         charSet = "utf-8";
    - x+ [2 }4 X: I$ G) [
  37.                     }
    ! T& {4 ]% ], W& l
  38.                 }5 e# x. v( R' q% ?
  39.                 if (charSet != null && charSet != "" && Encoding.GetEncoding(charSet) != Encoding.Default)
    # `3 {- B7 x% i/ @6 C/ `- ?
  40.                     strWebData = Encoding.GetEncoding(charSet).GetString(myDataBuffer);
    , K3 z/ l9 u# m! s* @( w- \
  41. ; [! m* d9 Z# s9 @  m
  42.             }
    ( \( `, p# e5 }8 @* o* U
  43.             catch (Exception)
    6 N' V+ M: {' w/ p8 e7 [
  44.             {! x) k4 z$ t0 I" L) z
  45.                 strWebData = "error";
    5 q( O) ^  E6 G( }0 s( I$ }" L1 k. h
  46.             }! p  ]3 [. Z1 x- [9 g& ~
  47. 5 q4 [8 u9 H7 U8 M
  48.             return strWebData;7 R6 \& u) a- f2 d- _4 s8 B2 u
  49.         }
复制代码
: z0 c% f( W. {8 j1 z

, t, U& L# M$ |7 w/ ~
回复 支持 反对

使用道具 举报

0

主题

0

广告币

13

积分

新手上路

Rank: 1

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

使用道具 举报

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

本版积分规则

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

GMT+8, 2026-4-16 23:23 , Processed in 0.050786 second(s), 16 queries , Gzip On, MemCache On.

Copyright © 2001-2023, AdvertCN

Proudly Operating in Hong Kong.

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