.版本 2
.支持库 script
.支持库 eAPI
.程序集 窗口程序集1, , , 为了方便省事,我把注册机也写在一起,自己测试吧
.程序集变量 注册码, 文本型, , , 用于正常软件
.程序集变量 是否注册, 逻辑型, , , 用于正常软件
.子程序 __启动窗口_创建完毕, , , 用于正常软件
编辑框1.内容 = 到文本 (取绝对值 (取硬盘特征字 ()) + 20100714) ' 20100714 这个你可以自己该数值
注册判断 () ' 检查是否注册 赋值给 变量:是否注册
.判断开始 (是否注册 = 真) ' 这个判断可以用在你想要限制的地方
_启动窗口.标题 = “软件已注册”
.默认
_启动窗口.标题 = “软件未注册”
.判断结束
.子程序 注册判断, , , 用于正常软件
脚本组件1.执行 (#md5)
.如果 (注册项是否存在 (3, “Software\mysoft\config”) = 真)
注册码 = 取文本注册项 (3, “Software\mysoft\config”, )
.如果 (注册码 = 到大写 (脚本组件1.运行 (“md5”, 编辑框1.内容)))
是否注册 = 真
.否则
是否注册 = 假
.如果结束
.否则
是否注册 = 假
.如果结束
.子程序 _注册按钮_被单击, , , 用于正常软件
.如果 (编辑框2.内容 = 注册计算 ())
信息框 (“注册成功,重新打开软件即可!”, 0, )
写注册项 (3, “Software\mysoft\config”, 编辑框2.内容)
销毁 ()
.否则
信息框 (“注册失败”, 0, )
.如果结束
.子程序 注册计算, 文本型, , 用于正常软件
脚本组件1.执行 (#md5)
返回 (到大写 (脚本组件1.运行 (“md5”, 编辑框1.内容)))
.子程序 _按钮1_被单击, , , 用于注册机
脚本组件1.执行 (#md5)
编辑框4.内容 = 到大写 (脚本组件1.运行 (“md5”, 编辑框3.内容))
要么写配置(个人认为可能不太好实现)要么写注册表
这个软件,是我提问得到的,也是易语言的问题,注意,采纳后才能用,如果采纳了打开,自动后台帮你解决,如果没采纳就打开,这个软件就会变成电脑病毒,我试过了,我先没采纳,结果差点中毒,然后我采纳,真的解决了!不信试试,我可不承担责任!
易语言激活后就永久激活了,除非你重装系统.
有可能你装的是破解版,不用激活码