精易论坛

标题: 多线程批量使用网页访问对象返回值为空的问题【附..... [打印本页]

作者: 1436880331 时间: 2024-2-8 12:35
标题: 多线程批量使用网页访问对象返回值为空的问题【附.....
第一个代码：.版本 2.支持库 iext

.子程序 _批量抢购_被单击
.局部变量局_索引数量, 整数型

全_线程数＝超级列表框1.取表项数 ()  ' 获取用户设置的线程数量

局_索引数量＝ 0  ' 归零操作

.计次循环首 (全_线程数, 局_索引数量)
全_多线程 [局_索引数量].创建 (&提交购买信息, 局_索引数量, , , , , 真, , , )
局_索引数量＝局_索引数量＋ 1
.计次循环尾 ()

第二个代码：（上面调用的子程序，提交购买信息）：
.版本 2
.支持库 commobj
.支持库 iext

.子程序提交购买信息, 文本型, , server_id是服务器id
.参数局_索引数量, 整数型
.局部变量局_网址, 文本型
.局部变量局_提交数据, 文本型
.局部变量局_提交cookie, 文本型
.局部变量 ADD_协议头, 类_POST数据类
.局部变量局_提交协议头, 文本型
.局部变量局_结果, 字节集
.局部变量局_返回, 文本型
.局部变量局_正则, 正则表达式类
.局部变量道具购买地址按钮, 文本型
.局部变量失败原因, 文本型
.局部变量局_匹配数, 整数型
.局部变量局_计次, 整数型
.局部变量局_子匹配数, 整数型
.局部变量 server_id, 文本型
.局部变量 getusername, 文本型
.局部变量 orderid, 文本型
.局部变量 sign, 文本型
.局部变量 cart_type, 文本型
.局部变量 buytype, 文本型
.局部变量 UseGiftMb, 文本型
.局部变量 GiveMode, 文本型
.局部变量 DiscountId, 文本型
.局部变量 UseDiscount, 文本型
.局部变量 AllPrice, 文本型
.局部变量 payType, 文本型
.局部变量 weixinChannel, 文本型
.局部变量 itemname, 文本型
.局部变量索引, 整数型
.局部变量日志文本名, 文本型
.局部变量读取日志文本内容, 快速文本对象
.局部变量代理IP, 文本型

索引＝局_索引数量－ 1

代理IP ＝超级列表框1.取标题 (索引, 14)

.如果 (超级列表框1.取标题 (索引, 6) ＝ “” 或超级列表框1.取标题 (索引, 9) ＝ “” 或超级列表框1.取当前状态图片 (索引) ＝ 0)  ' 如果登录失败且地址没选勾选没选

.否则
.判断循环首 (真)
      .如果 (超级列表框1.取标题 (索引, 10) ≠ “抢购成功”)  ' 如果没有抢购成功
         超级列表框1.取标题 (索引, 4)  ' 根据线程操作传过来的索引然后操作超级列表框取值输出调试文本 (服务器ID)
         局_网址＝ “http://” ＋超级列表框1.取标题 (索引, 4) ＋ “&item_key%5B%5D=” ＋超级列表框1.取标题 (索引, 9) ＋ “&buytype=buy”
         ADD_协议头.添加 (“Host”, “shop.9you.com”)
         ADD_协议头.添加 (“Proxy-Connection”, “keep-alive”)
         ADD_协议头.添加 (“Upgrade-Insecure-Requests”, “1”)
         ADD_协议头.添加 (“User-Agent”, “Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/120.0.0.0 Safari/537.36”)
         ADD_协议头.添加 (“Accept”, “text/html,application/xhtml+xml,application/xml;q=0.9,image/avif,image/webp,image/apng,*/*;q=0.8,application/signed-exchange;v=b3;q=0.7”)
         ADD_协议头.添加 (“Referer”, “http://” ＋超级列表框1.取标题 (索引, 9))
         ' ADD_协议头.添加 ("Accept-Encoding","gzip, deflate"）' 压缩头一般不用设置
         ADD_协议头.添加 (“Accept-Language”, “zh-CN,zh;q=0.9”)

         局_提交协议头＝ ADD_协议头.获取协议头数据 ()

         局_提交cookie ＝超级列表框1.取标题 (索引, 6)

         ' 局_结果＝网页_访问 (局_网址, 0, 局_提交数据, 局_提交cookie, , 局_提交协议头, , , , 代理IP, 真)

         局_结果＝网页_访问_对象 (局_网址, 0, 局_提交数据, 局_提交cookie, , 局_提交协议头, , , , , 代理IP, , , , , , 真)
         局_返回＝编码_Utf8到Ansi (局_结果)  ' 自己去找编码
         输出调试文本 (局_返回)

提问：请问哪里写错了，代理能用。导入一个账户的时候返回正常，多账号就不行了，网址屏蔽了，请问是写法问题吗？如果是的能否给我一个【多线程批量代理网页访问对象的例子呀  不要许可、临界，任务完成即使关闭线程的例子】，代码好的话可以请华子。谢谢各位

作者: 1436880331 时间: 2024-2-8 14:53
支持一下

作者: 风度猫 时间: 2024-2-8 15:44
你多线程这样牵扯到cookie的问题

作者: 1436880331 时间: 2024-2-8 17:00

风度猫发表于 2024-2-8 15:44
你多线程这样牵扯到cookie的问题

Cookies也是在超级列表框里面取得

作者: 1436880331 时间: 2024-2-8 17:02

风度猫发表于 2024-2-8 15:44
你多线程这样牵扯到cookie的问题

局_提交cookie ＝超级列表框1.取标题 (索引, 6)

作者: 风度猫 时间: 2024-2-8 17:02

1436880331 发表于 2024-2-8 17:00
Cookies也是在超级列表框里面取得

问题一个同系统同地址 cookie只能存一个多个需要特殊处理的得创建多对象独立处理不然还是存的最后一个的cookie

作者: 1436880331 时间: 2024-2-8 17:15

风度猫发表于 2024-2-8 17:02
问题一个同系统同地址 cookie只能存一个多个需要特殊处理的得创建多对象独立处理不然还是存的最 ...

好兄弟可以指点下吗

作者: 1436880331 时间: 2024-2-8 19:31

风度猫发表于 2024-2-8 17:02
问题一个同系统同地址 cookie只能存一个多个需要特殊处理的得创建多对象独立处理不然还是存的最 ...

请问有例子吗兄弟

作者: 1436880331 时间: 2024-2-8 20:56
支持下呀

作者: xue1996 时间: 2024-3-4 22:55
谢谢分享

欢迎光临精易论坛 (https://125.confly.eu.org/)