易语言 网页浏览器,点击链接直接下载如何实现

2025-04-04 05:25:06
推荐回答(2个)
回答1:

.版本 2
.支持库 HtmlView
.支持库 internet
.子程序 _超文本浏览框1_即将跳转, 逻辑型
.局部变量 扩展名, 文本型
扩展名 = 到小写 (取文本右边 (超文本浏览框1.地址, 4))
.如果 (扩展名 = “.rar” 或 扩展名 = “.zip” 或 扩展名 = “.apk”)
下载 (超文本浏览框1.地址)
返回 (假)
.否则
返回 (真)
.如果结束

.子程序 下载
.参数 URL, 文本型
.局部变量 字节集, 字节集
.局部变量 文件名, 文本型
文件名 = 取文本右边 (URL, 取文本长度 (URL) - 倒找文本 (URL, “/”, , 真))
输出调试文本 (“DOWN:” + URL + “ -> ” + 文件名)
字节集 = HTTP读文件 (URL)
写到文件 (“C:\” + 文件名, 字节集)

回答2:

这个要提取下载连接才行,就是对网页的源代码进行处理加工