查找txt文本是否存在指定内容

mengchao · 发表于 5 天前

不使用精易模块的前提下！！

例如 1.txt 文本里有张三李四老王等等…………

判断这个txt内容如果有老张则过，没有则添加。

就是个名单判断，文本里存在的就不执行，如果没有就加到txt文本里。

你送的花开了 · 发表于 5 天前

花钱要不然论坛找免费的我有开源过类似的

右手胜过左手 · 发表于 5 天前

读入文件、寻找文本；这些基本命令不会用？

笨来无一悟 · 发表于 5 天前

快速文本对象

寻找文本 =-1 就添加

847437161 · 发表于 5 天前

.版本 2

.子程序子程序1
.局部变量文件号, 整数型
.局部变量 TXT文本内容, 文本型
.局部变量查找的文本, 文本型

文件号＝打开文件 (“C:\Users\ZHao\Desktop\QQ账号.txt”, , )
TXT文本内容＝读入文本 (文件号, )
查找的文本＝ “老张”
' 调试输出 (TXT文本内容)

.如果真 (寻找文本 (TXT文本内容, 查找的文本, , 假) ＝ -1)
写文本行 (文件号, 查找的文本)

.如果真结束

关闭文件 (文件号)

冬夏 · 发表于 5 天前

子程序名	返回值类型	公开	备注
文本_人名检测	逻辑型
参数名	类型	参考	可空	数组	备注
文件路径	文本型
检测文本	文本型
写出结果	逻辑型

变量名	类型	静态	数组	备注
局部文本	快速字节集对象
局部长度	整数型
局部内容	字节集

如果真 (文件是否存在 (文件路径) ＝假或取文本长度 (检测文本) ＝ 0)

返回 (假)

如果真 (局部文本.从文件读 (文件路径) ＝假)

返回 (假)
局部长度＝局部文本.取长度 ()
局部内容＝到字节集 ( #换行符＋检测文本＋ #换行符 )

如果 (局部文本.寻找字节集 (局部内容, ) ＝ -1)

如果真 (局部长度＞ 0)

局部内容＝到字节集 (检测文本＋ #换行符 )

局部文本.添加 (局部内容)

写出结果＝局部文本.写到文件 (文件路径)

返回 (真)
返回 (假)

i支持库列表	支持库注释
commobj	通用对象支持库

简简单单

mengchao · 发表于 5 天前

右手胜过左手发表于 2025-7-16 18:57
读入文件、寻找文本；这些基本命令不会用？

就是不知道。
.版本 2

文件号＝打开文件 (“D:\信息” ＋ “\记录文本.txt”, , )
TXT文本内容＝读入文本 (文件号, )
查找的文本＝编辑框1.内容

.如果真 (寻找文本 (TXT文本内容, 查找的文本, , 假) ＝ -1)
写文本行 (文件号, 查找的文本)

.如果真结束

关闭文件 (文件号)

和

.版本 2

文件号＝到文本 (读入文件 (“D:\信息\记录文本.txt”))

.如果真 (寻找文本 (文件号, “老李”, 0, 假) ＝ -1)
信息框 (“没有”, 0, , )

效果是一样的就是不知道原理有什么不同！

右手胜过左手 · 发表于 5 天前

mengchao 发表于 2025-7-16 19:20
就是不知道。
.版本 2

打开文件是大文件的时候用、上百M以上；先用读入文件你感觉很慢、有卡顿现象、几秒以上的时候就可以使用打开文件。然后分页字节大小读入进来，如200M每次可以读10M，读取一次寻找一次、找到就返回、直到读完都没有找到。

老君不练丹 · 发表于 4 天前

咱就知道个寻找文本

还要有你 · 发表于 4 天前

简简单单，直接查找即可！

		自动登录	找回密码
密码			注册

[易语言] 查找txt文本是否存在指定内容

点评