无法在这个位置找到: head2.htm
当前位置: 建站首页 > 新闻 > 公司新闻 >

运用百度搜索站长外链专用工具和excelVBA迅速递交废弃物外链

时间:2021-04-24 16:54来源:未知 作者:jianzhan 点击:
短视頻,自新闻媒体,达人种草1站服务 外链是1个网站获得检索模块亲睐的关键要素之1,有着强劲且身心健康的外链才可以在检索模块持续的优化算法改善中抵御住各种各样疾风暴雨而

运用百度搜索站长外链专用工具和excelVBA迅速递交废弃物外链


短视頻,自新闻媒体,达人种草1站服务

 

外链是1个网站获得检索模块亲睐的关键要素之1,有着强劲且身心健康的外链才可以在检索模块持续的优化算法改善中抵御住各种各样疾风暴雨而矗立不倒。可是,有时,大家会发现网站的外链1夜之间暴增,在这1链难求的时期,不必太爽呀,这些,干万不必开心太早,睁大双眼看细心再点开看看,靠,都是废弃物外链,这些废弃物外链不但不可以有助于网站的排名反而会被检索模块 关心的 ,假如废弃物外链做到1定的量轻则降权,重则被K。

幸亏,强劲的百度搜索站长专用工具出示了回绝外链的作用,协助大家立即清除这些废弃物外链,但假如大家的网站外链较多,要1条1条的找出这些废弃物還是较为累人的。好在,懒人总有懒人的方法,笔者历经探求,我发现这些废弃物连接有1个相互的特性,便是网站地址中包括了些莫名奇特的字母,如

 

本文更是根据这1特点运用excel出示的VBA开展过虑的,下面详细介绍实际方式。

第1步,从站长专用工具服务平台免费下载全部外链,百度搜索站长服务平台出示了免费下载数据信息的作用,大家免费下载下来,默认设置为csv文件格式。

 

第2步,用excel开启储存的文档,另存为.xls文件格式,如我的外链.xls这是规范的excel文件格式了。插进1个工作中表,将它拖到第2部位,以下图。

 

第3步,这也是最关键的1步了,开启excel菜单》专用工具》宏》Visual Basic编写器

 

加上1个客户窗体,拖1个文字框取名字Txt_Rows,再拖1个按钮取名字Cmd_Find,组成以下页面

 

再点编写器菜单上的专用工具》引入,大家引入1个正在表述式目标Microsoft VBscript Regular Expressions 5.5

 

 

如今大家双击鼠标搜索废弃物外链按钮,进到程序编写方式,键入下列编码

Private Sub Cmd_Find_Click()

With Worksheets(1)

For i = 1 To Int(Txt_Rows.Text)

a = .Cells(i, 2).Value '初始连接

b = GetValue(a, "([A-Z0⑼]{2}.){4,}", 0)

If b "" Then

t = t + 1

Worksheets(2).Cells(t, 1) = a

End If

Next

End With

MsgBox "实行结束"

End Sub

Function GetValue(ByVal Content As String, ByVal patten As String, ByVal n As Integer)

On Error Resume Next

Dim objRE As New RegExp

Dim objMatches As MatchCollection

objRE.pattern = patten

objRE.Global = False

objRE.IgnoreCase = True

Set objMatches = objRE.Execute(Content)

If objMatches.Count 0 Then

m = objMatches.Item(0).SubMatches(n)

GetValue = m

End If

Set objMatches = Nothing

Set objRE = Nothing

If Err Then MsgBox Err.Description

End Function

好了,运作1下(点一下以下图编写器菜单上的3角形),

 

 

键入报表总行数,便可获得結果,

 

拷贝后,进到百度搜索站长专用工具服务平台,大批量递交

 

至此,大功搞成,等候百度搜索站长服务平台解决,但起效時间较慢,笔者的工作经验大概是30天上下,本文由技术专业的竖直招骋网站农业畜牧优秀人才网原創转载请注明出处,本文详细介绍的方式,简易易行,重要是观查废弃物外链的构造,假如有此外独特的构造,改动在其中的正则表达式一部分编码便可,以便网站的良性身心健康发展趋势,充足运用站长服务平台出示给大家的专用工具也是是非非常必要的。


(责任编辑:admin)
织梦二维码生成器
顶一下
(0)
0%
踩一下
(0)
0%
------分隔线----------------------------
无法在这个位置找到: ajaxfeedback.htm
栏目列表
推荐内容


扫描二维码分享到微信

在线咨询
联系电话

400-888-8866