[编程申请]：如何给程序加注册码?

lzy0511 · 发表于 2005-4-20 08:48:26

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

如何给程序加注册码?

Gu_xl · 发表于 2005-4-20 10:57:03

在程序首次启动前设置注册码，写入注册表，下次程序启动时验证注册码，核对不上便退出程序，不加载！

jinsong-liao · 发表于 2005-4-20 12:59:39

能写段代码详细说说吗？

舟自横 · 发表于 2005-4-20 14:22:59

(defun write_reg(title keys infors / reg_main);;寫注冊表
  (setq reg_main "HKEY_CURRENT_USER\\Software\\Gaocasso\\ZWXCAD\\")
  (IF (NOT(listp keys)) (setq keys (list keys)))
  (IF (NOT(listp infors)) (setq infors (list infors)))
  (setq i 0)
  (foreach key keys
(if key (progn
(vl-registry-write(strcat reg_main title) key (nth i infors))
(setq i (1+ i))))
  )
)
(defun read_reg(title keys / nelist val reg_main);;;讀注冊表
  (IF (NOT(listp keys)) (setq keys (list keys)))
  (setq reg_main "HKEY_CURRENT_USER\\Software\\Gaocasso\\ZWXCAD\\")
  (setq nelist nil)
  (foreach key keys
  (setq val(vl-registry-read(strcat reg_main title)key))
  (setq nelist (cons(cons key val) nedlist))
)
  nelist
)
其中REG_MAIN是我自己设置的,你可以自己改的..
你可以先用WRITE_REG设置自己的注册表信息...
在使用程序前先用READ_REG读注册表.如果与你的
设置不相符则退出程序(也可以发一个错误信息再退出)

LMCC · 发表于 2005-4-20 15:47:07

试一下

wuchangyou · 发表于 2005-4-20 16:36:05

谢谢

FLOODITIDE · 发表于 2005-4-20 17:51:36

最主要是要根据硬件如网卡、硬盘的序列号产生注册码，这样才有用

north911 · 发表于 2005-4-21 09:31:57

提示: 作者被禁止或删除内容自动屏蔽

FLOODITIDE · 发表于 2005-4-21 10:00:59

在下载区有一个ARX,可惜认版本。

wuchangyou · 发表于 2005-4-21 13:23:25

谢谢

winabcd · 发表于 2005-4-21 14:23:16

4楼的程序有个小笔误
(setq nelist (cons(cons key val) nedlist))
应为
(setq nelist (cons(cons key val) nelist))

kevinchan · 发表于 2005-4-22 20:03:34

最初由 FLOODITIDE 发布
[B]最主要是要根据硬件如网卡、硬盘的序列号产生注册码，这样才有用 [/B]

我也很想知道怎么样才摁扣仪根据网卡的序列号来生成.

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

north911 north911 当前离线 UID 186781 积分 144 精华贡献威望活跃度 D豆在线时间小时注册时间 2004-10-25 最后登录 1970-1-1 窥视卡雷达卡	发表于 2005-4-21 09:31:57 \| 显示全部楼层提示: 作者被禁止或删除内容自动屏蔽
	论坛插件加载方法发帖求助前要善用【论坛搜索】功能，那里可能会有你要找的答案；如果你在论坛求助问题，并且已经从坛友或者管理的回复中解决了问题，请把帖子标题加上【已解决】；如何回报帮助你解决问题的坛友，一个好办法就是给对方加【D豆】，加分不会扣除自己的积分，做一个热心并受欢迎的人！
	回复支持反对使用道具举报

[编程申请]：如何给程序加注册码?

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

相关帖子

谢谢