易语⾔通过post实现对⼩⽶路由器操作的代码
操作⼩⽶路由器的代码
此功能需要加载精易模块5.6
.版本 2
.⽀持库 iext2
.程序集窗⼝程序集_启动窗⼝
.程序集变量 IP, ⽂本型
.程序集变量 cookie, ⽂本型演员李琦
.程序集变量 token, ⽂本型
.⼦程序登录, ⽂本型
.参数密码, ⽂本型
.
参数返回内容, ⽂本型, 参考
.参数 token, ⽂本型, 参考
.局部变量临时, ⽂本型
.局部变量 deviceId, ⽂本型
.局部变量 key, ⽂本型
.局部变量时间戳, ⽂本型
.局部变量随机数, ⽂本型
.局部变量 psw, ⽂本型
.局部变量 nonce, ⽂本型
.局部变量密码加密, ⽂本型
.局部变量 nonce编码, ⽂本型
临时=⽹页_访问S (“” + IP + “/cgi-bin/luci/web”)
deviceId =⽂本_取出中间⽂本 (临时, “deviceId = '”, “'”)
key =⽂本_取出中间⽂本 (临时, “key: '”, “'”)
时间戳=时间_到时间戳 (, 真)
随机数=⽂本_取随机范围数字 (1000, 9999)
psw =密码
nonce = “0_” + deviceId + “_” +时间戳+ “_” +随机数
密码加密=校验_取sha1 (到字节集 (nonce +校验_取sha1 (到字节集 (psw + key))))
增加⽇志 (“key:” + #换⾏符+ key)
增加⽇志 (“nonce:” + #换⾏符+ nonce)
造梦西游3青龙剑增加⽇志 (“nonce编码:” + #换⾏符+ nonce编码)
返回内容=⽹页_访问S (“” + IP + “/cgi-bin/luci/api/xqsystem/login”, 1, “username=admin&password=” +密码加密+ “&logtype=2&nonce=” + nonce, , cookie, , , 真) token =⽂本_取出中间⽂本 (返回内容, “token” + #引号+ “:” + #引号, #引号)
.如果真 (寻⽂本 (返回内容, #引号+ “code” + #引号+ “:0”, , 假) = -1)
返回 (“失败”)
.如果真结束
返回 (“成功”)
.⼦程序增加⽇志
excel的使用
.参数⽇志内容, ⽂本型
⽇志编辑框.加⼊⽂本 (⽇志内容+ #换⾏符+ “------------------------------------------------------------------------” + #换⾏符)
.⼦程序 _登陆按钮_被单击
.
局部变量返回, ⽂本型
.局部变量返回内容, ⽂本型
央视主持人王欢简历
.局部变量 psw, ⽂本型
IP = IP编辑框.地址
psw =密码编辑框.内容
token = “”
.如果真 (IP = “” 或 psw = “”)
信息框 (“IP或密码不能为空”, 0, )
返回 ()
.如果真结束
返回=登录 (psw, 返回内容, token)
.
判断开始 (返回= “成功”)
增加⽇志 (“登陆成功:” + #换⾏符+返回内容)
增加⽇志 (“token:” + #换⾏符+ token)
.默认
老电影演员张瑞芳增加⽇志 (“登录失败:” + #换⾏符+返回内容)
.判断结束
.⼦程序 _断开按钮_被单击
.局部变量返回, ⽂本型
.如果真 (token = “”)
信息框 (“请先登录”, 0, )
返回 ()
.
如果真结束
返回=⽹页_访问S (“” + IP + “/cgi-bin/luci/;stok=” + token + “/api/xqnetwork/pppoe_stop”)
.判断开始 (寻⽂本 (返回, #引号+ “code” + #引号+ “:0”, , 假) = -1)
增加⽇志 (“断⽹失败:” + #换⾏符+返回)
.默认
增加⽇志 (“断⽹成功:” + #换⾏符+返回)
.判断结束
.⼦程序 _拨号按钮_被单击
.局部变量返回, ⽂本型
.如果真 (token = “”)
信息框 (“请先登录”, 0, )
返回 ()
.如果真结束
返回=⽹页_访问S (“” + IP + “/cgi-bin/luci/;stok=” + token + “/api/xqnetwork/pppoe_start”)
.判断开始 (寻⽂本 (返回, #引号+ “code” + #引号+ “:0”, , 假) = -1)
增加⽇志 (“拨号失败:” + #换⾏符+返回)
.默认
增加⽇志 (“拨号成功:” + #换⾏符+返回)
.判断结束
运⾏结果:
总结
哪个品牌的护肤品好以上就是这篇⽂章的全部内容了,希望本⽂的内容对⼤家的学习或者⼯作具有⼀定的参考学习价值,谢谢⼤家对的⽀持。如果你想了解更多相关内容请查看下⾯相关链接