《fortran文件操作》由会员分享，可在线阅读，更多相关《fortran文件操作（7页珍藏版）》请在金锄头文库上搜索。
1、fortran 文件操作From: Fortran 95 程序设计 彭国伦1. 文件读取的概念： 读取：“顺序读取”和“直接读取” 。 保存：“文本文件”和“二进制文件” 。 二进制文件：读取快，因为保存格式和数据在内存中的保存方法一样，同时也节省空间。2. 文件的操作：open 的使用：使用 open 命令打开文件之后，就可以对文件来做输入输出。 example:program ex0901 impicit none open(unit=10, file=hello.txt) !打开 hello.txt 文件 , unit 指定文件代码， file指定文件名称。write(10, *) he
2、llo! 在代码为 10 的文件中写入 hellostopend program ex0901open 中有很多参数可以使用，详细如下：OPEN(UNIT=number, FILE=filename, FORM=., STATUS=., ACCESS=., RECL=length, ERR=label, IOSTAT=iostat, BLANK=., POSITION=., ACTION=action, PAD=., DELIM=.)UNIT=number ： number 必须是一个正整数，它可以使用变量或是常量来赋值。number 最好避开 1,2,5,6 。因为 2,6 是默认的输出位置
3、，也就是屏幕。 1，5 则是默认的输入位置，键 盘。FILE=filename ： 指定要打开的文件名称，文件名要符合系统规定。 windows 下不区分大 小写， unix 下则会区分大小写，最好不要使用中文文件名。FORM=FORMATTED OR UNFORMATTEDFORM字段只有两个值可以设置：FORM=FORMATTED “文本文件”格式来保存FORM=UNFORMATTED “二进制文件”格式保存 这一栏不给定时候的默认值是 : FORM=FORMATTED在的旧文件。STATUS=NEWSTATUS=OLD STATUS=REPLACE 建新文件。STATUS=SCRATCH
4、STATUS=NEW or OLD or SCRATCH or UNKNOWN 用来说明打开一个新的文件或已经存打开一个原本不存在的新文件 打开一个原来已经存在的文件 若文件已经存在则重新创建一次，原来的内容消失；若不存在则会创 表示要打开一个暂存文盘，这个时候可以不需要指定文件名称，也就是 FILE 这个一栏可以忽略。 因为程序本身会自动取一个文件名， 至于文件名是啥也不重要， 因为暂存盘会在程序结束后自动删除。STATUS=UNKNOWt由各编译器自定义。通常会同REPLACE勺效果。!这一栏不给定时，默认为STATUS=UNKNOWNACCESS=SEQUENTIAL or DIRECT
5、 设置读写文件勺方法：ACCESS=SEQUENTIAL 读写文件的操作会以 “顺序” 的方法来做读写，“顺序读取文件” 。 ACCESS=DIRET 读写文件的操作可以任意指定位置， “直接读取文件” 。 ！不赋值时候，默认为： ACCESS=SEQUENTIAL。RECL=length在顺序读取文件中，RECL字段值用来设置一次可以读取多大容量的数据。打开直接读取文件” ，RECL= length的length值是用来设置文件中每一个模块单元的分 区长度。length 的单位在文本根式下为 1 个字符，也就是 1 byte 。在二进制格式下则由编译器自行 决定，一般可能为 1 byte (
6、G77) 或 4 byte (Visual Fortran)。ERR=LABEL这个字段用来设置当文件打开发生错误时，程序会跳跃到LABEL所指定的行代码处来继续执行程序。IOSTAT=var 这个字段会设置一个整数值给后面的整型变量， 这是用来说明文件打开的状态， 数值会有下面三种情况：var0表示读取操作错误var=0表示读取操作正常var0 stat=0 stat0stat=0stat0ERR=errlabel EXIST=exist文件代号文件名查询文件读取情况，会设置一个整数给后面的变量: 文件读取操作错误 文件读取操作正常文件终了 发生错误时会转移到复制的代码行继续执行程序。 检查
7、文件是否存在，返回布尔变量，真表示存在，假值表示不存在。OPEND=openec检查文件是否用已经用 open打开，返回布尔变量，真表示已经打开， 假表示 尚未打开。NUMBER=number 用文件名来查询这个文件所给定的代码。NAMED=namec 查询文件是否取了名字， 也就是检查文件是否为临时保存盘， 返回值为逻辑 数。ACCESS=access 检查文件的读取格式，返回一个字符串，可以是：SEQUENTIAL代表文件使用顺序读取格式DIRECT代表文件使用直接读取格式UNDEFINED代表没有定义UNFORMATTED打开的是二进制文件SEQUENTIAL=sequential 查看
8、文件是否使用顺序格式，会返回一个字符串，可以是：YESNO代表文件是顺序读取文件 代表文件不是顺序读取文件UNKNOWN 代表不知道DIRECT direct 查看文件是否使用直接格式，会返回一个字符串，可以是:YESNO文件是直接读取文件 文件是非直接读取文件UNKNOWN 代表不知道FORM=form查看文件的保存方法，返回字符串，可以是: FORMATTED打开的是文本文件UNDEFINED没有定义FORMATTED=fm查看文件是否是文本文件，返回字符串，可以是：YES本文件是文本文件NO本文件非文本文件UNDEFINED 无法判断UNFORMATTED=fm查看文件是否是二进制文件，返回字符串，可以是:YES本文件是二进制文件NO本文件非二进制文件UNKNOWN 无法判断RECL=length 返回 open 文件时 recl 栏的设置值。NEXTREC=nr 返回下一次文件读写的位置。
