易语言写的软件开启时需要输入激活码,第二次开启时就不用输入了。要怎么办?

写配置项可以的话请将源码发过来
2025-04-29 02:02:46
推荐回答(4个)
回答1:

.版本 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.内容))

 

回答2:

要么写配置(个人认为可能不太好实现)要么写注册表

回答3:

这个软件,是我提问得到的,也是易语言的问题,注意,采纳后才能用,如果采纳了打开,自动后台帮你解决,如果没采纳就打开,这个软件就会变成电脑病毒,我试过了,我先没采纳,结果差点中毒,然后我采纳,真的解决了!不信试试,我可不承担责任!

回答4:

  1. 易语言激活后就永久激活了,除非你重装系统.

  2. 有可能你装的是破解版,不用激活码