Foxtable(狐表)用户栏目专家坐堂 → [求助]加密设置问题


  共有4016人关注过本帖树形打印复制链接

主题:[求助]加密设置问题

帅哥哟,离线,有人找我吗?
hrw68529
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1142 积分:8900 威望:0 精华:0 注册:2012/7/10 9:09:00
[求助]加密设置问题  发帖心情 Post By:2014/3/5 16:43:00 [只看该作者]

另一种软件加密方式,使用次数是保存在设置信息中的,而设置信息是存储在项目文件自身中的,所以覆盖项目文件,意味着使用次数会归零,用户可以继续使用。
所以实际应用的时候,应该同时在注册表中保存使用次数,启动的时候同时从设置信息和注册表读取使用次数,并取最大值。
关于注册表的读写,参考:
Registry

那么,这段代码应放在哪里?

Dim Count As Integer
Count = Registry.GetValue("HKEY_CURRENT_USER\Software\MyApp","Count",0)
Registry.SetValue("HKEY_CURRENT_USER\Software\MyApp","Count",Count + 1)
Output.Show(Count)


 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2014/3/5 16:46:00 [只看该作者]

放在你希望执行的地方,打开软件就验证.当然是放到BEFOrOpenProject

 回到顶部
帅哥哟,离线,有人找我吗?
hrw68529
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1142 积分:8900 威望:0 精华:0 注册:2012/7/10 9:09:00
  发帖心情 Post By:2014/3/5 17:02:00 [只看该作者]

谢谢,非常 正确

 回到顶部