write如何打开一个已有的程序在后面增加数据？

wengxi

如题。。
各位大神，帮一个忙，怎么在fortran里面打开一个文件（比如txt）后向里面写东西，而且是从末尾开始写，并且不能覆盖掉前面的数据。换而言之，我的函数每调用一次，我的函数向该文件追加一行数据，注意是追加，不能改变我原有的数据，用open打开status=‘old’是不可以的，亲测覆盖掉了，求帮助。是不是要在某些函数加某些参数，我记得C++是可以直接的。

fcode

Open 里面加 POSITION = 'APPEND'

另外，如果是你整个程序运行一次。那么根本不需要关闭文件。把 Open 移动到程序最开始，函数调用里不打开，也不关闭，直接 write 就行了。

li913

[Fortran] 纯文本查看 复制代码

program test
do i=1,3
open(11,file='1.txt',position='append')
write(11,*) i 
close(11)
end do 
end 

wengxi

谢谢，两种方法都很好用。

wengxi

fcode 发表于 2015-5-23 08:56
Open 里面加 POSITION = 'APPEND'

另外，如果是你整个程序运行一次。那么根本不需要关闭文件。把 Open 移 ...

谢谢！我前面没有续问的意思，我本来是想补充一下，方便别人参考。