Access交流中心

北京 | 上海 | 天津 | 重庆 | 广州 | 深圳 | 珠海 | 汕头 | 佛山 | 中山 | 东莞 | 南京 | 苏州 | 无锡 | 常州 | 南通 | 扬州 | 徐州 | 杭州 | 温州 | 宁波 | 台州 | 福州 | 厦门 | 泉州 | 龙岩 | 合肥 | 芜湖 | 成都 | 遂宁 | 长沙 | 株洲 | 湘潭 | 武汉 | 南昌 | 济南 | 青岛 | 烟台 | 潍坊 | 淄博 | 济宁 | 太原 | 郑州 | 石家庄 | 保定 | 唐山 | 西安 | 大连 | 沈阳 | 长春 | 昆明 | 兰州 | 哈尔滨 | 佳木斯 | 南宁 | 桂林 | 海口 | 贵阳 | 西宁 | 乌鲁木齐 | 包头 |

请问怎样设置试用期限

李新功  发表于:2008-01-02 12:33:53  
复制

请问怎样设置试用期限

 

Top
探花 发表于:2008-01-02 13:49:27

注册是防君子不防小人的事。如此看来,用个简单点的方式,限制一个数据量比较大的表的记录数就行了。如果是其它语言做的软件,价格也比较高的话,可以考虑用USB加密狗,加密的方式很简单,一般他们都配有DEMO的,看了之后,跟着做一做就懂怎么用了。



咱家是猫 发表于:2008-01-03 09:17:54

简单的做法是用一个较隐敝的表(或其他地方)记录首次使用日期,并记录最后一次使用日期,有首次使用日期与当前日期比较,来校验期限是否过期,用最后一次使用日期与当前日期比较,判断是否用户刻意更改过系统日期.

需要说明的是,难点在这个"隐敝的地方"如何设置?设置到哪里,如果只是设置到你的库中,那么,还要考虑你的前台与后台的东西,如果保存到前台,那么用户重新了前台,也一定可以把这个期限绕过去.所以,很多人的做法是写到WINDOWS的注册表里,或创建一个隐敝的INI文件.或者说把几个结合起来,还有一些其他做法,总之,设置得越复杂,安全性越强,哈哈...



李新功 发表于:2008-03-13 11:34:42
请问有实例吗?我想做个简单的。

探花 发表于:2008-03-13 12:17:39

简单的好办,看那个表不顺眼,数据量比较大的,就在代码中搞一个记录数限定就OK了,对付一般的用户,这个就OK了

 

比如一个一天要入10条记录的表,试用版让他最多可以录500条,自己在前台代码中写一行东东来处理就OK了



李炻华 发表于:2008-03-13 19:36:58

Private Sub Form_Load()
Dim a As Long
a = GetSetting("MyApp", "set", "day", 0)
If a = 10 Then
MsgBox "试用期已过,请联系gfuuyygy!"
Else
MsgBox "现在剩下:" & 10 - a & "试用天数,好好珍惜!"  
if day(now)-a>0 then
a = RemainDay + 1
SaveSetting "MyApp", "set", "times", a
End if
End if
End Sub



李新功 发表于:2008-03-20 16:33:40

非常感谢!请问是在启动窗体上写代码吗?



总记录:6篇  页次:1/1 9 1 :