易语言怎么验证机器码(客户Duan和服务端配合)

Xuanyu

易语言怎么验证机器码，客户Duan上线之后自动发送机器码，服务器查找是否有该机器码，没有则返回没有注册，现在急需验证是否该机器码是否已注册的部分的代码(配置项)

zainex

客户Duan:

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
地址	字节集
ip	文本型
端口	整数型
系统信息	系统信息
机器码	文本型

ip ＝ 转换为IP地址 (取本机名 ())  ' 换成你自己服务器的IP并开启相应的TCP端口
端口 ＝ 9527
如果真 (客户1.连接 (ip, 端口) ＝ 假)
调试输出 (“连接失败”)
返回 ()
' 模拟生成机器码, 不适合实际使用
取系统信息 (系统信息)
机器码 ＝ 取数据摘要 (到字节集 (系统信息.版本))
客户1.发送数据 (机器码)

子程序名	返回值类型	公开	备 注
_客户1_数据到达

变量名	类 型	静态	数组	备 注
数据	字节集

数据 ＝ 客户1.取回数据 ()
如果真 (到文本 (数据) ＝ “未注册”)
信息框 (“请先注册”, 0, , )

i支持库列表	支持库注释
eAPI	应用接口支持库
sock	网络通讯支持库
spec	特殊功能支持库
dp1	数据操作支持库一

.版本 2<br /> .支持库 eAPI<br /> .支持库 sock<br /> .支持库 spec<br /> .支持库 dp1<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 地址, 字节集<br /> .局部变量 ip, 文本型<br /> .局部变量 端口, 整数型<br /> .局部变量 系统信息, 系统信息<br /> .局部变量 机器码, 文本型<br /> <br /> ip ＝ 转换为IP地址 (取本机名 ())  ' 换成你自己服务器的IP并开启相应的TCP端口<br /> 端口 ＝ 9527<br /> .如果真 (客户1.连接 (ip, 端口) ＝ 假)<br />     调试输出 (“连接失败”)<br />     返回 ()<br /> .如果真结束<br /> ' 模拟生成机器码, 不适合实际使用<br /> 取系统信息 (系统信息)<br /> 机器码 ＝ 取数据摘要 (到字节集 (系统信息.版本))<br /> 客户1.发送数据 (机器码)<br /> <br /> <br /> .子程序 _客户1_数据到达<br /> .局部变量 数据, 字节集<br /> <br /> 数据 ＝ 客户1.取回数据 ()<br /> .如果真 (到文本 (数据) ＝ “未注册”)<br />     信息框 (“请先注册”, 0, , )<br /> .如果真结束

服务端:

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

服务器1.端口 ＝ 9527

子程序名	返回值类型	公开	备 注
_服务器1_客户进入

调试输出 (服务器1.取回客户 ())

子程序名	返回值类型	公开	备 注
_服务器1_数据到达

变量名	类 型	静态	数组	备 注
数据	字节集
路径	文本型
机器码	文本型
状态	文本型

数据 ＝ 服务器1.取回数据 ()
机器码 ＝ 到文本 (数据)
路径 ＝ 取运行目录 () ＋ “\配置.ini”
状态 ＝ 读配置项 (路径, “机器码”, 机器码, “未注册”)
' 写配置项 (路径, “机器码”, 机器码, “已注册”)
如果真 (状态 ＝ “未注册”)
服务器1.发送数据 (服务器1.取回客户 (), “未注册”, 1)
调试输出 (机器码)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 服务器1.端口 ＝ 9527<br /> <br /> <br /> .子程序 _服务器1_客户进入<br /> <br /> 调试输出 (服务器1.取回客户 ())<br /> <br /> <br /> .子程序 _服务器1_数据到达<br /> .局部变量 数据, 字节集<br /> .局部变量 路径, 文本型<br /> .局部变量 机器码, 文本型<br /> .局部变量 状态, 文本型<br /> <br /> 数据 ＝ 服务器1.取回数据 ()<br /> 机器码 ＝ 到文本 (数据)<br /> 路径 ＝ 取运行目录 () ＋ “\配置.ini”<br /> 状态 ＝ 读配置项 (路径, “机器码”, 机器码, “未注册”)<br /> ' 写配置项 (路径, “机器码”, 机器码, “已注册”)<br /> .如果真 (状态 ＝ “未注册”)<br />     服务器1.发送数据 (服务器1.取回客户 (), “未注册”, 1)<br /> .如果真结束<br /> 调试输出 (机器码)

效果:

完整例子.zip (2.78 KB, 下载次数: 19)

2026-1-2 19:52 上传

点击文件名下载附件

尛龍科技

直接把机器码发包到服务端，服务端在核对机器码不就行了吗，注册的时候最好也打包机器码一起发送服务端，并且记录机器码

阿杰大大

直接用现有的网络验证,搭建一个不就好了么,比如U验证.

liuyue5086

客户Duan注册的时候你服务器接收他机器码就行，保存方式随便你，喜欢用配置项或者数据库都可以，登录请求时校验他用户名绑定的机器码是不是一致或者机器码绑定的用户名是否一致就行，当然了，这玩意感觉没啥用，很容易被破的,最好还是核心功能要通过服务器授权返回，存在内存里面，程序结束后直接释放，这样子就基本难搞