-
-
[旧帖]
[求助]软件的注册源码,请高手帮我解读一下.
0.00雪花
-
发表于:
2008-1-10 13:38
3170
-
[旧帖] [求助]软件的注册源码,请高手帮我解读一下.
0.00雪花
以下是注册源码.
integer i
string ls_mcode
string ls_mcodeout
st_9.text = "版本：" + gs_pver
ls_mcode = gs_macaddress
i = f_365(ls_mcode,"add")
st_4.text = "使用时间还剩" + string(i - 2008) + "天!"
if i > 2038 then
sle_reg.textcolor = rgb(100,100,100)
sle_reg.text = "还可以使用" + string(i - 2008) + "天！您可以暂时不用注册！"
else
sle_reg.textcolor = rgb(255,0,0)
sle_reg.text = "使用期只剩" + string(i - 2008) + "天！您可以准备申请注册码了！"
end if
select count ( *) from sale_tab using sqlca;
/* SQL Parameters List
0-> :i
*/
ls_mcode = ls_mcode + string(integer(i / 100))
sle_serialno.text = right(ls_mcode,12)
return
[培训]内核驱动高级班，冲击BAT一流互联网大厂工作，每周日13:00-18:00直播授课
