主题:重复打开文件,写入内容;要求不覆盖删之前内容! 谢谢啊!
dingsheng1206
[专家分:0] 发布于 2011-11-28 10:24:00
请教大神一个问题。谢谢!!!
我现在想在程序中遍及某一个变量的整个时间历程。想重复打开一个文件,写入变量值;再打开,再写入变量值;要求下一次循环不删掉上一步的结果,而仅仅是另外再写入内容,比如第一次循环之后,文件内容是A;然后第二次循环后结果是A,B;第三次循环后结果是A,B,C;
谢谢啊
回复列表 (共3个回复)
沙发
臭石头雪球 [专家分:23030] 发布于 2011-11-28 11:11:00
这个要分情况。
1.无格式文件,直接读取,下一次用 rec 指定以后的记录就行了
2.有格式文件,用 Open( POSITION = 'append') 不过这样不是标准的语法,是某些编译器的扩展。
3.如果事先知道文件现有的行数。可以:
Open(12,File='2.txt')
Do i = 1,行数
read(12,*)
End Do
write(12,*) 'sssdd'
4.如果事先不知道行数,可以想办法获取,比如一直读取,计数,直到错误后跳出。
板凳
dingsheng1206 [专家分:0] 发布于 2011-11-28 14:07:00
[quote]这个要分情况。
1.无格式文件,直接读取,下一次用 rec 指定以后的记录就行了
2.有格式文件,用 Open( POSITION = 'append') 不过这样不是标准的语法,是某些编译器的扩展。
3.如果事先知道文件现有的行数。可以:
Open(12,File='2.txt')
Do i = 1,行数
read(12,*)
End Do
write(12,*) 'sssdd'
4.如果事先不知道行数,可以想办法获取,比如一直读取,计数,直到错误后跳出。[/quote]
你好,谢谢指教,这个文件是我自己新建的空白文件,我新建的file.txt文件。之后循环5000步,相当于计算5000秒,每过一秒,就往file.txt里记一下此时刻的一个变量值,比如压力。循环结束后,file.txt文件总共有5000行内容,每一行依次代表的是1秒到5000秒过程的压力数值啊。谢谢哦
3 楼
dingsheng1206 [专家分:0] 发布于 2011-11-28 15:21:00
弄好啦,谢谢大神的指教啊,谢谢你哦,祝你生活幸福快乐每天!!!
我来回复