易语言免费领取ofo小黄车三个月骑乘卡的代码

 更新时间:2018年11月27日 14:21:39   作者:易语言源码贝贝吧  
今天小编就为大家分享一篇关于易语言免费领取ofo小黄车三个月骑乘卡的代码,小编觉得内容挺不错的,现在分享给大家,具有很好的参考价值,需要的朋友一起跟随小编来看看吧

免费领取ofo小黄车三个月骑乘卡的代码

此功能需要加载精易模块5.6

.版本 2
.支持库 EThread
.程序集 窗口程序集_启动窗口
.程序集变量 cookies, 文本型
.子程序 __启动窗口_创建完毕
.局部变量 返回, 文本型
.子程序 _发送按钮_被单击
启动线程 (&发送, , )
.子程序 发送
.局部变量 返回, 文本型
返回 = 编码_URL解码 (到文本 (网页_访问_对象 (“https://san.ofo.so/ofo/Api/activity/monthCard/verifyCode”, 1, “tel=” + 手机号编辑框.内容, , cookies)), 真)
提示编辑框.加入文本 (文本_取出中间文本 (返回, “msg” + #引号 + “:” + #引号, #引号) + #换行符)
.子程序 _领取按钮_被单击
启动线程 (&领取, , )
.子程序 领取
.局部变量 返回, 文本型
.局部变量 setcookies, 文本型
.局部变量 token, 文本型
返回 = 编码_URL解码 (到文本 (网页_访问_对象 (“https://san.ofo.so/ofo/Api/login”, 1, “source=0&tel=” + 手机号编辑框.内容 + “&code=” + 验证码编辑框.内容 + “&idfa=”, cookies, setcookies)), 真)
setcookies = 网页_Cookie合并更新 (cookies, setcookies)
token = 文本_取出中间文本 (返回, “token” + #引号 + “:” + #引号, #引号)
提示编辑框.加入文本 (文本_取出中间文本 (返回, “msg” + #引号 + “:” + #引号, #引号) + #换行符)
.判断开始 (寻找文本 (返回, “登陆成功”, , 假) ≠ -1)
  返回 = 编码_URL解码 (到文本 (网页_访问_对象 (“https://product.api.ofo.com/ofo/Api/v1/card/receiveFreeCard”, 1, “token=” + token + “&source=0&productToken=3473e97559ee199d4520eccfa3c6ea9a&city=”, setcookies)), 真)
  .判断开始 (寻找文本 (返回, “操作成功”, , 假) ≠ -1)
    提示编辑框.加入文本 (“成功领取月卡1张!等待10秒领取下一张” + #换行符)
  .默认
    提示编辑框.加入文本 (文本_取出中间文本 (返回, “msg” + #引号 + “:” + #引号, #引号) + #换行符)
  .判断结束
  延时 (10000)
  返回 = 编码_URL解码 (到文本 (网页_访问_对象 (“https://product.api.ofo.com/ofo/Api/v1/card/receiveFreeCard”, 1, “token=” + token + “&source=0&productToken=1d665981aabdcabaaff37a641b8daf35&city=”, setcookies)), 真)
  .判断开始 (寻找文本 (返回, “操作成功”, , 假) ≠ -1)
    提示编辑框.加入文本 (“成功领取月卡1张!等待10秒领取下一张” + #换行符)
  .默认
    提示编辑框.加入文本 (文本_取出中间文本 (返回, “msg” + #引号 + “:” + #引号, #引号) + #换行符)
  .判断结束
  延时 (10000)
  返回 = 编码_URL解码 (到文本 (网页_访问_对象 (“https://product.api.ofo.com/ofo/Api/v1/card/receiveFreeCard”, 1, “token=” + token + “&source=0&productToken=1de2c01c82b0b52b3bad88033d17f6e5&city=”, setcookies)), 真)
  .判断开始 (寻找文本 (返回, “操作成功”, , 假) ≠ -1)
    提示编辑框.加入文本 (“成功领取月卡1张!等待10秒领取下一张” + #换行符)
  .默认
    提示编辑框.加入文本 (文本_取出中间文本 (返回, “msg” + #引号 + “:” + #引号, #引号) + #换行符)
  .判断结束
.默认
.判断结束

运行结果:

总结

以上就是这篇文章的全部内容了,希望本文的内容对大家的学习或者工作具有一定的参考学习价值,谢谢大家对脚本之家的支持。如果你想了解更多相关内容请查看下面相关链接

相关文章

  • 易语言获取进程所在路径的方法

    易语言获取进程所在路径的方法

    今天小编就为大家分享一篇关于易语言获取进程所在路径的方法,小编觉得内容挺不错的,现在分享给大家,具有很好的参考价值,需要的朋友一起跟随小编来看看吧
    2018-11-11
  • 易语言在组合框指定位置插入一个新项目的方法

    易语言在组合框指定位置插入一个新项目的方法

    今天小编就为大家分享一篇关于易语言在组合框指定位置插入一个新项目的方法,小编觉得内容挺不错的,现在分享给大家,具有很好的参考价值,需要的朋友一起跟随小编来看看吧
    2018-11-11
  • 易语言启用多线程方法实例分享

    易语言启用多线程方法实例分享

    这篇文章主要介绍了易语言启用多线程方法实例分享的相关资料,需要的朋友可以参考下
    2023-03-03
  • 易语言制作个性工具包步骤

    易语言制作个性工具包步骤

    在本篇内容里小编为大家分享了关于易语言制作个性工具包的方法步骤,对此有兴趣的朋友们跟着操作下。
    2019-01-01
  • 易语言插入成员命令使用讲解

    易语言插入成员命令使用讲解

    今天小编就为大家分享一篇关于易语言插入成员命令使用讲解,小编觉得内容挺不错的,现在分享给大家,具有很好的参考价值,需要的朋友一起跟随小编来看看吧
    2018-11-11
  • 易语言当前窗口或组件的窗口句柄获取方法

    易语言当前窗口或组件的窗口句柄获取方法

    今天小编就为大家分享一篇关于易语言当前窗口或组件的窗口句柄获取方法,小编觉得内容挺不错的,现在分享给大家,具有很好的参考价值,需要的朋友一起跟随小编来看看吧
    2018-11-11
  • 易语言制作窗口信息探测工具的代码

    易语言制作窗口信息探测工具的代码

    今天小编就为大家分享一篇关于易语言制作窗口信息探测工具的代码,小编觉得内容挺不错的,现在分享给大家,具有很好的参考价值,需要的朋友一起跟随小编来看看吧
    2018-11-11
  • 一步一步跟我学易语言之子程序指针

    一步一步跟我学易语言之子程序指针

    今天小编就为大家分享一篇关于一步一步跟我学易语言之子程序指针,小编觉得内容挺不错的,现在分享给大家,具有很好的参考价值,需要的朋友一起跟随小编来看看吧
    2018-10-10
  • 易语言调用JS制作统计文本字数的代码

    易语言调用JS制作统计文本字数的代码

    今天小编就为大家分享一篇关于易语言调用JS制作统计文本字数的代码,小编觉得内容挺不错的,现在分享给大家,具有很好的参考价值,需要的朋友一起跟随小编来看看吧
    2018-11-11
  • 易语言超级编辑框中寻找指定文本并选中的示例

    易语言超级编辑框中寻找指定文本并选中的示例

    今天小编就为大家分享一篇关于易语言超级编辑框中寻找指定文本并选中的示例,小编觉得内容挺不错的,现在分享给大家,具有很好的参考价值,需要的朋友一起跟随小编来看看吧
    2019-01-01

最新评论