我是易语言小白，在写一个小说多线程采集，但没反应

neoring

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
n	整数型
章节	文本型	0
匹配数量	整数型
返回数据	文本型
正则	正则表达式类
许可证	整数型
正在运行线程数	整数型

子程序名	返回值类型	公开	备 注
取网页章节号

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

返回数据 ＝ 到文本 (网页_访问S (“http://www.cqwsjds.com/bqg/5301/”, , , , , , , , , , , , , , , , , , , , ))
正则.创建 ( #正则文本, 返回数据, 假, 真, 真, 真)
匹配数量 ＝ 正则.取匹配数量 ()
调试输出 (匹配数量)
计次循环首 (匹配数量, i)
进入许可区 (许可证)
加入成员 (章节, 正则.取子匹配文本 (i, 1, ))
退出许可区 (许可证)
计次循环尾 ()

子程序名	返回值类型	公开	备 注
加入章节以及网址

变量名	类 型	静态	数组	备 注
y	整数型
表项索引	整数型

正则.创建 ( #正则文本, 返回数据, 假, 真, 真, 真)
n ＝ 1
' 到文本 (网页_访问S (“http://www.cqwsjds.com/bqg/5301/” ＋ 章节 [n] ＋ “.html”, , , , , , , , , , , , , , , , , , , , ))
计次循环首 (匹配数量, y)
进入许可区 (许可证)
表项索引 ＝ 超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (表项索引, 1, “www.cqwsjds.com/bqg/5301/” ＋ 章节 [n] ＋ “.html”)
超级列表框1.置标题 (表项索引, 0, 正则.取子匹配文本 (y, 2, ))
退出许可区 (许可证)
n ＝ n ＋ 1
程序_延时 (1000, 0)
计次循环尾 ()

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

变量名	类 型	静态	数组	备 注
i	整数型
章节数	整数型
线程数	整数型
已运行的线程数	整数型

线程_初始化COM库 ()
许可证 ＝ 创建进入许可证 ()
章节数 ＝ 到整数 (编辑框1.内容)
线程数 ＝ 到整数 (编辑框2.内容)
循环判断首 ()
判断 (正在运行线程数 ＜ 线程数)
已运行的线程数 ＝ 已运行的线程数 ＋ 1
正在运行线程数 ＝ 正在运行线程数 ＋ 1
启动线程 (&取网页章节号, 已运行的线程数, )
启动线程 (&加入章节以及网址, 已运行的线程数, )


程序_延时 (100, 0)
循环判断尾 (已运行的线程数 ＜ 章节数)

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

.版本 2<br /> .支持库 spec<br /> .支持库 EThread<br /> .支持库 iext<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 n, 整数型<br /> .程序集变量 章节, 文本型, , "0"<br /> .程序集变量 匹配数量, 整数型<br /> .程序集变量 返回数据, 文本型<br /> .程序集变量 正则, 正则表达式类<br /> .程序集变量 许可证, 整数型<br /> .程序集变量 正在运行线程数, 整数型<br /> <br /> .子程序 取网页章节号<br /> .局部变量 i, 整数型<br /> <br /> 返回数据 ＝ 到文本 (网页_访问S (“http://www.cqwsjds.com/bqg/5301/”, , , , , , , , , , , , , , , , , , , , ))<br /> 正则.创建 (#正则文本, 返回数据, 假, 真, 真, 真)<br /> 匹配数量 ＝ 正则.取匹配数量 ()<br /> 调试输出 (匹配数量)<br /> .计次循环首 (匹配数量, i)<br />     进入许可区 (许可证)<br />     加入成员 (章节, 正则.取子匹配文本 (i, 1, ))<br />     退出许可区 (许可证)<br /> .计次循环尾 ()<br /> <br /> <br /> .子程序 加入章节以及网址<br /> .局部变量 y, 整数型<br /> .局部变量 表项索引, 整数型<br /> <br /> 正则.创建 (#正则文本, 返回数据, 假, 真, 真, 真)<br /> n ＝ 1<br /> ' 到文本 (网页_访问S (“http://www.cqwsjds.com/bqg/5301/” ＋ 章节 [n] ＋ “.html”, , , , , , , , , , , , , , , , , , , , ))<br /> .计次循环首 (匹配数量, y)<br />     进入许可区 (许可证)<br />     表项索引 ＝ 超级列表框1.插入表项 (, , , , , )<br />     超级列表框1.置标题 (表项索引, 1, “www.cqwsjds.com/bqg/5301/” ＋ 章节 [n] ＋ “.html”)<br />     超级列表框1.置标题 (表项索引, 0, 正则.取子匹配文本 (y, 2, ))<br />     退出许可区 (许可证)<br />     n ＝ n ＋ 1<br />     程序_延时 (1000, 0)<br /> .计次循环尾 ()<br /> <br /> <br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 i, 整数型<br /> .局部变量 章节数, 整数型<br /> .局部变量 线程数, 整数型<br /> .局部变量 已运行的线程数, 整数型<br /> <br /> 线程_初始化COM库 ()<br /> 许可证 ＝ 创建进入许可证 ()<br /> 章节数 ＝ 到整数 (编辑框1.内容)<br /> 线程数 ＝ 到整数 (编辑框2.内容)<br /> .循环判断首 ()<br />     .判断开始 (正在运行线程数 ＜ 线程数)<br />         已运行的线程数 ＝ 已运行的线程数 ＋ 1<br />         正在运行线程数 ＝ 正在运行线程数 ＋ 1<br />         启动线程 (&取网页章节号, 已运行的线程数, )<br />         启动线程 (&加入章节以及网址, 已运行的线程数, )<br />     .默认<br /> <br />     .判断结束<br />     程序_延时 (100, 0)<br /> .循环判断尾 (已运行的线程数 ＜ 章节数)

cherryy

其实单线程这样写也是秒完了

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
正则	正则表达式类
n	整数型
章节	文本型	0
匹配数量	整数型
返回数据	文本型
许可证	整数型
正在运行线程数	整数型

子程序名	返回值类型	公开	备 注
加入章节以及网址

变量名	类 型	静态	数组	备 注
y	整数型
表项索引	整数型

返回数据 ＝ 到文本 (网页_访问S (“http://www.cqwsjds.com/bqg/5301/”, , , , , , , , , , , , , , , , , , , , ))
正则.创建 ( #正则文本, 返回数据, 假, 真, 真, 真)
匹配数量 ＝ 正则.取匹配数量 ()
计次循环首 (匹配数量, y)
表项索引 ＝ 超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (表项索引, 0, 到文本 (表项索引 － 1))
超级列表框1.置标题 (表项索引, 1, “ http://www.cqwsjds.com” ＋ 正则.取子匹配文本 (y, 1, ))
超级列表框1.置标题 (表项索引, 2, 正则.取子匹配文本 (y, 2, ))
' 程序_延时 (10, )
计次循环尾 ()

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

变量名	类 型	静态	数组	备 注
i	整数型
章节数	整数型
线程数	整数型
已运行的线程数	整数型

加入章节以及网址 ()

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

.版本 2<br /> .支持库 iext<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 正则, 正则表达式类<br /> .程序集变量 n, 整数型<br /> .程序集变量 章节, 文本型, , "0"<br /> .程序集变量 匹配数量, 整数型<br /> .程序集变量 返回数据, 文本型<br /> .程序集变量 许可证, 整数型<br /> .程序集变量 正在运行线程数, 整数型<br /> <br /> .子程序 加入章节以及网址<br /> .局部变量 y, 整数型<br /> .局部变量 表项索引, 整数型<br /> <br /> 返回数据 ＝ 到文本 (网页_访问S (“http://www.cqwsjds.com/bqg/5301/”, , , , , , , , , , , , , , , , , , , , ))<br /> 正则.创建 (#正则文本, 返回数据, 假, 真, 真, 真)<br /> 匹配数量 ＝ 正则.取匹配数量 ()<br /> .计次循环首 (匹配数量, y)<br />     表项索引 ＝ 超级列表框1.插入表项 (, , , , , )<br />     超级列表框1.置标题 (表项索引, 0, 到文本 (表项索引 － 1))<br />     超级列表框1.置标题 (表项索引, 1, “ http://www.cqwsjds.com” ＋ 正则.取子匹配文本 (y, 1, ))<br />     超级列表框1.置标题 (表项索引, 2, 正则.取子匹配文本 (y, 2, ))<br />     ' 程序_延时 (10, )<br /> <br /> .计次循环尾 ()<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 i, 整数型<br /> .局部变量 章节数, 整数型<br /> .局部变量 线程数, 整数型<br /> .局部变量 已运行的线程数, 整数型<br /> <br /> 加入章节以及网址 ()

neoring

多线程感觉搞不懂，收集个信息，一个线程就能正常跑

鹏书

neoring 发表于 2022-9-10 23:55
多线程感觉搞不懂，收集个信息，一个线程就能正常跑

单线程就够了，多线程的速度太快了，小说网站承受不住的。
会限制你的，要不然不是被你干宕机了

Ls60

其实源码能跑不卡就行。你贴的这个代码，你这我也没法调试。看了一下是笔趣阁的小说，我记得论坛里还挺多这种例子的，你可以参考一下看看，学习一下人家是怎么写的。
https://bbs.125.la/search.php?mo ... 4%E8%B6%A3%E9%98%81

Ls60

把你写的简单改了一下，不知道能不能跑，自己测一下（毕竟我也不怎么用这个启动线程

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
n	整数型
章节	文本型	0
匹配数量	整数型
返回数据	文本型
正则	正则表达式类
许可证	整数型
正在运行线程数	整数型

子程序名	返回值类型	公开	备 注
取网页章节号

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

返回数据 ＝ 到文本 (网页_访问S (“http://www.cqwsjds.com/bqg/5301/”, , , , , , , , , , , , , , , , , , , , ))
正则.创建 ( #正则文本, 返回数据, 假, 真, 真, 真)
匹配数量 ＝ 正则.取匹配数量 ()
调试输出 (匹配数量)
计次循环首 (匹配数量, i)
加入成员 (章节, 正则.取子匹配文本 (i, 1, ))
计次循环尾 ()

子程序名	返回值类型	公开	备 注
加入章节以及网址
参数名	类 型	参考	可空	数组	备 注
n	整数型

变量名	类 型	静态	数组	备 注
y	整数型
表项索引	整数型

正则.创建 ( #正则文本, 返回数据, 假, 真, 真, 真)
进入许可区 (许可证)
表项索引 ＝ 超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (表项索引, 1, “www.cqwsjds.com/bqg/5301/” ＋ 章节 [n] ＋ “.html”)
超级列表框1.置标题 (表项索引, 0, 正则.取子匹配文本 (y, 2, ))
正在运行线程数 ＝ 正在运行线程数 － 1
退出许可区 (许可证)
程序_延时 (1000, 0)

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

变量名	类 型	静态	数组	备 注
i	整数型
章节数	整数型
线程数	整数型
已运行的线程数	整数型

线程_初始化COM库 ()
许可证 ＝ 创建进入许可证 ()
章节数 ＝ 到整数 (编辑框1.内容)
线程数 ＝ 到整数 (编辑框2.内容)
启动线程 (&取网页章节号, 已运行的线程数, )  ' 点下之后取一次章节就好
循环判断首 ()
如果真 (正在运行线程数 ＜ 线程数)  ' 点下之后取一次章节就好
已运行的线程数 ＝ 已运行的线程数 ＋ 1
正在运行线程数 ＝ 正在运行线程数 ＋ 1
启动线程 (&加入章节以及网址, 已运行的线程数, )
程序_延时 (100, 0)
循环判断尾 (已运行的线程数 ＜ 章节数)

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

.版本 2<br /> .支持库 spec<br /> .支持库 EThread<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 n, 整数型<br /> .程序集变量 章节, 文本型, , "0"<br /> .程序集变量 匹配数量, 整数型<br /> .程序集变量 返回数据, 文本型<br /> .程序集变量 正则, 正则表达式类<br /> .程序集变量 许可证, 整数型<br /> .程序集变量 正在运行线程数, 整数型<br /> <br /> .子程序 取网页章节号<br /> .局部变量 i, 整数型<br /> <br /> 返回数据 ＝ 到文本 (网页_访问S (“http://www.cqwsjds.com/bqg/5301/”, , , , , , , , , , , , , , , , , , , , ))<br /> 正则.创建 (#正则文本, 返回数据, 假, 真, 真, 真)<br /> 匹配数量 ＝ 正则.取匹配数量 ()<br /> 调试输出 (匹配数量)<br /> .计次循环首 (匹配数量, i)<br />     加入成员 (章节, 正则.取子匹配文本 (i, 1, ))<br /> .计次循环尾 ()<br /> <br /> .子程序 加入章节以及网址<br /> .参数 n, 整数型<br /> .局部变量 y, 整数型<br /> .局部变量 表项索引, 整数型<br /> <br /> 正则.创建 (#正则文本, 返回数据, 假, 真, 真, 真)<br /> 进入许可区 (许可证)<br /> 表项索引 ＝ 超级列表框1.插入表项 (, , , , , )<br /> 超级列表框1.置标题 (表项索引, 1, “www.cqwsjds.com/bqg/5301/” ＋ 章节 [n] ＋ “.html”)<br /> 超级列表框1.置标题 (表项索引, 0, 正则.取子匹配文本 (y, 2, ))<br /> 正在运行线程数 ＝ 正在运行线程数 － 1<br /> 退出许可区 (许可证)<br /> 程序_延时 (1000, 0)<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 i, 整数型<br /> .局部变量 章节数, 整数型<br /> .局部变量 线程数, 整数型<br /> .局部变量 已运行的线程数, 整数型<br /> <br /> 线程_初始化COM库 ()<br /> 许可证 ＝ 创建进入许可证 ()<br /> 章节数 ＝ 到整数 (编辑框1.内容)<br /> 线程数 ＝ 到整数 (编辑框2.内容)<br /> 启动线程 (&取网页章节号, 已运行的线程数, )  ' 点下之后取一次章节就好<br /> .循环判断首 ()<br />     .如果真 (正在运行线程数 ＜ 线程数)  ' 点下之后取一次章节就好<br />         已运行的线程数 ＝ 已运行的线程数 ＋ 1<br />         正在运行线程数 ＝ 正在运行线程数 ＋ 1<br />         启动线程 (&加入章节以及网址, 已运行的线程数, )<br />     .如果真结束<br />     程序_延时 (100, 0)<br /> .循环判断尾 (已运行的线程数 ＜ 章节数)

已注销399765

多线程？一秒请求20次！什么服务器不限制你啊。你还是用单线程吧。爬虫虽好。不能贪杯。别阻止网站的正常使用，就没事