使用PowerQuery自动抓取某度搜索结果首项的网页链接

adasmith

为了提高工作效率，不加班，所以弄了一个excel表，以达成：在首列输入一个公司的名字，通过PowerQuery完成在某度搜索关键字“公司名(空格) site:www.tianyancha.com”，在第二列返回某度搜索结果首项的页面URL。我用了Web.Contents函数，可是返回的结果里面死活找不到首项的返回地址.....所以跑来求助各位大神。此奉上示例文件以及预付我的膝盖..... 示例文件（含M公式）.rar (16.7 KB, 下载次数: 44)

2018-3-25 20:30 上传

点击文件名下载附件

由于示例文件用2010制作，怕大神们的2010以上版本无法打开。因此描述文件制作过程：
1.首列字段名“公司名”，第二行输入“广州市诺信数字测控设备有限公司”；
2.加载至PQ
3.添加自定义列，输入=Web.Contents("https://www.baidu.com/s?wd="&[公司名]&"%20site%3Awww.tianyancha.com")，返回Binary数据，展开....然后就没有然后了

adasmith

再次求救！

fxl447098457

利用Text.FromBinary()返回网页文本，然后进行Text.Split()几次就能得到你要的url了、

adasmith

fxl447098457 发表于 2018-3-29 07:22
利用Text.FromBinary()返回网页文本，然后进行Text.Split()几次就能得到你要的url了、

谢帅哥答！能请您上传一下示例文件吗？

fxl447098457

adasmith 发表于 2018-3-29 23:15
谢帅哥答！能请您上传一下示例文件吗？

let
    源 = Excel.CurrentWorkbook(){[Name="表1_2"]}[Content],
    web= Table.AddColumn(源, "网址", each Text.Split(Text.Split(Text.Split(Text.FromBinary(Web.Contents("http://www.baidu.com/s?wd="
    &[公司名]&"%20site%3Awww.tianyancha.com")),"result c-container "" id=""1"""){1},"href="""){1},""""){0})
in
    web

alin7517

fxl447098457 发表于 2018-3-30 07:26
let
    源 = Excel.CurrentWorkbook(){[Name="表1_2"]}[Content],
    web= Table.AddColumn(源, "网 ...

web= Table.AddColumn(源, "网址", each Text.Split(Text.Split(Text.Split(Text.FromBinary(Web.Contents("http://www.baidu.com/s?wd="
    &[公司名]&"%20site%3Awww.tianyancha.com")),"result c-container "" id=""1"""){1},"href="""){1},""""){0})


请问老师这一步是怎么理解的，能不能帮忙讲解下。