两个文本合并报错

队长是我

记录x.txt (6.81 KB, 下载次数: 4)

2019-6-24 10:16 上传

点击文件名下载附件
记录y.txt (4.07 KB, 下载次数: 3)

2019-6-24 10:16 上传

点击文件名下载附件
哪位路过给看看

寒潮

队长是我 发表于 2019-6-24 11:07
有个小瑕疵
最后一行有个逗号。可能是 局_行_x   局_行_y 为空时也写进去了。

  

变量名	类 型	静态	数组	备 注
局_文件号_x	整数型
局_文件号_y	整数型
局_记录读取完毕	逻辑型
局_文件号_xy	整数型
局_行_x	文本型
局_行_y	文本型

局_文件号_x ＝ 打开文件 (取运行目录 () ＋ “\记录x.txt”, , )
局_文件号_y ＝ 打开文件 (取运行目录 () ＋ “\记录y.txt”, , )
局_文件号_xy ＝ 打开文件 (取运行目录 () ＋ “\记录xy.txt”, 4, )
局_记录读取完毕 ＝ 假
判断循环首 (局_记录读取完毕 ＝ 假)
局_记录读取完毕 ＝ 真
连续赋值 (“”, 局_行_x, 局_行_y)
如果真 (是否在文件尾 (局_文件号_x, ) ＝ 假)
局_记录读取完毕 ＝ 假
局_行_x ＝ 读入一行 (局_文件号_x)
如果真 (是否在文件尾 (局_文件号_y, ) ＝ 假)
局_记录读取完毕 ＝ 假
局_行_y ＝ 读入一行 (局_文件号_y)
如果真 (局_记录读取完毕 ＝ 假)
移到文件尾 (局_文件号_xy)
判断 (局_行_x ＝ “”)
写文本行 (局_文件号_xy, 局_行_y)
判断 (局_行_y ＝ “”)
写文本行 (局_文件号_xy, 局_行_x)
写文本行 (局_文件号_xy, 局_行_x ＋ “,” ＋ 局_行_y)


判断循环尾 ()
关闭文件 (局_文件号_x)
关闭文件 (局_文件号_y)
关闭文件 (局_文件号_xy)

.版本 2<br /> <br /> .局部变量 局_文件号_x, 整数型<br /> .局部变量 局_文件号_y, 整数型<br /> .局部变量 局_记录读取完毕, 逻辑型<br /> .局部变量 局_文件号_xy, 整数型<br /> .局部变量 局_行_x, 文本型<br /> .局部变量 局_行_y, 文本型<br /> <br /> 局_文件号_x ＝ 打开文件 (取运行目录 () ＋ “\记录x.txt”, , )<br /> 局_文件号_y ＝ 打开文件 (取运行目录 () ＋ “\记录y.txt”, , )<br /> 局_文件号_xy ＝ 打开文件 (取运行目录 () ＋ “\记录xy.txt”, 4, )<br /> 局_记录读取完毕 ＝ 假<br /> .判断循环首 (局_记录读取完毕 ＝ 假)<br />     局_记录读取完毕 ＝ 真<br />     连续赋值 (“”, 局_行_x, 局_行_y)<br />     .如果真 (是否在文件尾 (局_文件号_x, ) ＝ 假)<br />         局_记录读取完毕 ＝ 假<br />         局_行_x ＝ 读入一行 (局_文件号_x)<br />     .如果真结束<br />     .如果真 (是否在文件尾 (局_文件号_y, ) ＝ 假)<br />         局_记录读取完毕 ＝ 假<br />         局_行_y ＝ 读入一行 (局_文件号_y)<br />     .如果真结束<br />     .如果真 (局_记录读取完毕 ＝ 假)<br />         移到文件尾 (局_文件号_xy)<br />         .判断开始 (局_行_x ＝ “”)<br />             写文本行 (局_文件号_xy, 局_行_y)<br />         .判断 (局_行_y ＝ “”)<br />             写文本行 (局_文件号_xy, 局_行_x)<br />         .默认<br />             写文本行 (局_文件号_xy, 局_行_x ＋ “,” ＋ 局_行_y)<br />         .判断结束<br /> <br />     .如果真结束<br /> <br /> .判断循环尾 ()<br /> 关闭文件 (局_文件号_x)<br /> 关闭文件 (局_文件号_y)<br /> 关闭文件 (局_文件号_xy)

队长是我

需求完整保存，没有就留空

sunsir

计次循环首循环次数那里判断一下，x，y 哪个数组成员多就按哪个成员数循环~

寒潮

  

变量名	类 型	静态	数组	备 注
局_文件号_x	整数型
局_文件号_y	整数型
局_记录读取完毕	逻辑型
局_文件号_xy	整数型
局_行_x	文本型
局_行_y	文本型

局_文件号_x ＝ 打开文件 (取运行目录 () ＋ “\记录x.txt”, , )
局_文件号_y ＝ 打开文件 (取运行目录 () ＋ “\记录y.txt”, , )
局_文件号_xy ＝ 打开文件 (取运行目录 () ＋ “\记录xy.txt”, 4, )
局_记录读取完毕 ＝ 假
判断循环首 (局_记录读取完毕 ＝ 假)
局_记录读取完毕 ＝ 真
连续赋值 (“”, 局_行_x, 局_行_y)
如果真 (是否在文件尾 (局_文件号_x, ) ＝ 假)
局_记录读取完毕 ＝ 假
局_行_x ＝ 读入一行 (局_文件号_x)
如果真 (是否在文件尾 (局_文件号_y, ) ＝ 假)
局_记录读取完毕 ＝ 假
局_行_y ＝ 读入一行 (局_文件号_y)
移到文件尾 (局_文件号_xy)
写文本行 (局_文件号_xy, 局_行_x ＋ “,” ＋ 局_行_y)
判断循环尾 ()
关闭文件 (局_文件号_x)
关闭文件 (局_文件号_y)
关闭文件 (局_文件号_xy)

.版本 2<br /> <br /> .局部变量 局_文件号_x, 整数型<br /> .局部变量 局_文件号_y, 整数型<br /> .局部变量 局_记录读取完毕, 逻辑型<br /> .局部变量 局_文件号_xy, 整数型<br /> .局部变量 局_行_x, 文本型<br /> .局部变量 局_行_y, 文本型<br /> <br /> 局_文件号_x ＝ 打开文件 (取运行目录 () ＋ “\记录x.txt”, , )<br /> 局_文件号_y ＝ 打开文件 (取运行目录 () ＋ “\记录y.txt”, , )<br /> 局_文件号_xy ＝ 打开文件 (取运行目录 () ＋ “\记录xy.txt”, 4, )<br /> 局_记录读取完毕 ＝ 假<br /> .判断循环首 (局_记录读取完毕 ＝ 假)<br />     局_记录读取完毕 ＝ 真<br />     连续赋值 (“”, 局_行_x, 局_行_y)<br />     .如果真 (是否在文件尾 (局_文件号_x, ) ＝ 假)<br />         局_记录读取完毕 ＝ 假<br />         局_行_x ＝ 读入一行 (局_文件号_x)<br />     .如果真结束<br />     .如果真 (是否在文件尾 (局_文件号_y, ) ＝ 假)<br />         局_记录读取完毕 ＝ 假<br />         局_行_y ＝ 读入一行 (局_文件号_y)<br />     .如果真结束<br />     移到文件尾 (局_文件号_xy)<br />     写文本行 (局_文件号_xy, 局_行_x ＋ “,” ＋ 局_行_y)<br /> .判断循环尾 ()<br /> 关闭文件 (局_文件号_x)<br /> 关闭文件 (局_文件号_y)<br /> 关闭文件 (局_文件号_xy)

队长是我

sunsir 发表于 2019-6-24 10:28
计次循环首循环次数那里判断一下，x，y 哪个数组成员多就按哪个成员数循环~

我也是这样判断的啊。只不过是直接写出来了
问题是这个在读取的时候，那个行数已经读完了。直接报错。

寒潮

  

变量名	类 型	静态	数组	备 注
局_文件号_x	整数型
局_文件号_y	整数型
局_记录读取完毕	逻辑型
局_文件号_xy	整数型
局_行_x	文本型
局_行_y	文本型

局_文件号_x ＝ 打开文件 (取运行目录 () ＋ “\记录x.txt”, , )
局_文件号_y ＝ 打开文件 (取运行目录 () ＋ “\记录y.txt”, , )
局_文件号_xy ＝ 打开文件 (取运行目录 () ＋ “\记录xy.txt”, 4, )
局_记录读取完毕 ＝ 假
判断循环首 (局_记录读取完毕 ＝ 假)
局_记录读取完毕 ＝ 真
连续赋值 (“”, 局_行_x, 局_行_y)
如果真 (是否在文件尾 (局_文件号_x, ) ＝ 假)
局_记录读取完毕 ＝ 假
局_行_x ＝ 读入一行 (局_文件号_x)
如果真 (是否在文件尾 (局_文件号_y, ) ＝ 假)
局_记录读取完毕 ＝ 假
局_行_y ＝ 读入一行 (局_文件号_y)
如果真 (局_记录读取完毕 ＝ 假)
移到文件尾 (局_文件号_xy)
写文本行 (局_文件号_xy, 局_行_x ＋ “,” ＋ 局_行_y)

判断循环尾 ()
关闭文件 (局_文件号_x)
关闭文件 (局_文件号_y)
关闭文件 (局_文件号_xy)

.版本 2<br /> <br /> .局部变量 局_文件号_x, 整数型<br /> .局部变量 局_文件号_y, 整数型<br /> .局部变量 局_记录读取完毕, 逻辑型<br /> .局部变量 局_文件号_xy, 整数型<br /> .局部变量 局_行_x, 文本型<br /> .局部变量 局_行_y, 文本型<br /> <br /> 局_文件号_x ＝ 打开文件 (取运行目录 () ＋ “\记录x.txt”, , )<br /> 局_文件号_y ＝ 打开文件 (取运行目录 () ＋ “\记录y.txt”, , )<br /> 局_文件号_xy ＝ 打开文件 (取运行目录 () ＋ “\记录xy.txt”, 4, )<br /> 局_记录读取完毕 ＝ 假<br /> .判断循环首 (局_记录读取完毕 ＝ 假)<br />     局_记录读取完毕 ＝ 真<br />     连续赋值 (“”, 局_行_x, 局_行_y)<br />     .如果真 (是否在文件尾 (局_文件号_x, ) ＝ 假)<br />         局_记录读取完毕 ＝ 假<br />         局_行_x ＝ 读入一行 (局_文件号_x)<br />     .如果真结束<br />     .如果真 (是否在文件尾 (局_文件号_y, ) ＝ 假)<br />         局_记录读取完毕 ＝ 假<br />         局_行_y ＝ 读入一行 (局_文件号_y)<br />     .如果真结束<br />     .如果真 (局_记录读取完毕 ＝ 假)<br />         移到文件尾 (局_文件号_xy)<br />         写文本行 (局_文件号_xy, 局_行_x ＋ “,” ＋ 局_行_y)<br />     .如果真结束<br /> <br /> .判断循环尾 ()<br /> 关闭文件 (局_文件号_x)<br /> 关闭文件 (局_文件号_y)<br /> 关闭文件 (局_文件号_xy)

修改一下

队长是我

寒潮 发表于 2019-6-24 10:29
[e=0].版本 2

.局部变量 局_文件号_x, 整数型

有个小瑕疵
最后一行有个逗号。可能是 局_行_x   局_行_y 为空时也写进去了。

寒潮

队长是我 发表于 2019-6-24 11:07
有个小瑕疵
最后一行有个逗号。可能是 局_行_x   局_行_y 为空时也写进去了。

哦，写入之前判断一下，如果某一个行内容为空，写入的内容就变换一下。

走一回

运行 (“cmd /c COPY d:\temp\记录x.txt+d:\temp\记录y.txt d:\temp\记录.txt”, 假, )    两个文件也可以这样合并成一个文件文件。