-
-
[求助]这段源码是如何运算的?
-
发表于:
2006-4-11 16:38
3637
-
这是一个用PB9写的关于注册的一段源码,但我看不懂,请哪位大侠帮忙一下,谢谢!
这个软件我已暴掉了,但找不到它的注册码,我只好用PBKILLER了,找到关于注册的这段东东,但水平实在太菜,看不懂.
string aa
string bb
string dd
string ee
long cc
ee = trim(getdiskser())
if isnull(ee) then
ee = "ssdj"
end if
SELECT dawm , diz FROM gbsys using sqlca;
/* SQL Parameters List
0-> :bb
1-> :dd
*/
commit using sqlca;
if isnull(bb) or bb = "" then
aa = reverse(string(now(),"yyyymmddssff"))
sle_1.text = aa + ee
update gbsys SET dawm =' ' using sqlca;
/* SQL Parameters List
0-> :aa
*/
commit using sqlca;
else
sle_1.text = left(bb,4) + "-" + mid(bb,5,4) + "-" + ee
end if
if long("8" + left(bb,4)) * 6 = long(mid(dd,4,6)) then
mle_1.text = "你已成功注册!~r~n --北京世纪荣欣公司-- ~r~n ~r~n 联系单位:北京世纪荣欣有限责任公司 王雨。~r~n Email:gbdagl@yahoo.com.cn ~r~n 联系电话:13501068540"
sle_4.visible = false
else
mle_1.text = "请大家注册使用,注册用户将免费升级和技术支持!~r~n单机版198元/套;网络版2800元/套。~r~n --世纪荣欣-- ~r~n ~r~n联系单位:北京世纪荣欣有限责任公司 王雨。~r~nEmail:gbdagl@yahoo.com.cn ~r~n联系电话:13501068540 ~r~nQQ:452748499"
end if
return
[课程]Linux pwn 探索篇!