|
分享源码
界面截图: |
|
是否带模块: |
调用了模块 |
备注说明: |
- |
我也是新手!!为了照顾新手每行加入了注释!。高手勿喷!脸皮不够厚!!!!!!
编辑框_运行记录. 加入文本 (到文本 (取现行时间 ()) + “:您的IP地址 ” + ip_取本机wai网IP () + #换行符 ) 结束 ()耗时 = 取启动时间 ()ip地址 = 到文本 (HTTP读文件 (“http://2019.ip138.com/ic.asp”)) ip地址 = 删全部空 (取文本中间 (ip地址, 寻找文本 (ip地址, “您的IP是:”, , 假) + 10, 寻找文本 (ip地址, “ 来自”, , 假) - 寻找文本 (ip地址, “您的IP是:”, , 假) - 10 )) 耗时 = 取启动时间 () - 耗时 返回 (ip地址 )变量名 | 类 型 | 静态 | 数组 | 备 注 | 返回数据 | 文本型 | | | token | 文本型 | | |
返回数据 = 编码_URL解码 (到文本 (网页_访问 (“http://” + 编辑框3.内容 + “/cgi-bin/luci”, 1, “username=” + 编辑框1.内容 + “&psd=” + 编辑框2.内容, , )), 真) 如果真 (寻找文本 (返回数据, “密码错误”, , 假) ≠ -1 ) 信息框 (“密码错误 或 用户名错误,请重新检查~”, 0, , )返回 ()token = 文本_取出中间文本 (返回数据, “token: '”, “'”)
编辑框_运行记录. 加入文本 (到文本 (取现行时间 ()) + “:您的光猫 ” + “登录成功” + #换行符 ) 如果真 (token = “”) 信息框 (“请登录,在重启~”, 0, , )返回 ()返回数据 = 到文本 (网页_访问 (“http://” + 编辑框3.内容 + “/cgi-bin/luci/admin/reboot”, 1, “token=” + token + “&_=0.6963554233128502”, , , )) 如果真 (返回数据 = “”) 编辑框_运行记录. 加入文本 (到文本 (取现行时间 ()) + “:命令发送完毕,正在重启..... ” + #换行符 ) 延时 (10000 ) 循环判断首 () 延迟 (700 )循环判断尾 (通信测试 (“www.baidu.com”, 300 ) < 1 ) 编辑框_运行记录. 加入文本 (到文本 (取现行时间 ()) + “:重启成功 ” + #换行符 ) 编辑框_运行记录. 加入文本 (到文本 (取现行时间 ()) + “:您的新IP地址 ” + ip_取本机wai网IP () + #换行符 )编辑框_运行记录. 加入文本 (到文本 (取现行时间 ()) + “:重启完毕,已经可以上网了..... ” + #换行符 )返回 () 编辑框_运行记录.加入文本 (到文本 (取现行时间 ()) + “:重启失败啦 ” + #换行符 )
|
评分
-
查看全部评分
|