|
本帖最后由 依然…夏雨天 于 2011-7-19 13:45 编辑
如题
我写了一个3GQQ群|发软件
发送部分的源代码是:
[e].版本 2
.支持库 spec
.计次循环首 (取数组成员数 (QQ), 计次)
好友QQ = 到文本 (QQ [计次])
发送内容 = 彗星URL编码_UTF8 (群|发内容)
返回文本2 = UTF8转ANSI (彗星HTTP读文件 (“q16.3g.qq.com/g/s?sid=” + 要群|发的SID + “&aid=sendmsg&tfor=qq”, “POST”, , , “msg=” + 发送内容 + “&u=” + 好友QQ, ))
延迟 (500)
.计次循环尾 ()
[/e]
有两个小问题哦
1.怎么把他编程多线程,单线程太慢了,发包如果太快就会被拦截,SO 只能出延迟此下策了.....
2.如果失败的返回值是(稍后)成功的返回值是(成功),那么怎么判断发送失败 然后重新发送 (循环的)
提取QQ跟SID的代码:(也帮忙改成多线程的吧)
.版本 2
.支持库 iext
.计次循环首 (超级列表框1.取表项数 (), k)
好友群|发 (登陆的QQ.内容, 登陆的SID.内容, 编辑框1.内容)
登陆的QQ.内容 = 超级列表框1.取标题 (k, 0)
登陆的SID.内容 = 超级列表框1.取标题 (k, 1)
.计次循环尾 ()
|
|