以文本方式查看主题 - 易表在线答疑 (http://www.egrid2000.com/dvbbs/index.asp) -- 用户社区 (http://www.egrid2000.com/dvbbs/list.asp?boardid=2) ---- [原创]邀请破解! (http://www.egrid2000.com/dvbbs/dispbbs.asp?boardid=2&id=7630) |
-- 作者:cuiler -- 发布时间:2007/4/27 21:38:00 -- [原创]邀请破解! [这个贴子最后由cuiler在 2007/04/28 11:40am 第 4 次编辑] 好久没混论坛了,今天来发个帖子,开动大家脑筋。娱乐大众。 说明: 希望能有人帮忙破解掉。把里面的设置“拿”出来晒晒。 v1版本我已经成功破解。 客户端v1.egd egd文件下载 V1,V2的破解方法:=ShowMainWindow() 贴到窗口中,即可 (巧妙的破解方法,佩服佩服!) V3的反破解思路:设置字符型变量 %j%,代替窗口中的 [路径]单元格,禁止 =ShowMainWindow()发挥作用。 V4的反破解思路:此路是我开,此树是我载,你要进去破坏,我就与你同归于尽 (文件预处理公式中的 closewindow() 起的就是同归于尽的作用,让你不能开门) V5的反破解思路:前门我放个炸药包,后门我摆个钟馗。看你拿我怎么着 (后门我先下手,请来钟馗把门,看你怎么和我抢) 其实,我制作V1的时候是处于商业目的,当时有两个不同的版本,一个就是现在的V1,另一个是有“后门”的V1。通过这个“后门”我可以修改里面的公式和设置。但由于我操作不小心,误删了带“后门”的V1,弄得自己做的程序自己打不开。因此,才想方设法破解V1。 V3版以后的破解方法,是由CZY版主提供给我,他们使用的是很高超也很合理的技巧(并不是暴力破解),但由于此技巧过于“强悍”,为了避免麻烦,不便透露。而我制做的V4,V5版本,则是针对此“强悍”技巧的“自卫反击”。不足之处,还请大家多多赐教。谢谢。 V4的反破思路:通过在文件预处理公式中设置 closewindow() 函数。使V4文件在被打开前,关闭所有窗口。如果此时有窗口被打开,就会跳出 “运行时错误91”,大家同归于尽 V5的反破思路:前门用 closewindow()当炸弹,后门用 OpenModalWindow() 来守,V5文件已经被gdlgh 清空了管理员密码,大家可以下载学习,贡献给大家。 变量设置 : 表预处理公式:if(cell(1,1,"路径")="",openmodalwindow(1),if(Exist(cell(1,1,"路径")),[%q%],msgbox("文件不存在,请与管理员联系!",0) and if(msgbox("是否重设路径?",2,2),setcelltext("路径",1,1,"") and msgbox("路径已清空,请重启系统!",0) and save() and exit(),reset() and exit()))) 窗口 禁止直接关闭 |
-- 作者:Czy -- 发布时间:2007/4/27 21:45:00 -- 呵呵,不太感兴趣。 晒设置估计只需2秒时间。 |
-- 作者:ylm -- 发布时间:2007/4/27 21:46:00 -- 呵呵,这样算不算: if(cell(1,1,"路径")="",openwindow(1),if(Exist(cell(1,1,"路径")),openfile([%p%]),msgbox("文件不存在,请与管理员联系!",0) and if(msgbox("是否重设路径?",2,2),setcelltext("路径",1,1,"") and msgbox("路径已清空,请重启系统!",0) and save() and exit(),reset() and exit()))) |
-- 作者:Czy -- 发布时间:2007/4/27 21:48:00 -- 详细点是这样: 1、Run(DocDir+"reg98.exe") 2、if(cell(1,1,"路径")="",openwindow(1),if(Exist(cell(1,1,"路径")),openfile([%p%]),msgbox("文件不存在,请与管理员联系!",0) and if(msgbox("是否重设路径?",2,2),setcelltext("路径",1,1,"") and msgbox("路径已清空,请重启系统!",0) and save() and exit(),reset() and exit()))) 3、editlog 4、cell(1,1,"路径") |
-- 作者:cuiler -- 发布时间:2007/4/27 21:49:00 -- 下面引用由ylm在 2007/04/27 09:46pm 发表的内容: 呵呵,这样算不算: if(cell(1,1,"路径")="",openwindow(1),if(Exist(cell(1,1,"路径")),openfile(),msgbox("文件不存在,请与管理员联系!",0) and if(msgbox("是 ...
|
-- 作者:Czy -- 发布时间:2007/4/27 21:50:00 -- 4楼1 |
-- 作者:ylm -- 发布时间:2007/4/27 21:51:00 -- 呵呵,还是算了吧,不用试了Vn也没用的 |
-- 作者:cuiler -- 发布时间:2007/4/27 21:51:00 -- 下面引用由czy在 2007/04/27 09:48pm 发表的内容: 详细点是这样: 1、Run(DocDir+"reg98.exe") 2、if(cell(1,1,"路径")="",openwindow(1),if(Exist(cell(1,1,"路径")),openfile(),msgbox("文件不存在,请与管理员联 ... 恩,V2 版本如何破,别告诉我,你猜出来的管理员密码。 |
-- 作者:ylm -- 发布时间:2007/4/27 21:53:00 -- 呵呵,还用猜吗。 |
-- 作者:cuiler -- 发布时间:2007/4/27 21:53:00 -- 下面引用由ylm在 2007/04/27 09:51pm 发表的内容: 呵呵,还是算了吧,不用试了Vn也没用的 请赐教。谢谢。不方便的话,给我发短消息。 |