integer*4 function access (name, mode) character*(*) name, mode
示例:ierr = access ( 'MyFile', 'r' )
access 函数根据 mode 检查调用方对给定的文件 name 的可访问性。mode 参数可以按任何顺序以任何组合包括以下一项或多项:
测试是否具有读取权限
测试是否具有写入权限
测试是否具有执行权限
测试是否存在
如果任一参数不合法,或者无法在所有指定的模式下访问文件,则会返回错误代码。如果指定的访问将成功,则会返回 0。
测试是否具有读取和写入权限:
integer*4 access, st st = access('anyfile.data', 'rw') if( st .ne.0 ) print*, 'Cannot read/write file'
libfui.a
access(2)、gerror(3F)、perror(3F)