首页
社区
课程
招聘
[旧帖] [求助]会破pb9.0的 高手看下! 0.00雪花
发表于: 2007-11-3 16:57 2880

[旧帖] [求助]会破pb9.0的 高手看下! 0.00雪花

2007-11-3 16:57
2880
我在学习破个软件~找到注册窗口如下
if trim(parent.sle_3.text) = "" then
        messagebox(gs_inc + "软件","注册系列号不能为空,请重新输入!!!",exclamation!)
        parent.sle_3.setfocus()
        return
end if

if uo_fun.f_checkedcode(parent.sle_2.text,trim(parent.sle_3.text)) then
        messagebox(gs_inc + "软件","软件注册成功,谢谢您对我们的支持!!!")
        gb_term = false
        gb_registry = true
        close(parent)
else
        gb_registry = false
        parent.iw_num ++
        ls_appname = uo_fun.f_encode(uo_fun.f_getdiskseries())

        if parent.iw_num = 3 then
                parent.st_num.text = "0"
                ls_look = uo_fun.f_encode(uo_fun.f_encrypt(uo_fun.f_decode("TE9PSw")))
                update sys_sys SET char9 =' ' WHERE appname =' '  using sqlca;
/* SQL Parameters List
0-> :ls_look
1-> :ls_appname
*/
                messagebox(gs_inc + "软件","注册系列号错误,请与软件开发商联系!!!",stopsign!,ok!)

有找到了checkedcode如下:

string ls_str
string ls_str1
string ls_str2
string ls_str3
string ls_str4
string ls_str5
string ls_str6
string ls_str7
string ls_str8
string ls_inccode
string ls_vercode
string ls_serial
string ls_ver
string ls_regcode
string ls_rsap
string ls_rsaq
string ls_rsaphi
string ls_rsae
string ls_rsan
string ls_rsad
long ii

is_rsap = "2557"
is_rsaq = "1879"
is_rsaphi = "4800168"
is_rsae = "25963621"
is_rsan = "4804603"
is_rsad = "623101"

if gb_pfls then
        ls_ver = "UEZMUw"
else
        ls_ver = "RlpNSVM"
end if

ls_str = f_rsaencrypt(gs_company)

for ii = 1 to len(ls_str) step 9
        ls_inccode.ls_inccode = longlong()
        return
        mid(ls_str,ii,9) = longlong()
        return

        if  then
        end if

next

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

end if

ls_str = f_rsaencrypt(f_decode(ls_ver))

for ii = 1 to len(ls_str) step 9
        ls_vercode.ls_vercode = longlong()
        return
        mid(ls_str,ii,9) = longlong()
        return

        if  then
        next

        this
        goto label_0
        label_1:
        label_0:
        len(?????) >=
        return
        return
        goto label_1
        return
        return
        return
        return
        this = this
        = this
        = this
        = this
        = this
        = this
        = this
        this = this
        this = this
        this = this
        this = this
        this = this
        this
        (this + this)this + this = this + this
        this(this + this)this(this + this)this = this + this
        rand(this) = rand(this) + rand(this)
        isnull(?????)
        goto label_2
        label_2:
        return
        goto label_3
        return
        label_3:

这些该怎么算注册码???

[培训]科锐逆向工程师培训第53期2025年7月8日开班!

收藏
免费 0
支持
分享
最新回复 (1)
雪    币: 200
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
2
怎么没高手回答啊~~顶下!
2007-11-5 16:50
0
游客
登录 | 注册 方可回帖
返回