如何高效去指定行数文本

huameiyun

比如有一个 文本.txt 文件， 这个文件很大，有500MB。txt文件里面的内容是一行一行的。
我需要取出来整个文本的后200行，或者后3000字。然后生成到 2.txt里面

如果我直接读入txt文本来取出后面的文本或者文本分割来取后面200行。因为程序太大，可能有500M，这样的话效率非常低，会卡死
有趣读取非常频繁，十秒一次，有没有高效且低占用的方法呢

cow

无模块实现，建议这种场景不要用txt。

  

窗口程序集名	保 留	保 留	备 注
程序集1

子程序名	返回值类型	公开	备 注
_启动子程序	整数型

变量名	类 型	静态	数组	备 注
末尾文本	文本型
后200行	文本型

末尾文本 ＝ 取文件末尾内容 (“D:\文本.txt”, 102400)
后200行 ＝ 取后N行 (末尾文本, 200)
写到文件 (“D:\2.txt”, 到字节集 (后200行))
结束时间 ＝ 取启动时间 ()
返回 (0)

子程序名	返回值类型	公开	备 注
取文件末尾内容	文本型
参数名	类 型	参考	可空	数组	备 注
文件路径	文本型
读取字节数	整数型

变量名	类 型	静态	数组	备 注
文件句柄	整数型
文件大小	长整数型
起始位置	长整数型
读取数据	字节集

文件句柄 ＝ 打开文件 (文件路径, #读入, #无限制 )
如果真 (文件句柄 ＝ 0)
返回 (“”)

文件大小 ＝ 取文件长度 (文件句柄)
起始位置 ＝ 文件大小 － 读取字节数
如果真 (起始位置 ＜ 0)
起始位置 ＝ 0

移动读写位置 (文件句柄, #文件首, 起始位置)
读取数据 ＝ 读入字节集 (文件句柄, 读取字节数)
关闭文件 (文件句柄)
返回 (到文本 (读取数据))

子程序名	返回值类型	公开	备 注
取后N行	文本型
参数名	类 型	参考	可空	数组	备 注
全部文本	文本型
行数	整数型

变量名	类 型	静态	数组	备 注
行数组	文本型		0
结果	文本型
i	整数型
起始索引	整数型

行数组 ＝ 分割文本 (全部文本, #换行符, )
起始索引 ＝ 取数组成员数 (行数组) － 行数 ＋ 1
如果真 (起始索引 ＜ 1)
起始索引 ＝ 1

计次循环首 (取数组成员数 (行数组) － 起始索引 ＋ 1, i)
结果 ＝ 结果 ＋ 行数组 [起始索引 ＋ i － 1] ＋ #换行符
计次循环尾 ()
返回 (结果)

.版本 2<br /> <br /> .程序集 程序集1<br /> <br /> .子程序 _启动子程序, 整数型<br /> .局部变量 末尾文本, 文本型<br /> .局部变量 后200行, 文本型<br /> <br /> 末尾文本 ＝ 取文件末尾内容 (“D:\文本.txt”, 102400)<br /> 后200行 ＝ 取后N行 (末尾文本, 200)<br /> 写到文件 (“D:\2.txt”, 到字节集 (后200行))<br /> 结束时间 ＝ 取启动时间 ()<br /> <br /> 返回 (0)<br /> <br /> .子程序 取文件末尾内容, 文本型<br /> .参数 文件路径, 文本型<br /> .参数 读取字节数, 整数型, ,  <br /> .局部变量 文件句柄, 整数型<br /> .局部变量 文件大小, 长整数型<br /> .局部变量 起始位置, 长整数型<br /> .局部变量 读取数据, 字节集<br /> <br /> 文件句柄 ＝ 打开文件 (文件路径, #读入, #无限制)<br /> .如果真 (文件句柄 ＝ 0)<br />     返回 (“”)<br /> .如果真结束<br /> <br /> 文件大小 ＝ 取文件长度 (文件句柄)<br /> 起始位置 ＝ 文件大小 － 读取字节数<br /> .如果真 (起始位置 ＜ 0)<br />     起始位置 ＝ 0<br /> .如果真结束<br /> <br /> 移动读写位置 (文件句柄, #文件首, 起始位置)<br /> 读取数据 ＝ 读入字节集 (文件句柄, 读取字节数)<br /> 关闭文件 (文件句柄)<br /> <br /> 返回 (到文本 (读取数据))<br /> <br /> .子程序 取后N行, 文本型<br /> .参数 全部文本, 文本型<br /> .参数 行数, 整数型<br /> .局部变量 行数组, 文本型, , "0"<br /> .局部变量 结果, 文本型<br /> .局部变量 i, 整数型<br /> .局部变量 起始索引, 整数型<br /> <br /> 行数组 ＝ 分割文本 (全部文本, #换行符, )<br /> 起始索引 ＝ 取数组成员数 (行数组) － 行数 ＋ 1<br /> .如果真 (起始索引 ＜ 1)<br />     起始索引 ＝ 1<br /> .如果真结束<br /> <br /> .计次循环首 (取数组成员数 (行数组) － 起始索引 ＋ 1, i)<br />     结果 ＝ 结果 ＋ 行数组 [起始索引 ＋ i － 1] ＋ #换行符<br /> .计次循环尾 ()<br /> 返回 (结果)

凌哥

https://bbs.ijingyi.com/forum.ph ... 27&pid=30583890

z573277679

精准读取，带有防乱码处理，实测4个G也是点一下就完成
示例.e (156.09 KB, 下载次数: 0)

半小时前 上传

点击文件名下载附件

z573277679

这个可以取指定行---结束行的内容，几乎瞬间完成
取指定范围行_大文件.e (12.95 KB, 下载次数: 0)

半小时前 上传

点击文件名下载附件