开启辅助访问 切换到宽版

精易论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

用微信号发送消息登录论坛

新人指南 邀请好友注册 - 我关注人的新帖 教你赚取精币 - 每日签到


求职/招聘- 论坛接单- 开发者大厅

论坛版规 总版规 - 建议/投诉 - 应聘版主 - 精华帖总集 积分说明 - 禁言标准 - 有奖举报

查看: 5560|回复: 10
收起左侧

[已解决] 关于DZ论坛POST回帖被dsign防采集应该怎么解决

 关闭 [复制链接]
结帖率:100% (1/1)
发表于 2017-9-11 18:03:24 | 显示全部楼层 |阅读模式   湖北省武汉市
50精币

取网页源码

取网页源码

dsign

dsign


万年老菜鸟做一个post回帖,被DZ的防采集难住了

刚开始测试的时候post的地址是没有DSIGN后缀的,网站设置了防采集,IP访问过多了后面会生成一个DSIGN(每个帖子是固定的)
现在有两个思路:
1.通过超文本浏览器.跳转 将新地址获取出来 然后再去提取这个参数
2.更换ip
就想问问大手们有没有比这更好的方法 能通过post突破这个防采集的
ps:接触易语言是12年,,中间丢了一段时间感觉快(gen)忘 (ben)干 (mei)净(xue)了(hui),如果您感觉被这个问题拉低了智商,你TM能拿我怎样?

最佳答案

查看完整内容

[e=0].版本 2 .支持库 spec .程序集 窗口程序集_启动窗口 .子程序 寻找重定向URl, 逻辑型 .参数 网址, 文本型 .参数 重定向地址, 文本型, 参考 .局部变量 返回信息, 文本型 .局部变量 URL, 文本型 .局部变量 返回协yi头, 文本型 .局部变量 文件路径, 文本型 .局部变量 位置2, 整数型 .局部变量 位置1, 整数型 .局部变量 href, 文本型 .局部变量 location, 文本型 .局部变量 assign, 文本型 .局部变量 标记文本, 文本型 .局部变量 ...

回答提醒:如果本帖被关闭无法回复,您有更好的答案帮助楼主解决,请发表至 源码区 可获得加分喔。
友情提醒:本版被采纳的主题可在 申请荣誉值 页面申请荣誉值,获得 1点 荣誉值,荣誉值可兑换荣誉会员、终身vip用户组。
快捷通道:申请荣誉值无答案申请取消悬赏投诉有答案未采纳为最佳

本帖被以下淘专辑推荐:

发表于 2017-9-11 18:03:25 | 显示全部楼层   山东省威海市
  
窗口程序集名保 留  保 留备 注
窗口程序集_启动窗口   
子程序名返回值类型公开备 注
寻找重定向URl逻辑型 
参数名类 型参考可空数组备 注
网址文本型
重定向地址文本型
变量名类 型静态数组备 注
返回信息文本型 
URL文本型 
返回协yi头文本型 
文件路径文本型 
位置2整数型 
位置1整数型 
href文本型 
location文本型 
assign文本型 
标记文本文本型 
js文本型 
js脚本类_脚本组件 
运行返回文本型 
等号文本文本型 
replace文本型 
返回信息 = 到文本 (网页_访问 (网址))
返回信息 = 子文本替换 (返回信息, “”, “”, , , )
如果真 (寻找文本 (返回信息, “do=”, , ) ≠ -1)
调试输出 (“do”)
返回 (寻找重定向URl (网址, 重定向地址))

如果真 (寻找文本 (返回信息, “if=”, , ) ≠ -1)
调试输出 (“if”)
返回 (寻找重定向URl (网址, 重定向地址))

如果真 (寻找文本 (返回信息, “function in”, , ) ≠ -1)
调试输出 (“function in”)
返回 (寻找重定向URl (网址, 重定向地址))

如果真 (寻找文本 (返回信息, “in=function”, , ) ≠ -1)
调试输出 (“in=function”)
返回 (寻找重定向URl (网址, 重定向地址))

如果 (寻找文本 (返回信息, “location.assign”, , ) ≠ -1)
调试输出 (“location.assign”)
标记文本 = “location.assign”


如果 (寻找文本 (返回信息, “location.replace”, , ) ≠ -1)
调试输出 (“location.replace”)
标记文本 = “location.replace”


如果 (寻找文本 (返回信息, “location.href”, , ) ≠ -1)
调试输出 (“location.href”)
标记文本 = “location.href”


如果真 (寻找文本 (返回信息, “['assign']”, , ) ≠ -1)
location = 找文本 (返回信息, “location”)
如果真 (location ≠ “”)
如果真 (寻找文本 (返回信息, location + “['assign']”, , ) ≠ -1)
调试输出 (“locationXXX[assign]”)
标记文本 = location + “['assign']”



如果真 (标记文本 = “”)
如果真 (寻找文本 (返回信息, “['replace']”, , ) ≠ -1)
location = 找文本 (返回信息, “location”)
如果真 (location ≠ “”)
如果真 (寻找文本 (返回信息, location + “['replace']”, , ) ≠ -1)
调试输出 (“locationXXX[replace]”)
标记文本 = location + “['replace']”



如果真 (标记文本 = “”)
如果真 (寻找文本 (返回信息, “['href']”, , ) ≠ -1)
location = 找文本 (返回信息, “location”)
如果真 (location ≠ “”)
如果真 (寻找文本 (返回信息, location + “['href']”, , ) ≠ -1)
调试输出 (“locationXXX[href]”)
标记文本 = location + “['href']”



如果真 (标记文本 = “”)
assign = 找文本 (返回信息, “'assign'”)
如果真 (assign ≠ “”)
如果 (寻找文本 (返回信息, “location[” + assign + “]”, , ) ≠ -1)
调试输出 (“location[assignXXX]”)
标记文本 = “location[” + assign + “]”

location = 找文本 (返回信息, “location”)
如果真 (location ≠ “”)
如果真 (寻找文本 (返回信息, location + “[” + assign + “]”, , ) ≠ -1)
调试输出 (“locationXXX[assignXXX]”)
标记文本 = location + “[” + assign + “]”




如果真 (标记文本 = “”)
replace = 找文本 (返回信息, “'replace'”)
如果真 (replace ≠ “”)
如果 (寻找文本 (返回信息, “location[” + replace + “]”, , ) ≠ -1)
调试输出 (“location[replaceXXX]”)
标记文本 = “location[” + replace + “]”

location = 找文本 (返回信息, “location”)
如果真 (location ≠ “”)
如果真 (寻找文本 (返回信息, location + “[” + replace + “]”, , ) ≠ -1)
调试输出 (“locationXXX[replaceXXX]”)
标记文本 = location + “[” + location + “]”





如果真 (标记文本 = “”)
href = 找文本 (返回信息, “'href'”)
如果真 (href ≠ “”)
如果 (寻找文本 (返回信息, “location”“[” + href + “]”, , ) ≠ -1)
调试输出 (“location[hrefXXX]”)
标记文本 = “location[” + href + “]”

location = 找文本 (返回信息, “location”)
如果真 (location ≠ “”)
如果真 (寻找文本 (返回信息, location + “[” + href + “]”, , ) ≠ -1)
调试输出 (“locationXXX[hrefXXX]”)
标记文本 = location + “[” + href + “]”




如果真 (标记文本 = “”)
如果 (寻找文本 (返回信息, “location=”, , ) ≠ -1)
调试输出 (“location”)
标记文本 = “location=”











如果 (标记文本 = “”)
返回 ()

返回信息 = 子文本替换 (返回信息, 标记文本, “function GetUrl(){return turl;}var turl”, , , )
位置1 = 寻找文本 (返回信息, “function GetUrl(){return turl;}var turl”, , )
等号文本 = 取文本中间 (返回信息, 位置1 + 取文本长度 (“function GetUrl(){return turl;}var turl”), 5)
如果真 (寻找文本 (等号文本, “=”, , ) = -1)
返回信息 = 子文本替换 (返回信息, “function GetUrl(){return turl;}var turl”, “function GetUrl(){return turl;}var turl=”, , , )

js = “var window={},location={};” + 返回信息
如果 (js脚本.执行 (js))
运行返回 = js脚本.运行 (“GetUrl”)
如果 (运行返回 = “”)
返回 ()

重定向地址 = 运行返回
返回 ()

返回 ()


子程序名返回值类型公开备 注
找文本文本型 
参数名类 型参考可空数组备 注
全部文本文本型
待查找文本文本型
变量名类 型静态数组备 注
位置1整数型 
位置2整数型 
返回文本文本型 
位置1 = 寻找文本 (全部文本, 待查找文本, , )
如果 (位置1 ≠ -1)
位置2 = 倒找文本 (全部文本, “;”, 位置1, )
如果 (位置2 ≠ -1)
返回文本 = 取文本中间 (全部文本, 位置2 + 1, 位置1 - 位置2 - 1)
' 针对 ;}   }; 处理
返回文本 = 子文本替换 (返回文本, “}”, “”, , , )
返回文本 = 子文本替换 (返回文本, “=”, “”, , , )
返回文本 = 取文本左边 (全部文本, 位置1 - 1)
返回文本 = 子文本替换 (返回文本, “=”, “”, , , )




如果真 (寻找文本 (返回文本, “'”, , ) ≠ -1)
位置2 = 倒找文本 (全部文本, “}”, 位置1, )
如果 (位置2 ≠ -1)
返回文本 = 取文本中间 (全部文本, 位置2 + 1, 位置1 - 位置2 - 1)
' 针对 ;}   }; 处理
返回文本 = 子文本替换 (返回文本, “;”, “”, , , )
返回文本 = 子文本替换 (返回文本, “=”, “”, , , )
返回文本 = 取文本左边 (全部文本, 位置1 - 1)
返回文本 = 子文本替换 (返回文本, “=”, “”, , , )


返回 (删全部空 (返回文本))
子程序名返回值类型公开备 注
_按钮1_被单击  
变量名类 型静态数组备 注
最新网址文本型 
调试输出 (寻找重定向URl (“http://localhost/discuz/forum.php?mod=viewthread&tid=1”, 最新网址))
调试输出 (最新网址)


i支持库列表   支持库注释   
spec特殊功能支持库

点评

这都不给结贴吗   湖南省湘潭市  发表于 2019-5-14 22:38

评分

参与人数 1好评 +1 精币 +60 收起 理由
赵五 + 1 + 60 奖励可能会迟到,但永远不会缺席。

查看全部评分

回复

使用道具 举报

结帖率:95% (37/39)

签到天数: 13 天

发表于 2017-9-11 18:31:10 | 显示全部楼层   山东省威海市
要么找人解js,要么总之是花钱的,就看大神闲的蛋疼来给你解决不
回复

使用道具 举报

结帖率:100% (1/1)
 楼主| 发表于 2017-9-15 01:33:30 | 显示全部楼层   湖北省武汉市
易赐源 发表于 2017-9-13 01:40
[e=0].版本 2
.支持库 spec

不行啊,返回的源码是一堆乱码,寻找文本没有用
-------------------------------------------------------------

<script type="text/javascript">AI='r';_yTZaw = 'href';_X639Z = window;_U5u5H = 'replace';function Vm(Vm_){function l(){return getName();};return l();return 'Vm'}d2=function(){'return d2';return 'm';};tkWu='1.h';XDd=function(XDd_){var _X=function(XDd_){'return XDd';return XDd_;}; return _X(XDd_);};fs='e';function PK(PK_){function a(){return getName();};return a();return 'PK'}_sHwCN = location;function Q366(Q366_){function _Q(Q366_){function e(){return getName();}function Q366_(){}return e();return Q366_}; return _Q(Q366_);}v3='/';function Tp(Tp_){function a(){return getName();};return a();return 'Tp'}x27=function(x27_){var _x=function(x27_){'return x27';return x27_;}; return _x(x27_);};G6=function(){'G6';var _G=function(){return 's'}; return _G();};Qf='4';z9=function(){'z9';var _z=function(){return '_'}; return _z();};jOzj=function(){'jOzj';var _j=function(){return '101'}; return _j();};_Nlpec = 'assign';function if(if_){function d(){return getName();};return d();return 'if'}function uY(){'return uY';return '-'}function XZZD(){'return XZZD';return '-1-'}function ebJ(){'return ebJ';return '7b'}function Tc(Tc_){function _T(Tc_){function e(){return getName();}function Tc_(){}return e();return Tc_}; return _T(Tc_);}q5=function(){'return q5';return 'h';};function getName(){var caller=getName.caller;if(caller.name){return caller.name} var str=caller.toString().replace(/[\s]*/g,"");var name=str.match(/^function([^\(]+?)\(/);if(name && name[1]){return name[1];} else {return '';}}location.replace(v3+(function(){'return rR';return (function(){return 't';})();})()+q5()+AI+Tc('Ow')+Tp('qX')+if('L8')+uY()+jOzj()+(function(){'return g4';return (function(){return '9';})();})()+XZZD()+tkWu+(function(){'return gz';return (function(){return 't';})();})()+d2()+Vm('NO')+(function(){'return N8';return '?'})()+z9()+(function(){'return V1';return 'd'})()+G6()+XDd('ig')+(function(zu2_){'return zu2';return zu2_})('n=')+x27('0f')+PK('Bm')+ebJ()+fs+Qf+Q366('f0Z5'));_X639Z['href']=v3+(function(){'return rR';return (function(){return 't';})();})()+q5()+AI+Tc('Ow')+Tp('qX')+if('L8')+uY();</script>
回复

使用道具 举报

发表于 2017-9-15 01:44:17 | 显示全部楼层   山东省威海市
从小缺钙又缺爱 发表于 2017-9-15 01:33
不行啊,返回的源码是一堆乱码,寻找文本没有用
---------------------------------------------------- ...

不会吧?我本地测试的挺好,要不你给我网址我看看!
回复

使用道具 举报

发表于 2017-9-15 01:53:24 | 显示全部楼层   山东省威海市
易赐源 发表于 2017-9-15 01:44
不会吧?我本地测试的挺好,要不你给我网址我看看!

123.jpg

这一句忘记了,加上!
返回信息 = 文本_取出中间文本 (返回信息, “<script type=” + #引号 + “text/javascript” + #引号 + “>”, “</script>”)
回复

使用道具 举报

结帖率:92% (85/92)

签到天数: 18 天

发表于 2018-6-26 13:37:32 | 显示全部楼层   山东省青岛市
易赐源 发表于 2017-9-15 01:53
这一句忘记了,加上!
返回信息 = 文本_取出中间文本 (返回信息, “”, “”)

大神,在吗~
回复

使用道具 举报

发表于 2018-7-1 13:11:07 | 显示全部楼层   山东省威海市

???
回复

使用道具 举报

结帖率:92% (85/92)

签到天数: 18 天

发表于 2018-7-2 09:58:47 | 显示全部楼层   山东省青岛市

没事了,就是膜拜一下
回复

使用道具 举报

发表于 2019-10-9 22:04:23 | 显示全部楼层   重庆市
楼主,你可能忘了设置最佳了,   易赐源的答案可以完美解决问题,此问题是17年的问题,我测试目前19年还有效,我强制采纳了。
回复

使用道具 举报

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

本版积分规则 致发广告者

发布主题 收藏帖子 返回列表

sitemap| 易语言源码| 易语言教程| 易语言论坛| 易语言模块| 手机版| 广告投放| 精易论坛
拒绝任何人以任何形式在本论坛发表与中华人民共和国法律相抵触的言论,本站内容均为会员发表,并不代表精易立场!
论坛帖子内容仅用于技术交流学习和研究的目的,严禁用于非法目的,否则造成一切后果自负!如帖子内容侵害到你的权益,请联系我们!
防范网络诈骗,远离网络犯罪 违法和不良信息举报电话0663-3422125,QQ: 793400750,邮箱:wp@125.la
网站简介:精易论坛成立于2009年,是一个程序设计学习交流技术论坛,隶属于揭阳市揭东区精易科技有限公司所有。
Powered by Discuz! X3.4 揭阳市揭东区精易科技有限公司 ( 粤ICP备12094385号-1) 粤公网安备 44522102000125 增值电信业务经营许可证 粤B2-20192173

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