Foxtable(狐表)用户栏目专家坐堂 → 发布后程序注册


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

主题:发布后程序注册

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


加好友 发短信
等级:幼狐 帖子:149 积分:1295 威望:0 精华:0 注册:2018/12/12 23:23:00
发布后程序注册  发帖心情 Post By:2020/6/3 21:11:00 [显示全部帖子]

在帮助文档里的软注册方法是通过记录使用次数限制,感觉好像很弱的样子,
能不能限制数据库的记录数来保护软件的版权呢?

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


加好友 发短信
等级:幼狐 帖子:149 积分:1295 威望:0 精华:0 注册:2018/12/12 23:23:00
  发帖心情 Post By:2020/6/5 9:00:00 [显示全部帖子]

老师我是这样写的,但好像不起作用,请指教

报价主表DataRowAdded事件

Dim zls As Integer = DataTables("报价主表").DataRows.Count

Dim Code As String =Registry.GetValue("HKEY_CURRENT_USER\Software\cncgl","Register" & HardDiskID,"")

If Code > "" AndAlso DecryptText(Code,"123","123") = HardDiskID Then

Else

    If zls > 50 Then

         Messagebox.Show("试用版只能输入50个记录!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)

     End If

End If

[此贴子已经被作者于2020/6/5 9:13:54编辑过]

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


加好友 发短信
等级:幼狐 帖子:149 积分:1295 威望:0 精华:0 注册:2018/12/12 23:23:00
  发帖心情 Post By:2020/6/5 10:30:00 [显示全部帖子]

之前我也试过了放到BeforeAddDataRow一点反应都没有
我用的是外部ACCESS数据库
有例子吗?给个看一下

[此贴子已经被作者于2020/6/5 10:30:48编辑过]

 回到顶部