永发信息网

VB如何给软件加限制,高手进!!!

答案:3  悬赏:10  手机版
解决时间 2021-04-25 22:11

当然限制要是达到完美一点的

现在最起码的一个就是一个账号只能一个用户使用(不限地点)

,当这个帐号第二个人也使用时就提示错误(网络验证)

如果这个都没法达到,我想这不算是限制了吧(假如:一个人注册之后,在网上公布这个帐号,那不就是等于没限制一样了吗)

一些有经验的高手们,有什么好的方法就提供一下吧.

希望回答的人不是来凑热闹的...呵呵

最佳答案
Private Sub Form_Load()
Dim RemainDay As Long
RemainDay = GetSetting("MyApp", "set", "times", 0)
If RemainDay = 30 Then
MsgBox "试用次数已满,请注册"
Unload Me
End If
MsgBox "现在剩下:" & 30 - RemainDay & "试用次数,好好珍惜!"
RemainDay = RemainDay + 1
SaveSetting "MyApp", "set", "times", RemainDay
End Sub
全部回答

不知道你设计的是不是C/S的,如果是的话,我想没有不要这么麻烦吧?一个简单的防重复登陆还弄数据库?

当一个用户登陆的时候,S端就在内存数组,比如redim Preserve UserName(i+1)=现在登陆的用户ID,当另一用户登陆的时候,必须要遍历这个数组,找不到相同的ID即可允许登陆

或你用数值变量也可(一般大型点的,都是一次性一体化的加载信息的)分配的ID也是规则的数值,如果你不是,就用上面的办法

你这个要有网络支持啊,用户没有网络呢.最好是读取电脑的硬件信息.完成注册.
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
猜一人名:身体好可办大事!
韭菜怎么凉拌怎么好吃
请问柳州那里有招小时工或周末工的!?急需!
长辈祝福小辈的话古文,金婚祝福语大全
cs1.5或1.6哪里下载?
在什么背境下最适合同MM第一次接吻
在太原住那便宜
今天面试的问题,请教下大家
渔民村酒店在什么地方啊,我要过去处理事情
真的可以忍心做到和深爱的人成为朋友么?
什么样的女孩属于特泼辣的那种?
怎么才能让自己不爱睡觉
求一个反恐精英老版本的HS 如果是真的追加分
寻找图片中女孩的名字
张杰和魏晨你会选谁?为什么
推荐资讯
怎么样用电脑剪切视频,如何在一边用电脑时一
windows7家庭普通在哪里下载?
换了个硬盘,电脑在QQ语音不能说话?
四川康华远体育用品有限公司这个地址在什么地
苹果手机怎么裁剪图片,苹果手机如何剪短视频
上QQ很好上QQ炫舞上了就掉是什么问题
战魂吃不是兵胎的和吃兵胎发有什么区别
双双副食百货店在哪里啊,我有事要去这个地方
找一个爱我的人做老婆好,还是找个我爱的人做
是不是建过群以后解散了.就建不了了.我说的不
我是1991.10.15出生的,命怎么样阿
任宇锁业在哪里啊,我有事要去这个地方
正方形一边上任一点到这个正方形两条对角线的
阴历怎么看 ?