网站首页 > 易语言相关 > 网络相关源码 正文
网页POST操作,DX2登录。
.版本 2 .支持库 iext .子程序 _按钮1_被单击 .局部变量 返回提示, 文本型 .局部变量 返回文本, 文本型 论坛地址 = “http://xyu2011.tk/” ' 小宇QQ:497593615 接收QQ空间刷留言,刷微博听众软件、代做DX2家族网站(风格:如残血、浪漫等家族社区的) .如果真 (用户名编辑框.内容 = “”) 状态条1.置文本 (0, “检测到用户名空白,请输入用户名”) 返回 () .如果真结束 .如果真 (密码编辑框.内容 = “”) 状态条1.置文本 (0, “检测到用户名空白,请输入用户密码”) 返回 () .如果真结束 ' 如果 (论坛.登陆 (论坛地址, 用户名编辑框.内容, 密码编辑框.内容, 返回提示) = 真) 返回文本 = 到文本 (读url (论坛地址 + “member.php?mod=logging&action=login&loginsubmit=yes&infloat=yes&lssubmit=yes&inajax=1 ”, “POST”, “fastloginfield=username&username=” + 编码_URL编码_GBK (用户名编辑框.内容) + “&cookietime=2592000&password=” + 编码_URL编码_GBK (密码编辑框.内容) + “&quickforward=yes&handlekey=ls”)) 返回文本 = 到文本 (读url (论坛地址 + “member.php?mod=logging&action=login&loginsubmit=yes&infloat=yes&lssubmit=yes&inajax=1 ”, “POST”, “fastloginfield=username&username=” + 编码_URL编码_GBK (用户名编辑框.内容) + “&cookietime=2592000&password=” + 编码_URL编码_GBK (密码编辑框.内容) + “&quickforward=yes&handlekey=ls”)) ' UTF8的使用下面的。把下面 返回文本 前面的“ ' ”去掉。----上面的是GBK登陆的.,UTF8的要在..上面 返回文本 前加上“ ' ” ' UTF8的使用下面的。把下面 返回文本 前面的“ ' ”去掉。----上面的是GBK登陆的.,UTF8的要在..上面 返回文本 前加上“ ' ” ' 返回文本 = UTF8转ANSI (读url (论坛地址 + “member.php?mod=logging&action=login&loginsubmit=yes&infloat=yes&lssubmit=yes&inajax=1 ”, “POST”, “fastloginfield=username&username=” + 用户名编辑框.内容 + “&cookietime=2592000&password=” + 密码编辑框.内容 + “&quickforward=yes&handlekey=ls”)) ' 返回文本 = UTF8转ANSI (读url (论坛地址 + “member.php?mod=logging&action=login&loginsubmit=yes&infloat=yes&lssubmit=yes&inajax=1 ”, “POST”, “fastloginfield=username&username=” + 用户名编辑框.内容 + “&cookietime=2592000&password=” + 密码编辑框.内容 + “&quickforward=yes&handlekey=ls”)) 输出调试文本 (返回文本) .如果 (寻找文本 (返回文本, “欢迎您回来,”, , 假) > -1) ' 成功 返回提示 = “欢迎您回来,” + 取指定内容 (返回文本, “欢迎您回来,”, “'”) uid = 取指定内容 (返回文本, “uid':'”, “'”) 成功信息 = 返回提示 状态条1.置文本 (0, “登录成功,正在载入界面,请稍候......”) 载入 (窗口1, , 假) 删除文件 (取运行目录 () + “/COOKIE.ini”) 窗口1.可视 = 真 _启动窗口.可视 = 假 .否则 .如果 (寻找文本 (返回文本, “密码错误次数过多,”, , 假) > -1) ' 失败 返回提示 = 取指定内容 (返回文本, “errorhandle_ls('”, “'”) 状态条1.置文本 (0, 返回提示) .否则 .如果 (寻找文本 (返回文本, “登录失败,您还可以尝试”, , 假) > -1) ' 失败 返回提示 = 取指定内容 (返回文本, “errorhandle_ls('”, “'”) 状态条1.置文本 (0, 返回提示) .否则 状态条1.置文本 (0, “登录失败,请检测帐号密码是否正确”) .如果结束 .如果结束 .如果结束 ' 论坛.退出 ()
- 上一篇: 易语言结合PHP实现网络验证
- 下一篇: 小饭饭网络维护工具
猜你喜欢
- 2024-04-07 最新NT框架可用QQ群验证
- 2024-03-21 蓝奏云直链解析纯协议源码
- 2024-03-20 基于E2EE的无状态认证JsonWebToken算法、常用Web算法模块
- 2024-03-18 YoLo8本地cpu识别源码
- 2024-03-16 搜索引擎 下拉关键词例子 支持百d\搜狗\必应\搜狗手机版
- 2024-03-15 ZIP解压缩模块源码
- 2024-03-12 tgp登陆打开游戏源码
- 2024-03-12 抖音弹幕wss协议源码
- 2024-03-11 静默快捷取全部已登录QQ账号、httpkey、cookie、群验证等
- 2024-03-08 TG API 发消息与图片
你 发表评论:
欢迎- 百度站内搜索
- 关注微信公众号
- 网站分类
-
- 网站公告
- 电子书书籍
- 程序员工具箱
- 编程工具
- 易语言相关
- 网络相关源码
- 图形图像源码
- 系统工具源码
- 易语言模块源码
- 易语言支持库
- 数据库类源码
- 易语言例程
- 易语言游戏开发
- 易语言模块
- 多媒体类源码
- 易语言资源网
- 易语言视频教程
- JS分析教程
- 易语言图文教程
- 易语言常见问题及笔记
- 工具源码
- 易语言版本
- 网络编程
- javascript
- PHP编程
- html
- 正则表达式
- 面试题
- nodejs
- 其它综合
- 脚本专栏
- python
- 按键精灵相关
- 按键精灵图文教程
- 按键精灵视频教程
- 按键精灵Q语言
- 按键精灵安卓版
- golang
- 游戏安全
- 火山相关
- 火山安卓软件
- 火山常见问题及笔记
- 火山安卓源码
- 火山视频教程
- 火山PC版本下载
- 火山PC视窗例程
- 互联网那些事
- 引流推广
- 项目揭秘
- 网络营销
- 营销软件
- QQ营销软件
- 娱乐软件
- 机器人插件
- 培训教程
- 技术教程
- 活动线报
- 数据库
- Redis
- Access
- MongoDB
- Mysql
- 问答
- 其它
- 易语言
- 需求
- 在线教程
- 多线程培训班
- 觅风易语言教程
- 模拟系列教程
- 集中营易语言教程
- 历史数据
- 随机tag
本文暂时没有评论,来添加一个吧(●'◡'●)