线程问题

Liujian123

如图由于网络问题网页有时候为空（网络卡获取不到）,有的能获取到有的获取不到,怎么样才能使四个线程网页1,网页2,网页3,网页4,都内容的时候四个线程才往下走后面的代码，只要有一个网页没获取到内容四个都不运行后面的代码，等再次网页访问都获取到后再往下运行后面代码，谢谢！最好简单给个例子

RainCharm

别急，半水桶大神正在帮你写代码的路上。。。。

cunanhai

四个网页访问 都放到一个线程  然后在四个访问下面判断是否都取到了内容 有一个没取到就直接返回

Liujian123

cunanhai 发表于 2026-7-25 22:32
四个网页访问 都放到一个线程  然后在四个访问下面判断是否都取到了内容 有一个没取到就直接返回  ...

我要多线程运行，因为要快，要求基本上同步运行下面的代码

卿卿吖

线程问题例子.e (4.43 KB, 下载次数: 1)

昨天 23:00 上传

点击文件名下载附件

你的猫

我帮你问了豆包  

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
网页内容	文本型	4
获取成功	逻辑型	4
线程锁	整数型
url	文本型

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

线程锁 ＝ 创建进入许可证 ()

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

变量名	类 型	静态	数组	备 注
线程句柄	整数型		4
i	整数型
全部成功	逻辑型

判断循环首 (真)
进入许可区 (线程锁)
重定义数组 (网页内容, 假, 4)
重定义数组 (获取成功, 假, 4)
退出许可区 (线程锁)
计次循环首 (4, i)
启动线程 (&网页访问线程, i, 线程句柄 [i])
计次循环尾 ()
计次循环首 (4, i)
等待线程 (线程句柄 [i], -1)
关闭线程句柄 (线程句柄 [i])
计次循环尾 ()
全部成功 ＝ 真
进入许可区 (线程锁)
计次循环首 (4, i)
如果真 (获取成功 [i] ＝ 假)
全部成功 ＝ 假
跳出循环 ()

计次循环尾 ()
退出许可区 (线程锁)
如果真 (全部成功 ＝ 真)
跳出循环 ()

调试输出 (“存在网页获取失败，2秒后重新抓取全部4个页面”)
程序_延时 (2000)
判断循环尾 ()
调试输出 (“四个网页全部获取成功，开始执行后续逻辑”)
调试输出 (“网页1内容：” ＋ 网页内容 [1])
调试输出 (“网页2内容：” ＋ 网页内容 [2])
调试输出 (“网页3内容：” ＋ 网页内容 [3])
调试输出 (“网页4内容：” ＋ 网页内容 [4])

子程序名	返回值类型	公开	备 注
网页访问线程
参数名	类 型	参考	可空	数组	备 注
线程编号	整数型

变量名	类 型	静态	数组	备 注
返回文本	文本型

判断 (线程编号 ＝ 1)
url ＝ “www.baidu.com”


判断 (线程编号 ＝ 2)
url ＝ “www.qq.com”


判断 (线程编号 ＝ 3)
url ＝ “www.yy.com”


判断 (线程编号 ＝ 4)
url ＝ “www.huya.com”



返回文本 ＝ 网页_访问S (url, , , , , , , , , , , , , 5000)
进入许可区 (线程锁)
网页内容 [线程编号] ＝ 返回文本
获取成功 [线程编号] ＝ 返回文本 ≠ “”
退出许可区 (线程锁)

i支持库列表	支持库注释
EThread	多线程支持库
spec	特殊功能支持库

.版本 2<br /> .支持库 EThread<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 网页内容, 文本型, , "4"<br /> .程序集变量 获取成功, 逻辑型, , "4"<br /> .程序集变量 线程锁, 整数型<br /> .程序集变量 url, 文本型<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 线程锁 ＝ 创建进入许可证 ()<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 线程句柄, 整数型, , "4"<br /> .局部变量 i, 整数型<br /> .局部变量 全部成功, 逻辑型<br /> <br /> .判断循环首 (真)<br />     进入许可区 (线程锁)<br />     重定义数组 (网页内容, 假, 4)<br />     重定义数组 (获取成功, 假, 4)<br />     退出许可区 (线程锁)<br />     .计次循环首 (4, i)<br />         启动线程 (&网页访问线程, i, 线程句柄 <i>)<br />     .计次循环尾 ()<br />     .计次循环首 (4, i)<br />         等待线程 (线程句柄 <i>, -1)<br />         关闭线程句柄 (线程句柄 <i>)<br />     .计次循环尾 ()<br />     全部成功 ＝ 真<br />     进入许可区 (线程锁)<br />     .计次循环首 (4, i)<br />         .如果真 (获取成功 <i> ＝ 假)<br />             全部成功 ＝ 假<br />             跳出循环 ()<br />         .如果真结束<br /> <br />     .计次循环尾 ()<br />     退出许可区 (线程锁)<br />     .如果真 (全部成功 ＝ 真)<br />         跳出循环 ()<br />     .如果真结束<br /> <br />     调试输出 (“存在网页获取失败，2秒后重新抓取全部4个页面”)<br />     程序_延时 (2000)<br /> .判断循环尾 ()<br /> <br /> 调试输出 (“四个网页全部获取成功，开始执行后续逻辑”)<br /> 调试输出 (“网页1内容：” ＋ 网页内容 [1])<br /> 调试输出 (“网页2内容：” ＋ 网页内容 [2])<br /> 调试输出 (“网页3内容：” ＋ 网页内容 [3])<br /> 调试输出 (“网页4内容：” ＋ 网页内容 [4])<br /> <br /> <br /> <br /> .子程序 网页访问线程<br /> .参数 线程编号, 整数型<br /> .局部变量 返回文本, 文本型<br /> <br /> .判断开始 (线程编号 ＝ 1)<br />     url ＝ “<a href="http://www.baidu.com" rel="nofollow" rel="nofollow" target="_blank">www.baidu.com</a>”<br /> .默认<br /> <br /> .判断结束<br /> .判断开始 (线程编号 ＝ 2)<br />     url ＝ “<a href="http://www.qq.com" rel="nofollow" rel="nofollow" target="_blank">www.qq.com</a>”<br /> .默认<br /> <br /> .判断结束<br /> .判断开始 (线程编号 ＝ 3)<br />     url ＝ “<a href="http://www.yy.com" rel="nofollow" rel="nofollow" target="_blank">www.yy.com</a>”<br /> .默认<br /> <br /> .判断结束<br /> .判断开始 (线程编号 ＝ 4)<br />     url ＝ “<a href="http://www.huya.com" rel="nofollow" rel="nofollow" target="_blank">www.huya.com</a>”<br /> .默认<br /> <br /> .判断结束<br /> <br /> 返回文本 ＝ 网页_访问S (url, , , , , , , , , , , , , 5000)<br /> 进入许可区 (线程锁)<br /> 网页内容 [线程编号] ＝ 返回文本<br /> 获取成功 [线程编号] ＝ 返回文本 ≠ “”<br /> 退出许可区 (线程锁)

伊人独醉

  

子程序名	返回值类型	公开	备 注
原子_递增	整数型		原子递增，返回更新后的值
参数名	类 型	参考	可空	数组	备 注
原数据	整数型

返回 (InterlockedIncrement (原数据))

DLL命令名	返回值类型	公开	备 注
InterlockedIncrement	整数型		原子递增，返回递增后的值
DLL库文件名:
在DLL库中对应命令名:
InterlockedIncrement
参数名	类 型	传址	数组	备 注
Addend	整数型

.版本 2<br /> <br /> .子程序 原子_递增, 整数型, , 原子递增，返回更新后的值<br /> .参数 原数据, 整数型, 参考<br /> <br /> <br /> 返回 (InterlockedIncrement (原数据))<br /> <br /> .版本 2<br /> <br /> .DLL命令 InterlockedIncrement, 整数型, , "InterlockedIncrement", , 原子递增，返回递增后的值<br />     .参数 Addend, 整数型, 传址

访问超时+原子_递增，全局变量或者程序集变量记录访问成功次数，用一个带超时的循环判断，成功次数=访问数量，跳出循环，真，超时说明假，线程里面加入原子_递增，避免线程同时对全局变量操作

cunanhai

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
任务数	整数型
网页返回	文本型	0

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

任务数 ＝ 4
重定义数组 (网页返回, 假, 任务数)
启动线程 (&子程序1, 1, )
启动线程 (&子程序2, 2, )
启动线程 (&子程序3, 3, )
启动线程 (&子程序4, 4, )
启动线程 (&子程序5, , )

子程序名	返回值类型	公开	备 注
子程序1
参数名	类 型	参考	可空	数组	备 注
参数	整数型

网页返回 [参数] ＝ 到文本 (网页_访问_对象 (“https://百du1.com”, , , , , , , , , , , , , , , , , , ))

子程序名	返回值类型	公开	备 注
子程序2
参数名	类 型	参考	可空	数组	备 注
参数	整数型

网页返回 [参数] ＝ 到文本 (网页_访问_对象 (“https://百du2.com”, , , , , , , , , , , , , , , , , , ))

子程序名	返回值类型	公开	备 注
子程序3
参数名	类 型	参考	可空	数组	备 注
参数	整数型

网页返回 [参数] ＝ 到文本 (网页_访问_对象 (“https://百du3.com”, , , , , , , , , , , , , , , , , , ))

子程序名	返回值类型	公开	备 注
子程序4
参数名	类 型	参考	可空	数组	备 注
参数	整数型

网页返回 [参数] ＝ 到文本 (网页_访问_对象 (“https://百du4.com”, , , , , , , , , , , , , , , , , , ))

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

计次循环首 (16, )  ' 网页_访问_对象  默认 15秒超时  另外 网页方式失败不一定返回空,这个要你自己判断 他访问失败返回什么
判断 (网页返回 [1] ＝ “”)
程序_延时 (1, 1)
判断 (网页返回 [2] ＝ “”)
程序_延时 (1, 1)
判断 (网页返回 [3] ＝ “”)
程序_延时 (1, 1)
判断 (网页返回 [4] ＝ “”)
程序_延时 (1, 1)
编辑框1.内容 ＝ 网页返回 [1]
编辑框2.内容 ＝ 网页返回 [2]
编辑框3.内容 ＝ 网页返回 [3]
编辑框4.内容 ＝ 网页返回 [4]

计次循环尾 ()

i支持库列表	支持库注释
EThread	多线程支持库

.版本 2<br /> .支持库 EThread<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 任务数, 整数型<br /> .程序集变量 网页返回, 文本型, , "0"<br /> <br /> .子程序 _按钮1_被单击<br /> <br /> 任务数 ＝ 4<br /> 重定义数组 (网页返回, 假, 任务数)<br /> 启动线程 (&子程序1, 1, )<br /> 启动线程 (&子程序2, 2, )<br /> 启动线程 (&子程序3, 3, )<br /> 启动线程 (&子程序4, 4, )<br /> 启动线程 (&子程序5, , )<br /> <br /> .子程序 子程序1<br /> .参数 参数, 整数型<br /> <br /> 网页返回 [参数] ＝ 到文本 (网页_访问_对象 (“https://百du1.com”, , , , , , , , , , , , , , , , , , ))<br /> <br /> .子程序 子程序2<br /> .参数 参数, 整数型<br /> <br /> 网页返回 [参数] ＝ 到文本 (网页_访问_对象 (“https://百du2.com”, , , , , , , , , , , , , , , , , , ))<br /> <br /> .子程序 子程序3<br /> .参数 参数, 整数型<br /> <br /> 网页返回 [参数] ＝ 到文本 (网页_访问_对象 (“https://百du3.com”, , , , , , , , , , , , , , , , , , ))<br /> <br /> .子程序 子程序4<br /> .参数 参数, 整数型<br /> <br /> 网页返回 [参数] ＝ 到文本 (网页_访问_对象 (“https://百du4.com”, , , , , , , , , , , , , , , , , , ))<br /> <br /> .子程序 子程序5<br /> <br /> .计次循环首 (16, )  ' 网页_访问_对象  默认 15秒超时  另外 网页方式失败不一定返回空,这个要你自己判断 他访问失败返回什么<br />     .判断开始 (网页返回 [1] ＝ “”)<br />         程序_延时 (1, 1)<br />     .判断 (网页返回 [2] ＝ “”)<br />         程序_延时 (1, 1)<br />     .判断 (网页返回 [3] ＝ “”)<br />         程序_延时 (1, 1)<br />     .判断 (网页返回 [4] ＝ “”)<br />         程序_延时 (1, 1)<br />     .默认<br />         编辑框1.内容 ＝ 网页返回 [1]<br />         编辑框2.内容 ＝ 网页返回 [2]<br />         编辑框3.内容 ＝ 网页返回 [3]<br />         编辑框4.内容 ＝ 网页返回 [4]<br />     .判断结束<br /> <br /> .计次循环尾 ()

帅气与大侠

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
集_累计	整数型

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

集_累计 ＝ 0
启动线程 (&子程序1, 取变量地址 (集_累计), )
启动线程 (&子程序2, 取变量地址 (集_累计), )
启动线程 (&子程序3, 取变量地址 (集_累计), )
启动线程 (&子程序4, 取变量地址 (集_累计), )

子程序名	返回值类型	公开	备 注
子程序1
参数名	类 型	参考	可空	数组	备 注
指针	整数型

变量名	类 型	静态	数组	备 注
body	字节集

' HTTP读文件 改成 你的 网页_访问对象
body ＝ HTTP读文件 (“https://miao.baidu.com”)
' 取字节集长度(body)，改成更严谨的方式，比如判断状态码
如果真 (取字节集长度 (body) ≠ 0 且 原子递增 (指针) ＝ 4)
调试输出 (“全部完成了”)

子程序名	返回值类型	公开	备 注
子程序2
参数名	类 型	参考	可空	数组	备 注
指针	整数型

变量名	类 型	静态	数组	备 注
body	字节集

body ＝ HTTP读文件 (“https://miao.baidu.com”)
如果真 (取字节集长度 (body) ≠ 0 且 原子递增 (指针) ＝ 4)
调试输出 (“全部完成了”)

子程序名	返回值类型	公开	备 注
子程序3
参数名	类 型	参考	可空	数组	备 注
指针	整数型

变量名	类 型	静态	数组	备 注
body	字节集

body ＝ HTTP读文件 (“https://miao.baidu.com”)
如果真 (取字节集长度 (body) ≠ 0 且 原子递增 (指针) ＝ 4)
调试输出 (“全部完成了”)

子程序名	返回值类型	公开	备 注
子程序4
参数名	类 型	参考	可空	数组	备 注
指针	整数型

变量名	类 型	静态	数组	备 注
body	字节集

body ＝ HTTP读文件 (“https://miao.baidu.com”)
如果真 (取字节集长度 (body) ≠ 0 且 原子递增 (指针) ＝ 4)
调试输出 (“全部完成了”)

子程序名	返回值类型	公开	备 注
原子递增	整数型		以原子锁方式进行递增，返回递增后的值。
参数名	类 型	参考	可空	数组	备 注
p

' __asm{
' mov eax,[ebp+8]
' lock inc dword [eax]
' mov eax,[eax]
' leave
' retn __参数大小__
' }
置入代码 ({ 139, 69, 8, 240, 255, 0, 139, 0, 201, 194, 4, 0 })
返回 (0)

i支持库列表	支持库注释
EThread	多线程支持库
spec	特殊功能支持库
internet	互联网支持库

.版本 2<br /> .支持库 EThread<br /> .支持库 spec<br /> .支持库 internet<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 集_累计, 整数型<br /> <br /> .子程序 _按钮1_被单击<br /> <br /> 集_累计 ＝ 0<br /> 启动线程 (&子程序1, 取变量地址 (集_累计), )<br /> 启动线程 (&子程序2, 取变量地址 (集_累计), )<br /> 启动线程 (&子程序3, 取变量地址 (集_累计), )<br /> 启动线程 (&子程序4, 取变量地址 (集_累计), )<br /> <br /> .子程序 子程序1<br /> .参数 指针, 整数型<br /> .局部变量 body, 字节集<br /> <br /> ' HTTP读文件 改成 你的 网页_访问对象<br /> body ＝ HTTP读文件 (“<a href="https://miao.baidu.com" rel="nofollow" rel="nofollow" rel="nofollow" rel="nofollow" rel="nofollow" rel="nofollow" rel="nofollow" rel="nofollow" target="_blank">https://miao.baidu.com</a>”)<br /> ' 取字节集长度(body)，改成更严谨的方式，比如判断状态码<br /> .如果真 (取字节集长度 (body) ≠ 0 且 原子递增 (指针) ＝ 4)<br />     调试输出 (“全部完成了”)<br /> .如果真结束<br /> <br /> <br /> .子程序 子程序2<br /> .参数 指针, 整数型<br /> .局部变量 body, 字节集<br /> <br /> body ＝ HTTP读文件 (“<a href="https://miao.baidu.com" rel="nofollow" rel="nofollow" rel="nofollow" rel="nofollow" rel="nofollow" rel="nofollow" rel="nofollow" rel="nofollow" target="_blank">https://miao.baidu.com</a>”)<br /> .如果真 (取字节集长度 (body) ≠ 0 且 原子递增 (指针) ＝ 4)<br />     调试输出 (“全部完成了”)<br /> .如果真结束<br /> <br /> <br /> .子程序 子程序3<br /> .参数 指针, 整数型<br /> .局部变量 body, 字节集<br /> <br /> body ＝ HTTP读文件 (“<a href="https://miao.baidu.com" rel="nofollow" rel="nofollow" rel="nofollow" rel="nofollow" rel="nofollow" rel="nofollow" rel="nofollow" rel="nofollow" target="_blank">https://miao.baidu.com</a>”)<br /> .如果真 (取字节集长度 (body) ≠ 0 且 原子递增 (指针) ＝ 4)<br />     调试输出 (“全部完成了”)<br /> .如果真结束<br /> <br /> <br /> .子程序 子程序4<br /> .参数 指针, 整数型<br /> .局部变量 body, 字节集<br /> <br /> body ＝ HTTP读文件 (“<a href="https://miao.baidu.com" rel="nofollow" rel="nofollow" rel="nofollow" rel="nofollow" rel="nofollow" rel="nofollow" rel="nofollow" rel="nofollow" target="_blank">https://miao.baidu.com</a>”)<br /> .如果真 (取字节集长度 (body) ≠ 0 且 原子递增 (指针) ＝ 4)<br />     调试输出 (“全部完成了”)<br /> .如果真结束<br /> <br /> <br /> .子程序 原子递增, 整数型, 公开, 以原子锁方式进行递增，返回递增后的值。<br /> .参数 p<br /> <br /> ' __asm{<br /> ' mov eax,[ebp+8]<br /> ' lock inc dword [eax]<br /> ' mov eax,[eax]<br /> ' leave<br /> ' retn __参数大小__<br /> ' }<br /> 置入代码 ({ 139, 69, 8, 240, 255, 0, 139, 0, 201, 194, 4, 0 })<br /> 返回 (0)