易语言 下载文件

你这个读文件会不会读出来的是网页源码啊，你用编码转换试试看转出来的应该就是你原来的文字了。

而且你这个文件应该不大，可以发成网页文本，然后用下面的源码试试

.版本 2

.支持库 internet

.支持库 iconv

.子程序 网页编码转换, 文本型, , 转换网页源文件编码

.参数 地址, 文本型

.局部变量 字节集, 字节集

.局部变量 b, 整数型

.局部变量 d, 文本型

字节集 ＝ HTTP读文件 (地址)‘这里就是你网页的绝对路径

b ＝ 编码转换_打开 (#编码_UTF_8, #编码_GBK)

字节集 ＝ 编码转换_转换 (b, 字节集, )

编码转换_关闭 (b)

d ＝ 到文本 (字节集)

返回 (d)

.子程序 取指定内容, 文本型

.参数 完整内容, 文本型

.参数 左边文本, 文本型

.参数 右边文本, 文本型

.局部变量 临时位置, 整数型

.局部变量 总长度, 整数型

.局部变量 临时内容, 文本型

总长度 ＝ 取文本长度 (完整内容)

临时位置 ＝ 寻找文本 (完整内容, 左边文本, , 假) ＋ 取文本长度 (左边文本)

临时内容 ＝ 取文本中间 (完整内容, 临时位置, 总长度)

总长度 ＝ 取文本长度 (临时内容)

临时位置 ＝ 寻找文本 (临时内容, 右边文本, , 假) － 1

临时内容 ＝ 取文本中间 (临时内容, 1, 临时位置)

返回 (临时内容)