给你的LISP程序加一个期限

abcxyz0517 · 发表于 2006-10-24 08:42:00

如题,编了一个LISP用一段时间,
然后要求你注册,
否则就不能用或者加载不了

dnnlog · 发表于 2006-10-24 09:13:00

可以..............................

wei209 · 发表于 2006-10-24 09:51:00

用VB吧

jdhszh · 发表于 2006-10-24 20:46:00

   (setq cdate (fix (getvar "date")))
   (setq rq(vl-registry-read "HKEY_CURRENT_USER\\zc\\REG" "1"))
   (setq ct(atoi rq))
(if (> cdate ct)
   (progn
   (alert "对不起，程序已无过有效期，如还想使用请申请注册!\")
   (exit)
   ))

限制时间先用程序写入注册表

abcxyz0517 · 发表于 2006-10-25 08:11:00

; 错误: 输入的字符串有缺陷

限制时间先用程序写入注册表

限制时间怎么写呀?

vl-registry-write函数?

jdhszh · 发表于 2006-10-28 17:25:00

(vl-registry-write "HKEY_CURRENT_USER\\zc\\REG" "1" "2454132")

要知道时间的格式是依日计的

xbtang · 发表于 2006-11-8 16:38:00

这个值得学习﹐但不值得应用﹑推广。

fly_902 · 发表于 2006-11-9 18:59:00

很好, 值得学习一下!

sicky111 · 发表于 2006-11-12 19:11:00

这样能行吗？

ck99 · 发表于 2006-11-15 10:28:00

如果对方更改日期就可以用了啊。。。

账号		自动登录	找回密码
密码			注册