窗口程序集名 | 保 留 | 保 留 | 备 注 | 窗口程序集_启动窗口 | | | |
变量名 | 类 型 | 静态 | 数组 | 备 注 | post | 文本型 | | | 返回post | 文本型 | | | urlzu | 文本型 | | 0 | 网址个数 | 整数型 | | | i | 整数型 | | | url | 文本型 | | | cookies | 文本型 | | 3 | COOKES1 | 文本型 | | | cookiesz | 文本型 | | |
post = “jumpurl=http://www.xmfish.com/&loginurl=http://bbs.xmfish.com/login.php&action=bbs&bbs_id=63&username=” + 编码_URL编码 (编辑框1.内容, , 真) + “&password=” + 编辑框2.内容 返回post = 网页_访问S (“http://www.xiaoyu.com/login”, 1, post, “Referer: http://bbs.xmfish.com/login.php”, 返回cookies, , , 假)调试输出 (返回cookies )网址个数 = 文本_取中间_批量 (到文本 (返回post ), “'http://bbs”, “'”, urlzu )网址个数 = 1 重定义数组 (cookies, 假, 网址个数 ) 计次循环首 (网址个数, i )url = “http://bbs” + urlzu [i ]返回post = 网页_访问S (url, 0, , , cookies [i ])cookiesz = 网页_Cookie合并更新 (cookiesz, cookies [i ]) 计次循环尾 ()url = “http://bbs.xmfish.com/”返回post = 网页_访问S (url, 0, , cookiesz )输出调试文本 (cookiesz )返回cookies = cookiesz 如果 (寻找文本 (到文本 (返回post ), “register.php”, , 假) < 1 且 寻找文本 (到文本 (返回post ), “xmfish”, , 假) > 1 )输出调试文本 (“登陆成功”) 输出调试文本 (“登陆失败”) 变量名 | 类 型 | 静态 | 数组 | 备 注 | verify | 文本型 | | | post | 文本型 | | | 列表源码 | 文本型 | | | 地址 | 文本型 | | | 返回post | 文本型 | | | 现在时间 | 日期时间型 | | | 格林威治 | 文本型 | | | 目标ID | 文本型 | | | post1 | 文本型 | | | 返回post1 | 文本型 | | |
verify = 到文本 (网页_访问S (“http://bbs.xmfish.com”, , , , , , , , , )) verify = 文本_取出中间文本 (verify, “verifyhash = '”, “'”, , ) 如果真 (verify = “”)信息框 (“参数错误”, 0, , )返回 () 格林威治 = 到文本 (取时间间隔 (现在时间, 到时间 (“1970年1月1日”), 8 )) post = “verify=” + verify + “&step=2&pwuser=” + 编码_URL编码 (编辑框4.内容, 真, 真) + “&msg_title=&atc_content=” + 编码_URL编码 (编辑框3.内容, 真, 真)地址 = “http://bbs.xmfish.com/pw_ajax.php?action=msg&nowtime=” + 到文本 (格林威治 ) + “&verify=” + verify 返回post = 网页_访问S (地址, 1, post, 返回cookies, , )调试输出 (到文本 (返回post )) 直接上源码 帮我实现 post私信 我调试post登录成功 取cookies的方法是 大神写的 但是就是调试不成功
|