关于https://sobooks.cc/网站的网页访问

qwe6301913

https://sobooks.cc/    怎么制作这个电子书网站下载链接的爬取  

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
程序集_页数	整数型
程序集_标题正则	正则表达式类
程序集_网盘地址	正则表达式类
程序集_文件号	整数型
程序集_错误地址	文本型	0

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

子程序名	返回值类型	公开	备 注
子程序_搜索

变量名	类 型	静态	数组	备 注
网页源代码	文本型
k	整数型
子网页源代码	文本型		0
j	整数型
q	整数型

' https://sobooks.cc/books/15852.html
' https://sobooks.cc/books/1.html
' 网页源代码 ＝ 编码_utf8到gb2312 (到文本 (网页_访问 (编辑框_网址前缀.内容 ＋ 到文本 (程序集_页数), , , , , , , , , , , , )))
精易Web浏览器1.浏览网页 (编辑框_网址前缀.内容 ＋ 到文本 (程序集_页数) ＋ “.html”)
网页源代码 ＝ 编码_utf8到gb2312 (精易Web浏览器1.取网页源码 ())
程序集_标题正则.创建 ( #常量_标题, 网页源代码, , , , )
如果 (程序集_标题正则.取子匹配文本 (1, 1, ) ≠ “未找到页面 by epub,mobi,azw3格式Kindle电子书免费下载 - SoBooks”)
程序集_网盘地址.创建 ( #常量_网盘地址, 网页源代码, , , , )
如果 (程序集_网盘地址.取子匹配文本 (1, 2, ) ≠ “”)
输出调试文本 (程序集_网盘地址.取子匹配文本 (1, 2, ))
输出调试文本 (“城通网盘（备用）未找到:” ＋ 编辑框_网址前缀.内容 ＋ 到文本 (程序集_页数) ＋ “.html”)

输出调试文本 (“未找到页面:” ＋ 编辑框_网址前缀.内容 ＋ 到文本 (程序集_页数) ＋ “.html”)

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

变量名	类 型	静态	数组	备 注
开始页数	整数型
结束页数	整数型
i	整数型
k	整数型

' 程序集_文件号 ＝ 打开文件 (取运行目录 () ＋ “\sobooks.cc-” ＋ 子程序_计算当前时间 () ＋ “.txt”, #改写, )
开始页数 ＝ 到整数 (编辑框_从.内容)
结束页数 ＝ 到整数 (编辑框_到.内容)
计次循环首 (结束页数 － 开始页数 ＋ 1, i)
程序集_页数 ＝ 开始页数 － 1 ＋ i
状态条1.置文本 (0, “第” ＋ 到文本 (开始页数 － 1 ＋ i) ＋ “页开始”)
子程序_搜索 ()
计次循环尾 ()
. ' 如果真 (取数组成员数 (程序集_错误地址) ＞ 0)
' 移到文件尾 (程序集_文件号)
' 写文本行 (程序集_文件号, “错误:”)
. ' 计次循环首 (取数组成员数 (程序集_错误地址), k)
' 移到文件尾 (程序集_文件号)
' 写文本行 (程序集_文件号, 程序集_错误地址 [k])
. ' 计次循环尾 ()

状态条1.置文本 (0, “完成”)

子程序名	返回值类型	公开	备 注
子程序_计算当前时间	文本型		例如:20200329210627  2020年3月29日21:06:27

变量名	类 型	静态	数组	备 注
时间	日期时间型
月	文本型
日	文本型
小时	文本型
分钟	文本型
秒	文本型

时间 ＝ 取现行时间 ()
如果 (取月份 (时间) ＜ 10)
月 ＝ “0” ＋ 到文本 (取月份 (时间))
月 ＝ 到文本 (取月份 (时间))

如果 (取日 (时间) ＜ 10)
日 ＝ “0” ＋ 到文本 (取日 (时间))
日 ＝ 到文本 (取日 (时间))

如果 (取小时 (时间) ＜ 10)
小时 ＝ “0” ＋ 到文本 (取小时 (时间))
小时 ＝ 到文本 (取小时 (时间))

如果 (取分钟 (时间) ＜ 10)
分钟 ＝ “0” ＋ 到文本 (取分钟 (时间))
分钟 ＝ 到文本 (取分钟 (时间))

如果 (取秒 (时间) ＜ 10)
秒 ＝ “0” ＋ 到文本 (取秒 (时间))
秒 ＝ 到文本 (取秒 (时间))

返回 (到文本 (取年份 (时间)) ＋ 月 ＋ 日 ＋ 小时 ＋ 分钟 ＋ 秒)

i支持库列表	支持库注释
wke	精易web浏览器
iext	扩展界面支持库一

.版本 2<br /> .支持库 wke<br /> .支持库 iext<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 程序集_页数, 整数型<br /> .程序集变量 程序集_标题正则, 正则表达式类<br /> .程序集变量 程序集_网盘地址, 正则表达式类<br /> .程序集变量 程序集_文件号, 整数型<br /> .程序集变量 程序集_错误地址, 文本型, , "0"<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> <br /> <br /> .子程序 子程序_搜索<br /> .局部变量 网页源代码, 文本型<br /> .局部变量 k, 整数型<br /> .局部变量 子网页源代码, 文本型, , "0"<br /> .局部变量 j, 整数型<br /> .局部变量 q, 整数型<br /> <br /> ' https://sobooks.cc/books/15852.html<br /> ' https://sobooks.cc/books/1.html<br /> ' 网页源代码 ＝ 编码_utf8到gb2312 (到文本 (网页_访问 (编辑框_网址前缀.内容 ＋ 到文本 (程序集_页数), , , , , , , , , , , , )))<br /> 精易Web浏览器1.浏览网页 (编辑框_网址前缀.内容 ＋ 到文本 (程序集_页数) ＋ “.html”)<br /> 网页源代码 ＝ 编码_utf8到gb2312 (精易Web浏览器1.取网页源码 ())<br /> 程序集_标题正则.创建 (#常量_标题, 网页源代码, , , , )<br /> <br /> <br /> <br /> .如果 (程序集_标题正则.取子匹配文本 (1, 1, ) ≠ “未找到页面 by epub,mobi,azw3格式Kindle电子书免费下载 - SoBooks”)<br />     程序集_网盘地址.创建 (#常量_网盘地址, 网页源代码, , , , )<br />     .如果 (程序集_网盘地址.取子匹配文本 (1, 2, ) ≠ “”)<br />         输出调试文本 (程序集_网盘地址.取子匹配文本 (1, 2, ))<br />     .否则<br />         输出调试文本 (“城通网盘（备用）未找到:” ＋ 编辑框_网址前缀.内容 ＋ 到文本 (程序集_页数) ＋ “.html”)<br />     .如果结束<br /> <br /> .否则<br />     输出调试文本 (“未找到页面:” ＋ 编辑框_网址前缀.内容 ＋ 到文本 (程序集_页数) ＋ “.html”)<br /> <br /> .如果结束<br /> <br /> <br /> <br /> <br /> <br /> <br /> <br /> <br /> <br /> <br /> <br /> .子程序 _按钮_爬取_被单击<br /> .局部变量 开始页数, 整数型<br /> .局部变量 结束页数, 整数型<br /> .局部变量 i, 整数型<br /> .局部变量 k, 整数型<br /> <br /> ' 程序集_文件号 ＝ 打开文件 (取运行目录 () ＋ “\sobooks.cc-” ＋ 子程序_计算当前时间 () ＋ “.txt”, #改写, )<br /> 开始页数 ＝ 到整数 (编辑框_从.内容)<br /> 结束页数 ＝ 到整数 (编辑框_到.内容)<br /> <br /> .计次循环首 (结束页数 － 开始页数 ＋ 1, i)<br />     程序集_页数 ＝ 开始页数 － 1 ＋ i<br />     状态条1.置文本 (0, “第” ＋ 到文本 (开始页数 － 1 ＋ i) ＋ “页开始”)<br /> <br />     子程序_搜索 ()<br /> <br /> .计次循环尾 ()<br /> <br /> .' 如果真 (取数组成员数 (程序集_错误地址) ＞ 0)<br />     ' 移到文件尾 (程序集_文件号)<br />     ' 写文本行 (程序集_文件号, “错误:”)<br /> <br /> <br />     .' 计次循环首 (取数组成员数 (程序集_错误地址), k)<br /> <br />         ' 移到文件尾 (程序集_文件号)<br />         ' 写文本行 (程序集_文件号, 程序集_错误地址 [k])<br /> <br />     .' 计次循环尾 ()<br /> <br /> .如果真结束<br /> <br /> <br /> <br /> 状态条1.置文本 (0, “完成”)<br /> <br /> <br /> .子程序 子程序_计算当前时间, 文本型, , 例如:20200329210627  2020年3月29日21:06:27<br /> .局部变量 时间, 日期时间型<br /> .局部变量 月, 文本型<br /> .局部变量 日, 文本型<br /> .局部变量 小时, 文本型<br /> .局部变量 分钟, 文本型<br /> .局部变量 秒, 文本型<br /> <br /> 时间 ＝ 取现行时间 ()<br /> .如果 (取月份 (时间) ＜ 10)<br />     月 ＝ “0” ＋ 到文本 (取月份 (时间))<br /> .否则<br />     月 ＝ 到文本 (取月份 (时间))<br /> .如果结束<br /> <br /> .如果 (取日 (时间) ＜ 10)<br />     日 ＝ “0” ＋ 到文本 (取日 (时间))<br /> .否则<br />     日 ＝ 到文本 (取日 (时间))<br /> .如果结束<br /> <br /> .如果 (取小时 (时间) ＜ 10)<br />     小时 ＝ “0” ＋ 到文本 (取小时 (时间))<br /> .否则<br />     小时 ＝ 到文本 (取小时 (时间))<br /> .如果结束<br /> <br /> .如果 (取分钟 (时间) ＜ 10)<br />     分钟 ＝ “0” ＋ 到文本 (取分钟 (时间))<br /> .否则<br />     分钟 ＝ 到文本 (取分钟 (时间))<br /> .如果结束<br /> <br /> .如果 (取秒 (时间) ＜ 10)<br />     秒 ＝ “0” ＋ 到文本 (取秒 (时间))<br /> .否则<br />     秒 ＝ 到文本 (取秒 (时间))<br /> .如果结束<br /> <br /> 返回 (到文本 (取年份 (时间)) ＋ 月 ＋ 日 ＋ 小时 ＋ 分钟 ＋ 秒)

其中
#常量_标题=<h3> <a href="(.*?)" title="(.*?)"
#常量_网盘地址=百度网盘</a><a href="(.*?)?url=(.*?)" rel="nofollow">城通网盘（备用）</

qwe6301913

没有人知道 怎么获取下载地址么？