Foxtable(狐表) → 用户栏目 → 专家坐堂 → 软件注册 更新后要输入注册码


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

主题：软件注册 更新后要输入注册码
帅哥哟，离线，有人找我吗？
恒隆君
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：二尾狐 帖子：496 积分：4055 威望：0 精华：0 注册：2017/7/5 16:15:00 		软件注册 更新后要输入注册码  发帖心情 Post By：2017/9/29 16:43:00 [只看该作者]

软件注册 更新后要重新输入注册码
有没有好的解决方案。

1. 注册码写入注册表中，但要管理员权限。 这个有局限性

2. 可否注册后，将注册码自动存在安装文件夹的一个文档中(Txt).

或者有没有其它好的方法。
  
 回到顶部
帅哥哟，离线，有人找我吗？
有点甜
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：版主 帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00 		  发帖心情 Post By：2017/9/29 16:47:00 [只看该作者]

把注册码信息保存在一个 config.txt 文件夹里

 

其实注册码信息即便被知道也没什么问题的，甚至不需要对txt加密

 

操作txt参考

 

ReadAllText 读取文本文件的内容
WriteAllText 向文本文件中写入内容
 回到顶部
帅哥哟，离线，有人找我吗？
恒隆君
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：二尾狐 帖子：496 积分：4055 威望：0 精华：0 注册：2017/7/5 16:15:00 		  发帖心情 Post By：2017/10/8 21:58:00 [只看该作者]

可否清除文本中的内容。

如果有人修改了保存注册码的文本。
第二次注册，只会再增加一条注册码。
如此，每次都会提示未能成功注册
 回到顶部
帅哥哟，离线，有人找我吗？
有点甜
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：版主 帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00 		  发帖心情 Post By：2017/10/8 22:06:00 [只看该作者]

 清空文本中的内容，你赋值为空字符串不就行了？

 

 每次重新注册，都是应该整体替换文本内容的，只要注册成功，下次都不会提示。
 回到顶部
帅哥哟，离线，有人找我吗？
恒隆君
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：二尾狐 帖子：496 积分：4055 威望：0 精华：0 注册：2017/7/5 16:15:00 		  发帖心情 Post By：2017/10/9 11:07:00 [只看该作者]

FileSys.WriteAllText("C:\data\Table.Txt", "I Like Foxtable", True)

一定要加盘符吗？
可以默认于程序安装盘吗？
 回到顶部
帅哥哟，离线，有人找我吗？
有点甜
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：版主 帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00 		  发帖心情 Post By：2017/10/9 11:09:00 [只看该作者]

可以，比如

 

FileSys.WriteAllText(projectPath & "config.txt", "I Like Foxtable", False)
 回到顶部
帅哥哟，离线，有人找我吗？
恒隆君
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：二尾狐 帖子：496 积分：4055 威望：0 精华：0 注册：2017/7/5 16:15:00 		  发帖心情 Post By：2017/10/9 11:40:00 [只看该作者]

密钥 长度现在有限制吗



.NET Framework 版本：2.0.50727.8745
Foxtable 版本：2017.8.19.1
错误所在事件：项目,AfterOpenProject
详细错误信息：
要解密的数据的长度无效。
 回到顶部
帅哥哟，离线，有人找我吗？
有点甜
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：版主 帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00 		  发帖心情 Post By：2017/10/9 11:41:00 [只看该作者]

重写解密函数，在全局代码加入这句代码

 

Public function DecryptText(s As String, m1 As String, m2 As String) As String
try
    Return Foxtable.DecryptText(s,m1,m2)
catch ex As Exception
    Return Nothing
End try
End Function

[此贴子已经被作者于2017/10/9 11:41:12编辑过]
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04688 秒, 4 次数据查询