DZ编写的网络验证源码 配合配置及插件

通过本框架，可无限扩展数据输出接口，通过外部访问api接口，对数据进行操作、输出等功能；
本系统所有功能实现及控制均采用api外部接口，数据输出形式以JSON为主，可接收外部GET、POST参数。
客户端支持VC、VB、易、等所有主流开发语言。

访问验证：本框架结合discuz框架内置禁止IP、禁止访问会员组功能，实现对代理IP、会员组登录控制；
时间验证：本框架通过客户端时间与服务端时间进行验证，保证数据逻辑安全；

Result ＝ 到文本 (网页_访问 (“…………………………”, , , , 局_cookies, , ))
formhash ＝ 文本_取出中间文本 (Result, #密匙前, #密匙后, , )
正则.创建 (#资料, Result, , 真, 真, )
用户名 ＝ 正则.取子匹配文本 (3, 1, )
密码 ＝ 正则.取子匹配文本 (4, 1, )
确认密码 ＝ 正则.取子匹配文本 (5, 1, )
邮箱 ＝ 正则.取子匹配文本 (6, 1, )
数据 ＝ “regsubmit=yes&formhash=” ＋ formhash ＋ “&referer=http://www.dushula.top/./&activationauth=&” ＋ 用户名 ＋ “=” ＋ 编辑框_注册用户名.内容 ＋ “&” ＋ 密码 ＋ “=” ＋ 编辑框_注册密码.内容 ＋ “&” ＋ 确认密码 ＋ “=” ＋ 编辑框_注册确认密码.内容 ＋ “&” ＋ 邮箱 ＋ “=” ＋ 编辑框_注册邮箱.内容
Result ＝ 到文本 (网页_访问 (“http://www.dushula.top/member.php?mod=register&inajax=1”, 1, 数据, , , , , , , ))
Result ＝ 编码_URL解码 (Result, 真)
.如果真 (寻找文本 (Result, “感谢您注册”, , 假) ≠ -1)
信息框 (“注册成功，请返回登录”, 0, “注册成功提示”, )
.如果真 (寻找文本 (Result, “邮件已发送，可能需要几分钟后才能收到邮件”, , 假) ≠ -1)
信息框 (“已经发送邮件到你邮箱” ＋ #换行符 ＋ “请你去激活用于改密”, 0, , )
.如果真结束
返回 ()
.如果真结束
.如果真 (寻找文本 (Result, “欢迎您回来”, , 假) ≠ -1)
信息框 (“不可以频繁注册账号”, 0, “注册提示”, )