400-685-0732

WJMonitor舆情之声

企业大数据智能舆情监测管理解决方案

全网监测海量数据按需发布监测预警

实时把握舆情动态精准追溯信息源头

用工具去拿来

用工具去拿来

rude 暂无评论
SEO工具

拿来,就是去拿,然后拿来。当然,去拿之前,你也要先确认下哪里有,那里的好不好,对不对,是不是你想要的。

至于拿来之后,你是打算晒好晾干,剁吧剁吧红烧还是清蒸,都是后话。

——————上面,是两行废话——————————————

前段时间群里闲聊,一哥们说到自己手里有200多个站,火车头批量采集内容更新,买点外链,待网站权重上去后,卖点链接,卖卖广告,小日子过的虽然不能说美不胜收,但总归也是凑合。

说白了,其实是一些工具用的到位,可以帮助你省去很多人工。

例子:excel批量获取网页title

同事L想把自己的网站的TKD修改下,思考之后,觉得需要先把页面现有的TKD弄出来,说干就干,开始打开网址,查看源代码,将url、tkd记录在excel中。一个两个网址,不会觉得什么,其实多了,我知道,大家都会嫌烦。

那就试着用工具去做一些事情吧:

第一步,需要先把网址弄出来

获取网址,其实完全可以通过导航,网站地图等去复制源代码,然后批量替换,分列去获取网址及对应的栏目名称。

第二步,用excel里面的vba去获取TKD

打开excel,按alt+f11,在弹出的窗口中点击【插入】,插入【模块】,然后在模块中插入如下代码:

Function Title(ByVal url As String) As String
On Error Resume Next
url = “http://” & Replace(url, “http://”, “”)
With CreateObject(“Msxml2.XMLHTTP”)
.Open “get”, url, False
.send
Title = Split(Split(.responsetext, “<title>“)(1), “</title>“)(0)
End With
End Function

注意:标绿处为函数名称,标红处为你想获取内容所在代码位置前后的唯一的标识。

点击保存,然后关闭当前窗口,这时,在你的excel中就出现了一个名为title的函数。然后=title(你想要的title的网址),OK。

然后,修改标红处,你就可以批量获得keywords与description啦。

Function Keywords(ByVal url As String) As String
On Error Resume Next
url = “http://” & Replace(url, “http://”, “”)
With CreateObject(“Msxml2.XMLHTTP”)
.Open “get”, url, False
.send
Keywords = Split(Split(.responsetext, “<meta name=””keywords”” content=”””)(1), “”””)(0)
End With
End Function

Function Description(ByVal url As String) As String
On Error Resume Next
url = “http://” & Replace(url, “http://”, “”)
With CreateObject(“Msxml2.XMLHTTP”)
.Open “get”, url, False
.send
Description = Split(Split(.responsetext, “<meta name=””description”” content=”””)(1), “”””)(0)
End With
End Function

把代码用txt记下来,多用几次,记住步骤,一切都变的so easy了。

嗯?你说啥?前面说到了一个火车头?哈哈,最近我也一直在尝试着使用,待全部熟悉了,再给大家继续分享。
文军二维码

推荐阅读

三个不同的excel函数_文军营销博客… 今日头条与百度熊掌号 新手学习SEO:如何删除百度下拉提示词 上一篇: 用工具去拿来 下一篇: 主动提交—网站收录问题解决新方案 最新...公司新开发的几个SEO工具_文军营销博客优词网系统的实时工具家族,最近又迎来了新成员,不过暂时是放在系统内部,免费会员...用工具去拿来 百度站内搜索功能使用心得? 关于相关文章推荐的实现方式 百度站长平...百度站内搜索功能使用心得?_文军营销博客百度开放站内搜索功能已经许久了,前段时间只是了解,但一直没去尝试。近日忽闻...上一篇: 关于相关文章推荐的实现方式 下一篇: 用工具去拿来 发表评论 评论 ...站内优化软件:on-page optimization_文军营销博客rude 一条评论 SEO工具 对于SEOer来说,站内分析和站内优化是关键的一步,也是...用工具去拿来 百度站内搜索功能使用心得? 关于相关文章推荐的实现方式 百度站长平台...网站站内优化神器-Xenu工具介绍_文军营销博客一款深受好评和个人喜爱的神奇工具,业内人士经常用来检测网站的死链(状态返回码为...用工具去拿来 百度站内搜索功能使用心得? 关于相关文章推荐的实现方式 百度站长平...话说这些都是干货,不含一点水分_文军营销博客《用工具去拿来》http://www.SEOsos.cn/seo-tools/get-it-freely.html),偌,就是这篇。里面介绍了三段代码,这些代码在Excel中可以很好使用。...

发表评论

站内搜索