Question

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

写配置项可以的话请将源码发过来

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

 

Answer 2

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

追问

那请问注册表要怎么弄？还有我指的是我想实现自己用易语言写的软件第一次开启时需要输入激活码，第二次在写了配置项或注册表时就不用再次输入激活码了，但我不会写激活码和配置项才来求助。请你帮助我一下。

追答

用写注册表项和取文本注册表项这两个命令就可以了，我是用手机，写不了源码

追问

那可不可以麻烦你使用电脑时把源码发给我，我是刚刚学的，不是很懂。

Answer 3

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

Answer 4

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

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

追问

不好意思，我可能表达错误了，我是指我想实现自己用易语言写的软件第一次开启时需要输入激活码，第二次在写了配置项或注册表时就不用再次输入激活码了，但我不会写激活码和配置项才来求助。