10金币 求助循环POST自动拨号问题，具体看帖子

吾爱破解

问题是一个POST循环次数的问题，想实现 实现循环多少个号后自动拨号.zip (637.4 KB, 下载次数: 51)

2011-8-6 21:48 上传

点击文件名下载附件

    比如：PSOT登录10个帐号后，软件自动拨号一次、具体看源码就知道了。期待高手出现指点迷津。
       会的请做个源码，我是新人，光看你们代码可能不会用。所以希望高手们能改一下我的源码成为例程，谢谢！

exit11

[e]
.版本 2
.支持库 spec
.支持库 internet
.子程序 _开始_被单击
.局部变量 循环次数, 整数型
.局部变量 数组成员
.局部变量 POST地址1, 文本型
.局部变量 POST数据1, 文本型
.局部变量 返回数据1, 文本型
.局部变量 数组2, 文本型, , "0"
.局部变量 数组, 文本型, , "0"
数组 ＝ 分割文本 (编辑框1.内容, #换行符, )
循环次数 ＝ 1
数组成员 ＝ 1
.判断循环首 (循环次数 ＜ 10)
    数组2 ＝ 分割文本 (数组 [循环次数], “-”, )
    POST地址1 ＝ “http://www.3600gz.cn/member.php? ... it=yes&inajax=1”
    POST数据1 ＝ “username=” ＋ 数组2 [1] ＋ “&password=” ＋ 数组2 [2] ＋ “&&quickforward=yes” ＋ “yes&handlekey=ls”
    返回数据1 ＝ 到文本 (网页_访问 (POST地址1, 1, , , POST数据1, 1))
    调试输出 (返回数据1)
    .如果 (寻找文本 (返回数据1, “window”, , 假) ＞ 0)
        编辑框2.加入文本 (数组2 [1] ＋ “----” ＋ “正确密码” ＋ #换行符)
    .否则
        编辑框3.加入文本 (数组2 [1] ＋ “----” ＋ “密码错误” ＋ #换行符)
    .如果结束
    循环次数 ＝ 循环次数 ＋ 1
    .如果真 (数组成员 ＞ 取数组成员数 (数组))
        数组成员 ＝ 1
    .如果真结束
    .如果真 (循环次数 ＝ 10)
        循环次数 ＝ 1
        挂断 ()
        拨号 (, , , , )
    .如果真结束
    处理事件 ()
.判断循环尾 ()
信息框 (“完成”, 0, )

[/e]

canaan

我是新手，刚来的，虽然不懂，帮你顶顶

Xiao白

......删除

exit11

修改了下，自己测试

Xiao白

晕！刚才发的那不对！想了下只能这样了！

Xiao白

晕！刚才发那个只限小于100的数 我改了下！！！用这个就行！

取什么名

都是乌云，，方式是这样楼主

挂断
等待时间
拨号（，，，，）
参数自己设置

吾爱破解

exit11 发表于 2011-8-6 22:21

你的代码是可以用的。但是你只实现了我的一个要求。

我的源码里还有一个要求是：判断,选择框是否自动拨号，如果被选择那么才会让软件自动拨号，否则不自动拨号！希望你能再帮忙看看吧{:3_234:}

吾爱破解

baims 发表于 2011-8-6 22:48
晕！刚才发那个只限小于100的数 我改了下！！！用这个就行！

你的这句代码弄的不对啊。还有一个问题你也没解决，我源码里说了。要判读，是否自动拨号，被选择才会自动拨号、否则不拨号的。