飘零网络验证商业版,想要的拿走

其他编程 2020-08-02 15:11:57

飘零网络验证商业版,想要的拿走

硬盘ID = 飘零取机器码 ()
时间 = 取标准格式时间文本 (到时间 (飘零取时间 ()))
.判断开始 (编辑框_增加用户名.内容 = “” 或 编辑框_增加密码.内容 = “” 或 编辑框_增加QQ.内容 = “”)
信息框 (“增加失败,请填写完你的信息”, #错误图标, “提示”)
.默认
.如果 (飘零是否存在 (“admin”, “use='” + 编辑框_增加用户名.内容 + “'”) = 真)
信息框 (“增加失败,此用户已经存在”, #错误图标, “提示”)
.否则
.如果 (飘零添加 (“admin”, “use,pass,dengji,zaixian,qq,ypid,daoqi,tjr,jubing,klxx,ip”, “'” + 编辑框_增加用户名.内容 + “'” + “,” + “'” + 编辑框_增加密码.内容 + “'” + “,” + “'” + 添加等级 + “'” + “,” + “'” + “2” + “'” + “,” + “'” + 编辑框_增加QQ.内容 + “'” + “,” + “'” + 硬盘ID + “'” + “,” + “#” + 时间 + “#” + “,' '” + “,'0'” + “,'0|0'” + “,” + “'” + 飘零取IP () + “'”) = 真)
信息框 (“增加成功”, 0, “提示”)
刷新显示用户数据 ()
.否则
信息框 (“增加失败”, #错误图标, “提示”)