如何把采集到的所有内容保存到本地

唐唐i · 发表于 5 天前

如何把采集到的所有内容保存到本地txt文件里，每行一个，

唐唐i · 发表于 5 天前

计次循环首 (取数组成员数 (列表_数据), i)

写到文件 (取运行目录 () ＋ “\1.txt”, 到字节集 (列表_数据 [i].英文名＋ #换行符 ))

计次循环尾 ()

我这样写只能写出来一行其他都覆盖了

我想每行一个

熬夜 · 发表于 5 天前

采集哪里的说话啊

fanggang1 · 发表于 5 天前

插入文本

xzgj · 发表于 5 天前

唐唐i 发表于 2025-8-5 15:35
[e=0].版本 2

.计次循环首 (取数组成员数 (列表_数据), i)

.版本 2

.局部变量写出数据, 字节集

写出数据＝ { }
.如果 (取数组成员数 (列表_数据)= i)
写出数据=写出数据+到字节集 (列表_数据 .英文名 )
.否则
写出数据=写出数据+到字节集 (列表_数据 .英文名＋ #换行符 )
.如果结束
写到文件 (取运行目录 () ＋ “\1.txt”, 写出数据)

补充内容 (2025-8-5 16:18):
循环只保存中间数据，最后再写出文件。

xiaofanvv · 发表于 5 天前

唐唐i 发表于 2025-8-5 15:35
[e=0].版本 2

.计次循环首 (取数组成员数 (列表_数据), i)

是不是因为这个文件名重复了所以覆盖了啊。你把文件名给一个变量试试

zainex · 发表于 5 天前

每行保存一个txt文件, 文件名从 1.txt 到 n.txt:

计次循环首 (取数组成员数 (列表_数据), i)

写到文件 (取运行目录 () ＋ “\” ＋到文本 (i) ＋ “.txt”, 到字节集 (列表_数据 [i].英文名＋ #换行符 ))

计次循环尾 ()

每行写到 1.txt 的尾部:

变量名	类型	静态	数组	备注
文件号	整数型

文件号＝打开文件 (取运行目录 () ＋ “\1.txt”, #改写, )
移到文件尾 (文件号)

计次循环首 (取数组成员数 (列表_数据), i)

写出文本 (文件号, 列表_数据 [i].英文名＋ #换行符 )

移到文件尾 (文件号)

计次循环尾 ()
关闭文件 (文件号)

BruceJoysky1987 · 发表于 5 天前

唐唐i 发表于 2025-8-5 15:35
[e=0].版本 2

.计次循环首 (取数组成员数 (列表_数据), i)

到字节集（），前面加上读入文件（“写的路径”）+写的数据

chenyuqi1230 · 发表于 5 天前

既然都花米做采集了，干嘛不让他全做完，非要自己动手。

精益君哥 · 发表于 4 天前

.版本 2
.支持库 EThread
.支持库 iext
.支持库 spec

.子程序筛选_子线程_写入标记
.参数 i, 整数型
.参数 ck, 文本型
.参数 lx, 整数型, , 1.成功 2.失败 3.在线 4.敏感
.参数 k, 整数型
.局部变量读入文本, 文本型
.局部变量待写入文本, 文本型
.局部变量读入文本2, 文本型
.局部变量待写入文本2, 文本型

进入许可区 (许可证1)
_启动窗口.超级列表框_任务信息.置标题 (i － 1, 6, “状态写入...”)
待写入文本＝ “”
.如果真 (lx ＝ 1)
读入文本＝到文本 (读入文件 (取运行目录 () ＋ “\account\成功.txt”))
.如果真结束

.如果真 (lx ＝ 2)
读入文本＝到文本 (读入文件 (取运行目录 () ＋ “\account\失败.txt”))
.如果真结束

.如果真 (lx ＝ 3)
读入文本＝到文本 (读入文件 (取运行目录 () ＋ “\account\在线.txt”))
.如果真结束

.如果真 (lx ＝ 4)
读入文本＝到文本 (读入文件 (取运行目录 () ＋ “\account\敏感.txt”))
.如果真结束

.如果真 (lx ＝ 5)
读入文本＝到文本 (读入文件 (取运行目录 () ＋ “\account\超时.txt”))
.如果真结束

待写入文本＝读入文本＋ ck ＋ #换行符

.如果真 (lx ＝ 1)
写到文件 (取运行目录 () ＋ “\account\成功.txt”, 到字节集 (待写入文本))
.如果真结束

.如果真 (lx ＝ 2)
写到文件 (取运行目录 () ＋ “\account\失败.txt”, 到字节集 (待写入文本))
.如果真结束

.如果真 (lx ＝ 3)
写到文件 (取运行目录 () ＋ “\account\在线.txt”, 到字节集 (待写入文本))
.如果真结束

.如果真 (lx ＝ 4)
写到文件 (取运行目录 () ＋ “\account\敏感.txt”, 到字节集 (待写入文本))
.如果真结束

.如果真 (lx ＝ 5)
写到文件 (取运行目录 () ＋ “\account\超时.txt”, 到字节集 (待写入文本))
.如果真结束

.如果真 (lx ＝ 1)
调试输出 (“成功...写入文件完毕...”)
线程信息 [i].成功计数＝线程信息 [i].成功计数＋ 1
.如果真结束

.如果真 (lx ＝ 2)
调试输出 (“失败...写入文件完毕...”)
线程信息 [i].失败计数＝线程信息 [i].失败计数＋ 1
.如果真结束

.如果真 (lx ＝ 3)
调试输出 (“在线...写入文件完毕...”)
线程信息 [i].在线计数＝线程信息 [i].在线计数＋ 1
.如果真结束

.如果真 (lx ＝ 4)
调试输出 (“敏感...写入文件完毕...”)

线程信息 [i].敏感计数＝线程信息 [i].敏感计数＋ 1

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

[易语言] 如何把采集到的所有内容保存到本地

浏览过的版块