小弟为共享软件作者制作的管理软件注册的动态链接库
作为共享软件作者,注册码被非法公布是件令你十分头疼的事情。小弟制作了这么一个类库。希望能有所帮助。它每次在regestcheck被执行一遍的时候生成动态的用户名及密码,并保存入注册表。但软件已经注册的话则不改变原来的注册信息。所以,盗用注册码对它是没用的。
它有三个方法,四个属性。regestcheck用来检查您的共享软件是否注册,regest用来注册您的共享软件。getnamepassword是为name,password属性赋一个合法的值。regested 属性是保存共享软件是否注册过的信息的。regestedkey是您的软件在注册表local_machine主键中注册的键名。至于regestname,regestpassword就是保存合法的用户名及密码的了。
例子程序如下:
option explicit
private sub form_load()
dim temp as classregest ‘请先在”引用”中引用这个类(动态链接库)
set temp = new classregest
temp.regestkey = "software\regesttest" ‘设置你的软件在注册表中注册的键名
temp.regestcheck ‘判断是否注册, 判断结果保存在regested属性中