前往Shuct.Net首页

Shudepb PB反编译专家长时间以来,为业内同类软件事实上的唯一选择.细节,彰显专业.态度,决定品质.

关于shudepb的搜索

我的PB处女作,最简单的PB程序KEYGEN - 『脱壳破解区』 吾爱破解论坛 - LCG - LSG |软件安全|病毒分析|破解软件|软件论坛|www.52pojie.cn Please click here if you are not redirected within a few seconds. 收藏本站腾讯微博新浪微博违规会员处罚记录 开启辅助访问 吾爱破解论坛网络诊断修复工具切换到窄版 请 登录 后使用快捷导航没有帐号?注册[Register] 帐号 自动登录 找回密码 密码 登录 注册[Register] 只需一步,快速开始 快捷导航 门户吾爱破解论坛门户站点论坛吾爱破解论坛 - LCG - LSG导读最新最热门帖子导读悬赏吾爱破解论坛帮助大家解决问题,共同进步,获取论坛币!排行榜吾爱破解论坛优秀会员帖子积分排名!投诉举报吾爱破解论坛欢迎大家积极举报违规帖子!签到红包吾爱破解论坛每日签到红包任务,每位会员每天只能领一次,相隔24小时后即可再次申请任务。站内搜索吾爱破解论坛全文搜索论坛内容,不限时间快速帮助你在论坛里找到你想找的!吾爱云盘吾爱云盘实时提供论坛最新资源!站点帮助有什么问题来这里看看吧,这里有你想知道的内容! 邀请好友注册LCGLSGToolsLogo吾爱破解视频教程吾爱破解论坛精华集处理举报处理原创办公区论坛邮箱 原创发布区 精品软件区 逆向资源区 水漫金山区 影视推荐区 音乐视频区 脱壳破解区 移动安全区 病毒分析区 编程语言区 动画发布区 安全工具区 论坛公告 论坛导航 站点帮助 申请专区 招聘求职 违规怎么办 站务处理 投诉举报 搜索 搜索 热搜: 手机 街机三国 免费电话 免费代理 龙将 天猫秒杀 网络电话 传奇 推广 邮件群发 qq申请 监控 神曲 进销存 数据恢复 网页游戏 淘宝 迅雷 vpn 短信 本版帖子用户 吾爱破解论坛 - LCG - LSG |软件安全|病毒分析|破解软件|软件论坛|www.52pojie.cn»论坛 › 【 软件安全 】 › 『脱壳破解区』 › 我的PB处女作,最简单的PB程序KEYGEN 123 / 3 页下一页 返回列表 查看: 5265|回复: 29 [分享] 我的PB处女作,最简单的PB程序KEYGEN [复制链接] 网络断魂 网络断魂 当前离线 积分243听众数1主题0收听数0阅读权限30UID13帖子107精华2威望22 点吾爱币751 CB热心值1 点贡献值1 点违规0 次在线时间93 小时注册时间2008-3-12最后登录2013-2-25 狗仔卡 0主题 1好友 243积分 武林翘楚 菜鸟一族 UID13帖子107精华2威望22 点吾爱币751 CB热心值1 点贡献值1 点违规0 次在线时间93 小时注册时间2008-3-12最后登录2013-2-25 发消息 电梯直达 楼主 发表于 2009-12-8 20:51 |只看该作者 |倒序浏览 分享到: QQ空间 腾讯微博 新浪微博 我的淘宝 豆瓣网 人人网 本帖最后由 网络断魂 于 2009-12-8 21:04 编辑 【文章作者】: 网络断魂 【软件名称】: 707医药流通经营企业信息管理系统ERP 1.5 【下载地址】: http://www.707soft.com/cpxz.asp 【加壳方式】: 无 【保护方式】: 序列号 【编写语言】: PowerBuilder 10.5 【使用工具】: shudepb,PowerBuilder 10.5 【操作平台】: XP SP3, 【软件介绍】:http://www.707soft.com/rjjs_yypf.asp 【作者声明】: PB程序处女作,菜鸟学习算法,失误之处敬请诸位大侠赐教!向各位大牛各位前辈致敬! 1、查看软件目录下一堆的PB库文件,知道这软件是由PB写的,找出PB工具shudepb。 2、打开shudepb,加载程序EXE文件,shudepb会自动加入所有相关的PBD文件。 3、展开所有项,全局搜索注册提示字符串;或者可以直接通过文件名sys_zcxx.pbd猜测到这个文件是注册相关的。 4、找到注册函数如下: //clicked (none) returns long [pbm_bnclicked] //long ancestorreturnvalue long i long zcsl //表示注册数量 long a string gsmc //表示公司名称 string xlh //系列号 (本机系列号:4K95CT9827529-107505) string xlh1 //系列号1 string cpxlh //表示产品系列号 string xlh2 //系列号2 string xlh3 //系列号3 string inputxlh //表示输入的系列号 CALL SUPER::clicked //按下 确定 键 gsmc = PARENT.sle_2.text //读取 公司名称 框中的数据到公司名称 FOR i = 1 TO len(gsmc) //2 //取公司名称长度,从1开始循环计算 xlh1 = xlh1 + string(asc(mid(gsmc,i,1))) //系列号1 += 每位公司名称的ASCII值 (字符串连接) NEXT //2 xlh = PARENT.sle_1.text //读取产品系列号给 系列号(xlh) cpxlh = xlh //产品系列号(cpxlh)= 系列号(xlh) FOR i = 1 TO len(xlh) //7 //取系列号长度,从1开始循环计算 xlh2 = xlh2 + string(asc(mid(xlh,i,1))) //系列号2 += 每位系列号的ASCII值 (字符串连接) NEXT //7 zcsl = integer(PARENT.sle_3.text) //读取 注册数量 框中到注册数量(zcsl) FOR i = 1 TO len(xlh2) //11 //取 系列号2的长度,从1开始循环计算 xlh3 = xlh3 + string(integer(mid(xlh2,i,1)) * zcsl) //系列号3 += (每位系列号2的整数值*注册数量)的字符 NEXT //11 xlh1 = left(xlh1 + "123456789123456789123456789",25) //系列号1 = (系列号1 +"123456789123456789123456789")的左25位 xlh3 = left(xlh3 + "987654321987654321987654321",25) //系列号3 = (系列号3 +"987654321987654321987654321")的左25位 xlh = "" //系列号清空 FOR i = 1 TO 25 //17 //从1到25循环计算 xlh = xlh + string(integer(mid(xlh1,i,1)) + integer(mid(xlh3,i,1))) //系列号+= (每位系列号1的整数值+每位系 列号3的整数值)的字符 NEXT //17 xlh = left(xlh,25) inputxlh = PARENT.em_1.text + PARENT.em_2.text + PARENT.em_3.text + PARENT.em_4.text + PARENT.em_5.text IF xlh = inputxlh THEN //38 select count ( *) INTO :a from sys_xlh where dm =:gs_dm and pos =:cpxlh USING sqlca; IF a > 0 THEN //40 update sys_xlh set xlh =:xlh where dm =:gs_dm and pos =:cpxlh USING sqlca; ELSE //40 insert into sys_xlh ( dm , pos , xlh ) values ( :gs_dm , :cpxlh , :xlh ) USING sqlca; END IF //40 messagebox("提示","注册成功!",information!) close(PARENT) ELSE //38 messagebox("提示","注册失败,请重新检查序列号!",stopsign!) PARENT.em_1.selecttext(1,len(PARENT.em_1.text)) PARENT.em_1.setfocus() END IF //38 RETURN 5、通过对反编译出来的程序的理解,我们就可以写出对应的KeyGen了,我这里还是选择用PB10.5来写(其实是直接拷贝,哈哈) long i long zcsl long a string gsmc string xlh string xlh1 string cpxlh string xlh2 string xlh3 string zcm CALL SUPER::clicked gsmc = PARENT.sle_2.text FOR i = 1 TO len(gsmc) //2 xlh1 = xlh1 + string(asc(mid(gsmc,i,1))) NEXT //2 xlh = PARENT.sle_1.text cpxlh = xlh FOR i = 1 TO len(xlh) //7 xlh2 = xlh2 + string(asc(mid(xlh,i,1))) NEXT //7 zcsl = integer(PARENT.sle_3.text) FOR i = 1 TO len(xlh2) //11 xlh3 = xlh3 + string(integer(mid(xlh2,i,1)) * zcsl) NEXT //11 xlh1 = left(xlh1 + "123456789123456789123456789",25) xlh3 = left(xlh3 + "987654321987654321987654321",25) xlh = "" FOR i = 1 TO 25 //17 xlh = xlh + string(integer(mid(xlh1,i,1)) + integer(mid(xlh3,i,1))) NEXT //17 xlh = left(xlh,25) zcm = left(xlh,5) + "-" + mid(xlh,6,5) + "-" + mid(xlh,11,5) + "-" +mid(xlh,16,5) + "-" + mid(xlh,21) PARENT.sle_4.text = zcm RETURN 2009-12-8 21:04 上传 下载附件 (23.08 KB) 已有 4 人评分威望 吾爱币 热心值 收起 理由 pwzh88 + 3 + 1 欢迎分析讨论交流,[吾爱破解论坛]有你更精. szdjcn + 5 威望有了,加的分吧,兄弟 missviola + 4 精品文章! CHHSun + 1 + 20 感谢发布原创作品,[吾爱破解]因你更精彩! 总评分: 威望 + 1 吾爱币 + 32 热心值 + 1 查看全部评分 分享到: QQ空间 腾讯微博 腾讯朋友 淘帖0 收藏1 支持0 反对0 转发到微博 笑对人生品百味,飘零寄世自从容.恩怨情仇随风去,鹤发满头亦童颜. 论坛附件只能通过单线程下载,迅雷等多线程工具不能正常下载! 回复 使用道具 举报 提升卡 变色卡 显身卡 《吾爱破解内存补丁生成器》 | 《吾爱破解注册机生成器》 | 《吾爱破解论坛2009精华集》 | 《吾爱破解论坛2010精华集》 sulicong sulicong 当前离线 积分171听众数0主题0收听数0阅读权限10UID51634帖子331精华0威望0 点吾爱币0 CB热心值0 点贡献值0 点违规0 次在线时间125 小时注册时间2008-10-18最后登录2013-12-29 狗仔卡 0主题 0好友 171积分 锋芒初露 锋芒初露, 积分 171, 距离下一级还需 29 积分 UID51634帖子331精华0威望0 点吾爱币0 CB热心值0 点贡献值0 点违规0 次在线时间125 小时注册时间2008-10-18最后登录2013-12-29 发消息 沙发 发表于 2009-12-8 21:25 |只看该作者 好复杂,看不太懂,呵呵!~ 【吾爱破解论坛导航帖】 - [让你快速融入吾爱破解大家庭] 回复 使用道具 举报 显身卡 missviola missviola 当前离线 积分914听众数1主题10收听数0阅读权限40UID84723帖子233精华9威望51 点吾爱币2268 CB热心值15 点贡献值9 点违规0 次在线时间1122 小时注册时间2009-7-5最后登录2012-10-20 狗仔卡 10主题 2好友 914积分 [LCG] UID84723帖子233精华9威望51 点吾爱币2268 CB热心值15 点贡献值9 点违规0 次在线时间1122 小时注册时间2009-7-5最后登录2012-10-20 发消息 藤椅 发表于 2009-12-8 21:32 |只看该作者 违规了,进了小黑屋,不能发帖怎么办? [s:208]前来帮子龙兄顶贴,学习学习~~ 论坛账号被盗严重,教你如何保障社区帐号的安全! 回复 使用道具 举报 显身卡 zzage zzage 当前离线 积分3233听众数10主题31收听数0阅读权限200UID3帖子1049精华13威望112 点吾爱币2705 CB热心值49 点贡献值1458 点违规0 次在线时间1925 小时注册时间2008-3-12最后登录2014-1-16 狗仔卡 31主题 10好友 3233积分 人在江湖 我沉默是因为你沉默而沉默... UID3帖子1049精华13威望112 点吾爱币2705 CB热心值49 点贡献值1458 点违规0 次在线时间1925 小时注册时间2008-3-12最后登录2014-1-16 发消息 板凳 发表于 2009-12-8 21:59 |只看该作者 《站点帮助文档》有什么问题来这里看看吧,这里有你想知道的内容! 断魂牛复活了....[s:231] 1 关于如何获得论坛C币和威望! 回复 使用道具 举报 显身卡 网络断魂 网络断魂 当前离线 积分243听众数1主题0收听数0阅读权限30UID13帖子107精华2威望22 点吾爱币751 CB热心值1 点贡献值1 点违规0 次在线时间93 小时注册时间2008-3-12最后登录2013-2-25 狗仔卡 0主题 1好友 243积分 武林翘楚 菜鸟一族 UID13帖子107精华2威望22 点吾爱币751 CB热心值1 点贡献值1 点违规0 次在线时间93 小时注册时间2008-3-12最后登录2013-2-25 发消息 报纸 发表于 2009-12-8 22:05 |只看该作者 断魂牛复活了....[s:231] zzage 发表于 2009-12-8 21:59 不对,我是上来接你的! 笑对人生品百味,飘零寄世自从容.恩怨情仇随风去,鹤发满头亦童颜. 如何快速判断一个文件是否为病毒! 回复 使用道具 举报 显身卡 花非话无 花非话无 当前离线 积分30听众数0主题0收听数0阅读权限10UID60376帖子73精华0威望0 点吾爱币1 CB热心值0 点贡献值0 点违规1 次在线时间10 小时注册时间2008-12-2最后登录2012-5-20 狗仔卡 0主题 0好友 30积分 锋芒初露 锋芒初露, 积分 30, 距离下一级还需 170 积分 UID60376帖子73精华0威望0 点吾爱币1 CB热心值0 点贡献值0 点违规1 次在线时间10 小时注册时间2008-12-2最后登录2012-5-20 发消息 地板 发表于 2009-12-8 22:08 |只看该作者 好好东西学习 呼吁大家发布原创作品添加吾爱破解论坛标示! 回复 使用道具 举报 显身卡 867427677 867427677 当前离线 积分117听众数0主题9收听数0阅读权限10UID44965帖子222精华0威望0 点吾爱币62 CB热心值2 点贡献值0 点违规0 次在线时间122 小时注册时间2008-10-3最后登录2014-1-16 狗仔卡 9主题 0好友 117积分 锋芒初露 锋芒初露, 积分 117, 距离下一级还需 83 积分 UID44965帖子222精华0威望0 点吾爱币62 CB热心值2 点贡献值0 点违规0 次在线时间122 小时注册时间2008-10-3最后登录2014-1-16 发消息 7# 发表于 2009-12-8 22:39 |只看该作者 我完全迷失了 LZ很强大哈 功夫再高也怕菜刀 如何快速赚到 CB,而且不会被关进小黑屋! 回复 使用道具 举报 显身卡 sooaoo sooaoo 当前离线 积分60听众数0主题10收听数0阅读权限10UID94454帖子97精华0威望3 点吾爱币66 CB热心值4 点贡献值0 点违规0 次在线时间66 小时注册时间2009-12-6最后登录2014-1-17 狗仔卡 10主题 0好友 60积分 锋芒初露 锋芒初露, 积分 60, 距离下一级还需 140 积分 UID94454帖子97精华0威望3 点吾爱币66 CB热心值4 点贡献值0 点违规0 次在线时间66 小时注册时间2009-12-6最后登录2014-1-17 发消息 8# 发表于 2009-12-8 22:47 |只看该作者 继续加油,期待好作 没能力的看人装B , 有能力的跟人装B 回复 使用道具 举报 显身卡 2051314 2051314 当前离线 积分494听众数0主题2收听数0阅读权限25UID77100帖子976精华0威望0 点吾爱币1504 CB热心值0 点贡献值0 点违规0 次在线时间131 小时注册时间2009-2-9最后登录2013-11-18 狗仔卡 2主题 0好友 494积分 出类拔萃 出类拔萃, 积分 494, 距离下一级还需 306 积分 UID77100帖子976精华0威望0 点吾爱币1504 CB热心值0 点贡献值0 点违规0 次在线时间131 小时注册时间2009-2-9最后登录2013-11-18 发消息 9# 发表于 2009-12-9 08:53 |只看该作者 呵呵 支持一下! 回复 使用道具 举报 显身卡 wangyuone68 wangyuone68 当前离线 积分30听众数0主题0收听数0阅读权限10UID57956帖子58精华0威望0 点吾爱币60 CB热心值0 点贡献值0 点违规0 次在线时间34 小时注册时间2008-10-29最后登录2014-1-17 狗仔卡 0主题 0好友 30积分 锋芒初露 锋芒初露, 积分 30, 距离下一级还需 170 积分 UID57956帖子58精华0威望0 点吾爱币60 CB热心值0 点贡献值0 点违规0 次在线时间34 小时注册时间2008-10-29最后登录2014-1-17 发消息 10# 发表于 2009-12-9 21:48 |只看该作者 非常感谢!!!!!!!!!!!!!1 回复 使用道具 举报 显身卡 123 / 3 页下一页返回列表 高级模式 B Color Image Link Quote Code Smilies 您需要登录后才可以回帖 登录 | 注册[Register] 发表回复 回帖后跳转到最后一页 浏览过的版块 『编程语言区』『精品软件区』『逆向资源区』 [LCG]成员勋章 [LCG]成员勋章 免责声明:吾爱破解论坛所发布的一切破解补丁、注册机和注册信息及软件的解密分析文章仅限用于学习和研究目的;不得将上述内容用于商业或者非法用途,否则,一切后果请用户自负。本站信息来自网络,版权争议与本站无关。您必须在下载后的24个小时之内,从您的电脑中彻底删除上述内容。如果您喜欢该程序,请支持正版软件,购买注册,得到更好的正版服务。 Mail To:Service@52PoJie.Cn 分享到: QQ空间 腾讯微博 新浪微博 我的淘宝 豆瓣网 人人网 RSS订阅|手机版|吾爱破解论坛 - LCG - LSG ( 沪ICP备13032378号 ) GMT+8, 2014-1-18 09:33 , Processed in 0.069844 second(s), 12 queries , Gzip On, Memcache On. Powered by Discuz! X2.5 © 2001-2012 Comsenz Inc. 积分 0, 距离下一级还需 积分 回顶部