多线程提取文本出现-1

Kotori6139

提取账号密码时 发信次数 -1 多线程使用时 提取次数会出现 负数比如-1 怎么回事 （提取代码如下）

  

子程序名	返回值类型	公开	备 注
取发件账户	文本型

变量名	类 型	静态	数组	备 注
表现数	整数型
内容	文本型
发信变量	整数型

表现数 ＝ 超级列表框1.取表项数 ()
计次循环首 (表现数, )
如果真 (发信变量 ≥ 表现数)
发信变量 ＝ 0
如果真 (到整数 (超级列表框1.取标题 (发信变量, 11)) ＞ 0)
内容 ＝ 超级列表框1.取标题 (发信变量, 1)
发信变量 ＝ 发信变量 ＋ 1
日志输出 (内容)
跳出循环 ()
发信变量 ＝ 发信变量 ＋ 1
计次循环尾 ()
如果真 (内容 ＝ “”)
返回 (“0&0”)
返回 (内容)

子程序名	返回值类型	公开	备 注
取发件账户密码	文本型

变量名	类 型	静态	数组	备 注
表现数	整数型
内容	文本型
发信变量	整数型

表现数 ＝ 超级列表框1.取表项数 ()
计次循环首 (表现数, )
如果真 (发信变量 ≥ 表现数)
发信变量 ＝ 0
如果真 (到整数 (超级列表框1.取标题 (发信变量, 11)) ＞ 0)
超级列表框1.置标题 (发信变量, 11, 到文本 (到数值 (超级列表框1.取标题 (发信变量, 11)) － 1))
内容 ＝ 超级列表框1.取标题 (发信变量, 2)
发信变量 ＝ 发信变量 ＋ 1
日志输出 (内容)
跳出循环 ()
发信变量 ＝ 发信变量 ＋ 1
计次循环尾 ()
如果真 (内容 ＝ “”)
返回 (“0&0”)
返回 (内容)

i支持库列表	支持库注释
iext	扩展界面支持库一

.版本 2<br /> .支持库 iext<br /> <br /> .子程序 取发件账户, 文本型<br /> .局部变量 表现数, 整数型<br /> .局部变量 内容, 文本型<br /> .局部变量 发信变量, 整数型<br /> <br /> 表现数 ＝ 超级列表框1.取表项数 ()<br /> .计次循环首 (表现数, )<br />     .如果真 (发信变量 ≥ 表现数)<br />         发信变量 ＝ 0<br />     .如果真结束<br />     .如果真 (到整数 (超级列表框1.取标题 (发信变量, 11)) ＞ 0)<br />         内容 ＝ 超级列表框1.取标题 (发信变量, 1)<br />         发信变量 ＝ 发信变量 ＋ 1<br />         日志输出 (内容)<br />         跳出循环 ()<br />     .如果真结束<br />     发信变量 ＝ 发信变量 ＋ 1<br /> .计次循环尾 ()<br /> .如果真 (内容 ＝ “”)<br />     返回 (“0&0”)<br /> .如果真结束<br /> 返回 (内容)<br /> <br /> <br /> .子程序 取发件账户密码, 文本型<br /> .局部变量 表现数, 整数型<br /> .局部变量 内容, 文本型<br /> .局部变量 发信变量, 整数型<br /> <br /> 表现数 ＝ 超级列表框1.取表项数 ()<br /> .计次循环首 (表现数, )<br />     .如果真 (发信变量 ≥ 表现数)<br />         发信变量 ＝ 0<br />     .如果真结束<br />     .如果真 (到整数 (超级列表框1.取标题 (发信变量, 11)) ＞ 0)<br />         超级列表框1.置标题 (发信变量, 11, 到文本 (到数值 (超级列表框1.取标题 (发信变量, 11)) － 1))<br />         内容 ＝ 超级列表框1.取标题 (发信变量, 2)<br />         发信变量 ＝ 发信变量 ＋ 1<br />         日志输出 (内容)<br />         跳出循环 ()<br />     .如果真结束<br />     发信变量 ＝ 发信变量 ＋ 1<br /> .计次循环尾 ()<br /> .如果真 (内容 ＝ “”)<br />     返回 (“0&0”)<br /> .如果真结束<br /> 返回 (内容)

多线程代码如下

  

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

线程池.初始化 (到整数 (编辑框7.内容), )  ' '开启100条线程’返回真=开启成功，否则=失败
如果 (线程池.取状态 () ＝ 真)  ' 判断线程池是否存在
日志输出 (“线程已存在”)
日志输出 (“线程未开启”)
计次循环首 (到整数 (编辑框10.内容), )
线程池.加入任务 (&发信任务, 1)  ' 加入任务后执行,参数1是子程序,参数2是附加参数
线程池.取任务数 ()  ' 取出提交了有多少条任务
线程池.取空闲线 ()  ' 取出有多少条线程是空闲状态的
线程池.取线程池IOCP ()  ' 取出当前线程池的IOCP
计次循环尾 ()

.版本 2<br /> <br /> .子程序 _按钮3_被单击<br /> <br /> 线程池.初始化 (到整数 (编辑框7.内容), )  ' '开启100条线程’返回真=开启成功，否则=失败<br /> .如果 (线程池.取状态 () ＝ 真)  ' 判断线程池是否存在<br />     日志输出 (“线程已存在”)<br /> .否则<br />     日志输出 (“线程未开启”)<br /> .如果结束<br /> .计次循环首 (到整数 (编辑框10.内容), )<br />     线程池.加入任务 (&发信任务, 1)  ' 加入任务后执行,参数1是子程序,参数2是附加参数<br />     线程池.取任务数 ()  ' 取出提交了有多少条任务<br />     线程池.取空闲线 ()  ' 取出有多少条线程是空闲状态的<br />     线程池.取线程池IOCP ()  ' 取出当前线程池的IOCP<br /> .计次循环尾 ()

补充内容 (2024-1-31 18:16):
能帮忙远程修改的 dd 有偿

风度猫

Kotori6139 发表于 2024-1-31 16:57
初始次数是3
我开启多线程以后 他会变成-1
我设置的是 检测到0就执行下一个 ...

好好看下我说的哈

1752328925

多线程需要上锁的，取找一下例子吧

Kotori6139

1752328925 发表于 2024-1-31 16:16
多线程需要上锁的，取找一下例子吧

能发个例子看看么-.-

1752328925

Kotori6139 发表于 2024-1-31 16:17
能发个例子看看么-.-

这是例子是原生的多线程，你现在使用的是扩展的，仅供参考

Kotori6139

1752328925 发表于 2024-1-31 16:19
这是例子是原生的多线程，你现在使用的是扩展的，仅供参考

  

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

启动线程 (&主线程, , )

子程序名	返回值类型	公开	备 注
主线程

变量名	类 型	静态	数组	备 注
i	整数型

许可证 ＝ 创建进入许可证 ()
计次循环首 (超级列表框1.取表项数 (), i)
如果真 (当前线程数 ＜ 线程数)
超级列表框1.置标题 (i － 1, 10, “正在操作”)
当前线程数 ＝ 当前线程数 ＋ 1
启动线程 (&发信任务, i, )
判断循环首 (当前线程数 ≥ 线程数)
调试输出 (“线程上线”)
延迟 (50)
判断循环尾 ()
计次循环尾 ()

子程序名	返回值类型	公开	备 注
发信任务
参数名	类 型	参考	可空	数组	备 注
i	整数型

变量名	类 型	静态	数组	备 注
提取发件账户	文本型
提取发件账户密码	文本型
提取收信账户	文本型
发件主题	文本型
发件文本	文本型
REQU_Data	文本型			提交字符串
return	文本型			返回字符串
API_URL	文本型			接口地址
API_KEY	文本型			接口密钥
循环	整数型
json	类_json
状态	文本型
i	整数型
步骤	整数型
原因	文本型

进入许可区 (许可证)
程序_延时 (到整数 (编辑框8.内容), 0)
提取发件账户 ＝ 取发件账户 ()
提取发件账户密码 ＝ 取发件账户密码 ()
提取收信账户 ＝ 提取收信账户 ()
发件主题 ＝ 发件主题 ()
发件文本 ＝ 发件文本 ()
API_URL ＝
API_KEY ＝ 编辑框11.内容
判断 (超级列表框1.取标题 (i, 10) ＝ “发送失败”)
超级列表框1.置标题 (i, 11, “0”)
日志输出 (“检测到异常账号-已将该账号发信次数清0”)


REQU_Data ＝ “&server=” ＋ 编辑框3.内容 ＋ “&name=” ＋ 提取发件账户 ＋ “&passwd=” ＋ 提取发件账户密码 ＋ “&secure=” ＋ 编辑框12.内容 ＋ “&prot=” ＋ 编辑框4.内容 ＋ “&to_email=” ＋ 提取收信账户 ＋ “&title=” ＋ 发件主题 ＋ “&body=” ＋ 发件文本
return ＝ 编码_Utf8到Ansi (网页_访问_对象 (API_URL ＋ “?key=” ＋ API_KEY ＋ REQU_Data, , , , , “User-Agent: Mozilla/5.0 (Windows NT 10.0; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/69.0.3497.100 Safari/537.36”, , , , , 编辑框6.内容, , 编辑框5.内容, 编辑框9.内容, , , , , ))
输出调试 (return)
json.解析 (return, , )
状态 ＝ json.取属性对象 (“code”)
原因 ＝ json.取属性对象 (“msg”)
调试输出 (状态)
判断 (状态 ＝ “200”)
超级列表框1.置标题 (i, 10, “发送成功”)
超级列表框1.置标题 (i, 10, “发送失败”)
超级列表框1.置标题 (i, 12, 原因)
退出许可区 (许可证)

i支持库列表	支持库注释
EThread	多线程支持库
iext	扩展界面支持库一
spec	特殊功能支持库
e2ee	E2EE互联网服务器套件

.版本 2<br /> .支持库 EThread<br /> .支持库 iext<br /> .支持库 spec<br /> .支持库 e2ee<br /> <br /> .子程序 _按钮3_被单击<br /> <br /> 启动线程 (&主线程, , )<br /> <br /> .子程序 主线程<br /> .局部变量 i, 整数型<br /> <br /> 许可证 ＝ 创建进入许可证 ()<br /> .计次循环首 (超级列表框1.取表项数 (), i)<br />     .如果真 (当前线程数 ＜ 线程数)<br />         超级列表框1.置标题 (i － 1, 10, “正在操作”)<br />         当前线程数 ＝ 当前线程数 ＋ 1<br />         启动线程 (&发信任务, i, )<br />     .如果真结束<br />     .判断循环首 (当前线程数 ≥ 线程数)<br />         调试输出 (“线程上线”)<br />         延迟 (50)<br />     .判断循环尾 ()<br /> .计次循环尾 ()<br /> <br /> .子程序 发信任务<br /> .参数 i, 整数型<br /> .局部变量 提取发件账户, 文本型<br /> .局部变量 提取发件账户密码, 文本型<br /> .局部变量 提取收信账户, 文本型<br /> .局部变量 发件主题, 文本型<br /> .局部变量 发件文本, 文本型<br /> .局部变量 REQU_Data, 文本型, , , 提交字符串<br /> .局部变量 return, 文本型, , , 返回字符串<br /> .局部变量 API_URL, 文本型, , , 接口地址<br /> .局部变量 API_KEY, 文本型, , , 接口密钥<br /> .局部变量 循环, 整数型<br /> .局部变量 json, 类_json<br /> .局部变量 状态, 文本型<br /> .局部变量 i, 整数型<br /> .局部变量 步骤, 整数型<br /> .局部变量 原因, 文本型<br /> <br /> 进入许可区 (许可证)<br /> 程序_延时 (到整数 (编辑框8.内容), 0)<br /> 提取发件账户 ＝ 取发件账户 ()<br /> 提取发件账户密码 ＝ 取发件账户密码 ()<br /> 提取收信账户 ＝ 提取收信账户 ()<br /> 发件主题 ＝ 发件主题 ()<br /> 发件文本 ＝ 发件文本 ()<br /> API_URL ＝ <br /> API_KEY ＝ 编辑框11.内容<br /> .判断开始 (超级列表框1.取标题 (i, 10) ＝ “发送失败”)<br />     超级列表框1.置标题 (i, 11, “0”)<br />     日志输出 (“检测到异常账号-已将该账号发信次数清0”)<br /> .默认<br /> <br />     REQU_Data ＝ “&server=” ＋ 编辑框3.内容 ＋ “&name=” ＋ 提取发件账户 ＋ “&passwd=” ＋ 提取发件账户密码 ＋ “&secure=” ＋ 编辑框12.内容 ＋ “&prot=” ＋ 编辑框4.内容 ＋ “&to_email=” ＋ 提取收信账户 ＋ “&title=” ＋ 发件主题 ＋ “&body=” ＋ 发件文本<br />     return ＝ 编码_Utf8到Ansi (网页_访问_对象 (API_URL ＋ “?key=” ＋ API_KEY ＋ REQU_Data, , , , , “User-Agent: Mozilla/5.0 (Windows NT 10.0; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/69.0.3497.100 Safari/537.36”, , , , , 编辑框6.内容, , 编辑框5.内容, 编辑框9.内容, , , , , ))<br /> <br /> .判断结束<br /> 输出调试 (return)<br /> json.解析 (return, , )<br /> 状态 ＝ json.取属性对象 (“code”)<br /> 原因 ＝ json.取属性对象 (“msg”)<br /> 调试输出 (状态)<br /> .判断开始 (状态 ＝ “200”)<br />     超级列表框1.置标题 (i, 10, “发送成功”)<br /> .默认<br />     超级列表框1.置标题 (i, 10, “发送失败”)<br />     超级列表框1.置标题 (i, 12, 原因)<br /> .判断结束<br /> 退出许可区 (许可证)

我这样套用有问题么-.-


补充内容 (2024-1-31 16:50):
我这个貌似没法参考你那个多线程-.-因为每个账号限制读取3次

补充内容 (2024-1-31 16:51):
按照你那个参考来的话 他会同时读取单账号操作好像-。-

风度猫

应为你发信变量是 局部变量  每次进去初始值是0  0-1 不就是-1嘛 没毛病啊

补充内容 (2024-1-31 16:57):
你是不是应该正常的道理 传参 应该定义为参数 并且勾选上 参考

Kotori6139

风度猫 发表于 2024-1-31 16:56
应为你发信变量是 局部变量  每次进去初始值是0  0-1 不就是-1嘛 没毛病啊

初始次数是3
我开启多线程以后 他会变成-1
我设置的是 检测到0就执行下一个

风度猫

下个断点看下我说的有毛病没哈.

Kotori6139

风度猫 发表于 2024-1-31 17:04
下个断点看下我说的有毛病没哈.

不应该把 我变量设置0 然后给他设置的判断是要大于0的 然后我实际列表框设置是3 这样自有错么-.-
我单线程是不会出现-1 多线程就会出现-1