Question

fortran关于读取文件的问题,怎么老是提示要读取的文件不存在?

Answer 1

满意答案啸月6级2011-04-15你直接输入1试试！文件的路径设置了没？ 追问： 试过了,没用 回答： 我觉得你的文件怎么那么怪异，是不是那个地方错了，你发个原文过来我试试！ 追问： 什么地方?你说,这个好像不能发附件. 回答： 你直接复制原文到上面就OK了，==我再看看 追问： 不能传附件,我试了. 回答： 你输入1，txt试试感觉都合适的啊 追问： 我也是感觉没有错误.而且我用几台电脑试过.结果都是这样,,,所以我也很无语...而且你这方法我也试过,没用 回答： 你是要读取一个数组是不是？ 追问： 不是,,,是整数 回答： 你试试我写的这个！ program main
implicit none
integer::x,y,z
logical alive
character::filename
integer :: error
write(*,*) "input the Filename:"
read (*,"(A79)") filename
inquire( file=filename, exist=alive) if ( alive ) then
open(unit=fileid, file=filename, &
access="sequential", status="old")
do while(.true.)
read(unit=fileid, fmt="(A79)", iostat=status ) buffer
if ( status/=0 ) exit
end if stopend你应该能看懂吧，调试方法和你的那个一样，也要复制到环境下面才可以，时间长了没写过，都忘光了 补充： 你那个open 里是不是少了点东西，你看看，那个filed吧，如果是file的话好像就找不到文件了，那循环不是就跳回去了么？你试试，我这边的软件找不到了，没法调试！