• 按键公众号 :
按键精灵电脑版
立即下载

软件版本:2014.06
软件大小:22.9M
更新时间:2021-12-03

按键精灵安卓版
立即下载

软件版本:3.7.2
软件大小:46.2M
更新时间:2023-05-10

按键精灵iOS版
立即下载

软件版本:1.8.0
软件大小:29.2M
更新时间:2023-03-21

按键手机助手
立即下载

软件版本:3.8.0
软件大小:262M
更新时间:2023-05-30

快捷导航

登录 后使用快捷导航
没有帐号? 注册

发新话题 回复该主题

[郭立员] [安卓按键]按键写入表格的应用(保存seo查关键词的排名) [复制链接]

1#
「按键精灵」按键写入表格的应用(保存seo查关键词的排名)原创2021-07-29 08:13·按键精灵郭立员

大家好,我是公众号3分钟学堂的郭立员,今天继续按键精灵安卓版教程讲解,本期我们来讲一下写入表格的操作。

本期文章讲两个知识点,一是把数据写入表格。二是通过api数据接口获取关键词在百度上的排名情况。


先来说如何把数据写入表格当中,用过采集软件的朋友,可能接触过这么一种文件格式(.csv),这个格式在百度百科里面描述的名字叫“逗号分隔值”,但是从文件图标上来看,和excel表格是一样的,也就是说它也是支持office办公软件打开的。



通过它名字“逗号分隔值”,我们其实可能猜测到,它是可以通过逗号进行分隔的,这个也是它的最大特点。具体来说就是当写入的内容中,有英文状态下的的逗号,就会以逗号分开,放入表格中的不同“列”中。


比如写入的内容是qwe,sdf

看到的效果就是下面这样~



当然,这个csv文件如果用记事本打开,还是显示qwe,sdf



它的用处是啥呢?

对比上面两张图,记事本显示的是一行内容,而csv通过表格工具打开以后是显示一行两列。这样如果多类数据写入的话,就可以实现分列展示。后期需要数据运算处理,直接转化成表格的xls格式,非常方便。


第二个知识点,通过api接口获取关键词在百度搜索中的排名情况。


这里用的是站长工具的api数据接口,http://api.chinaz.com/ApiDetails/BaiduPcRanking


这个接口每天有500个的免费查询量,对于普通的网站的SEO查询是足够了。对于做网站优化,网络推广的朋友还有有一些用处的。


先看看它的API文档:





对于api对接,常见的就是get和post两种方式,本期的案例中两种都支持,那么对于都支持的我们就用相对简单的get方式。


下面我们开始具体的操作,新建一个csv文件,和新建txt一样,直接用file.write命令。


Dim 路径="/sdcard/pictures/排名.csv"

file.Write (路径, "")


生成好csv以后,接下来是要对接api接口了,先去申请一个key,这个需要注册,这里如果你仅仅为了测试,直接用我的:

"c40fa0ee91ea4e2f8fbf303470806194"

每天500的免费量,很可能用的人多,一会儿就没有了。这里建议大家自己申请,如果测试无法使用,可能就是这个原因了。


我们以在百度上搜索“按键精灵安卓版教程”这个关键词为例,看看我在简书上发文章的页面的排名情况。为了能够有数据,这里我刻意找了一个有排名的页面来做案例。

  1. Dim 路径="/sdcard/pictures/排名.csv"
  2. Dim 路径1="/sdcard/pictures/未有排名.csv"
  3. file.Write (路径, "")
  4. file.Write (路径1, "")
  5. Import "shanhai.lua"
  6. Dim key="c40fa0ee91ea4e2f8fbf303470806194"
  7. Dim 域名="www.jianshu.com"
  8. Dim 关键词="按键精灵安卓版教程"
  9. Dim m=ShanHai.GetHttp("http://apidata.chinaz.com/CallAPI/BaiduPcRanking?key="&key&"&domainName="&域名&"&keyword="&关键词)
  10. TracePrint m
  11. Dim a=Encode.JsonToTable(m)
  12. If a["Reason"] = "成功" Then
  13. If UBOUND(a["Result"]["Ranks"]) > -1 Then
  14. If InStr(1, a["Result"]["Ranks"][1]["RankStr"], "1-")>0 Then
  15. Dim x=split(a["Result"]["Ranks"][1]["RankStr"],"-")
  16. Dim y=a["Result"]["Ranks"][1]["Title"]
  17. TracePrint 关键词&"----"&y&"----"&"首页第"&x(1)&"位"
  18. File.writeline(路径,1,关键词&","&y&","&"首页第"&x(1)&"位")
  19. End If
  20. Else
  21. File.writeline(路径1,1,关键词)
  22. End If
  23. End If
复制代码

有排名就可以看到如下效果:关键词+网站标题+百度排名情况



当然这里我还用另外一个csv文件,存储没有排名的关键词,留做备份之后着重优化的词语。


由于之前有多期教程讲过api对接以及返回值为json的提取方式,这里就不重新写了。


需要有几点注意的地方:

一、我在测试时候,url.get命令当网址是拼接的时候,获取不到数据,所以选用了同样功能的山海命令。


二、这个案例中我只写了一个关键词的测试,如果是多个关键词的,可以循环获取。


三、使用脚本时,不能打开csv,否则无法写入数据到csv中,导致脚本报错。


四、这个api数据接口支持批量获取数据,自行研究下吧。


好了,本期内容就这些,觉得文章还行麻烦点个赞。


最后编辑郭立员 最后编辑于 2022-03-06 10:47:53
扫码免费获取我的基础教程【视频教程】
扫码下方二维码关注我的公众号:3分钟学堂

QQ交流群:936858410
2#

手术室

3#

都对的

发新话题 回复该主题