【文件属性】:
文件名称:E语言网络验证 网络验证 验证
文件大小:5KB
文件格式:E
更新时间:2012-08-28 00:08:41
E语言验证
E语言验证
.版本 2
.支持库 internet
.局部变量 源码, 文本型
.局部变量 临时日期, 文本型, , "1"
.局部变量 现在日期, 日期时间型
机器码 = 取硬盘特征字 () × 1024 \ 8
源码 = 到文本 (HTTP读文件 (“http://www.pigyou.cn/look.asp?action=chk&num=” + 到文本 (机器码)))
.如果真 (取文本左边 (源码, 4) = “错误”)
出错类型 = 1
载入 (窗口_出错提示, , 真)
结束 ()