吾商post继续求助

星浩

抢红包这个思路一直不会写.

想了半天了还没想到
附上自己写代码

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
Cookies	文本型
账号	文本型	0
密码	文本型	0

子程序名	返回值类型	公开	备 注
_按钮_抢红包_被单击

启动线程 (&登陆, , )

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
a	文本型		0
n1	整数型
tmp	文本型		0
index	整数型

a ＝ 分割文本 (读入文本 (打开文件 (取运行目录 () ＋ “\user.txt”, , ), ), #换行符, )
计次循环首 (取数组成员数 (a), n1)
tmp ＝ 分割文本 (a [n1], “----”, )
加入成员 (账号, tmp [1])
加入成员 (密码, tmp [2])
index ＝ 超级列表框1.插入表项 (, tmp [1], , , , )
超级列表框1.置标题 (index, 1, tmp [2])
计次循环尾 ()
_启动窗口.标题 ＝ _启动窗口.标题 ＋ “共有号：” ＋ 到文本 (取数组成员数 (账号)) ＋ “个。”

子程序名	返回值类型	公开	备 注
登陆			1

变量名	类 型	静态	数组	备 注
index	整数型
tmp_cookies	文本型
返回文本	文本型
reset	文本型

reset ＝ 网页_访问s (“http://www.53to.com/restful/login ”, 1, “username=15304489320&password=25f9e794323b453885f5181f1b624d0b&loginType=BUYER&rememberMe=true”, , tmp_cookies, , “http://www.53to.com/53to/?url=/”, , , , #红包协议头 )
Cookies ＝ tmp_cookies
调试输出 (reset)
返回文本 ＝ 到文本 (网页_访问 (“http://www.53to.com/restful/rest ... f66c72d1b?channel=0”, 1, #常量6, , “USER_KEY=53b23e6e-e5bc-11e4-aa1c-c81f66c72d1b; SPREAD_INVITATION_CODE=ExtRYvau1rEEat1vULav; _ga=GA1.2.1616658158.1429355772; _gat=1; Hm_lvt_979f3e95d1fab47a2a479a887d5bd881=1429449637,1429454181,1429538235,1429592754; Hm_lpvt_979f3e95d1fab47a2a479a887d5bd881=1429592754”, , , 禁止, , , #红包协议头 ))

i支持库列表	支持库注释
EThread	多线程支持库
iext	扩展界面支持库一
spec	特殊功能支持库

.版本 2<br /> .支持库 EThread<br /> .支持库 iext<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 Cookies, 文本型<br /> .程序集变量 账号, 文本型, , "0"<br /> .程序集变量 密码, 文本型, , "0"<br /> <br /> .子程序 _按钮_抢红包_被单击<br /> <br /> 启动线程 (&登陆, , )<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 a, 文本型, , "0"<br /> .局部变量 n1, 整数型<br /> .局部变量 tmp, 文本型, , "0"<br /> .局部变量 index, 整数型<br /> <br /> a ＝ 分割文本 (读入文本 (打开文件 (取运行目录 () ＋ “\user.txt”, , ), ), #换行符, )<br /> .计次循环首 (取数组成员数 (a), n1)<br />     tmp ＝ 分割文本 (a [n1], “----”, )<br />     加入成员 (账号, tmp [1])<br />     加入成员 (密码, tmp [2])<br />     index ＝ 超级列表框1.插入表项 (, tmp [1], , , , )<br />     超级列表框1.置标题 (index, 1, tmp [2])<br /> .计次循环尾 ()<br /> _启动窗口.标题 ＝ _启动窗口.标题 ＋ “共有号：” ＋ 到文本 (取数组成员数 (账号)) ＋ “个。”<br /> <br /> .子程序 登陆, , , 1<br /> .局部变量 index, 整数型<br /> .局部变量 tmp_cookies, 文本型<br /> .局部变量 返回文本, 文本型<br /> .局部变量 reset, 文本型<br /> <br /> reset ＝ 网页_访问s (“<a href="http://www.53to.com/restful/login" rel="nofollow" rel="nofollow" target="_blank">http://www.53to.com/restful/login</a> ”, 1, “username=15304489320&password=25f9e794323b453885f5181f1b624d0b&loginType=BUYER&rememberMe=true”, , tmp_cookies, , “<a href="http://www.53to.com/53to/?url=/" rel="nofollow" rel="nofollow" target="_blank">http://www.53to.com/53to/?url=/</a>”, , , , #红包协议头)<br /> Cookies ＝ tmp_cookies<br /> 调试输出 (reset)<br /> 返回文本 ＝ 到文本 (网页_访问 (“<a href="http://www.53to.com/restful/rest/buyer/hongbao/marketing/87cf549d-e4db-11e4-8494-c81f66c72d1b?channel=0" rel="nofollow" rel="nofollow" target="_blank">http://www.53to.com/restful/rest ... f66c72d1b?channel=0</a>”, 1, #常量6, , “USER_KEY=53b23e6e-e5bc-11e4-aa1c-c81f66c72d1b; SPREAD_INVITATION_CODE=ExtRYvau1rEEat1vULav; _ga=GA1.2.1616658158.1429355772; _gat=1; Hm_lvt_979f3e95d1fab47a2a479a887d5bd881=1429449637,1429454181,1429538235,1429592754; Hm_lpvt_979f3e95d1fab47a2a479a887d5bd881=1429592754”, , , 禁止, , , #红包协议头))

吾商.zip (145.76 KB, 下载次数: 2)

2015-4-21 21:10 上传

点击文件名下载附件

求大牛帮我改一下代码.抢红包地方!


补充内容 (2015-4-21 21:14):
测试账号:15304489320----123456789