Question

运行fortran出现forrt1:severe (29):file not found

后面的是， unit 10，file D：/Program Files/Microsoft Visual Studio/common/MSDEV98/My Projects/moduli.ini
前辈 这些文件存在啊 路径也是在根目录下啊

Answer 1

报错说的是文件号为15的文件没有找到。

出现错误的可能为：

1. 文件名超过了长度

   character *20 filename

   READ(*,*)FILENAME
   OPEN(15,FILE=FILENAME,STATUS='OLD',ACCESS='SEQUENTIAL',FORM='F&
   ORMATTED')

   这三句。假设你输入了一个文件名，即使文件名是正确的，而且文件也存在，但是文件名长度超过了20，那么系统只会提取前面的20个字符作为filename，在open语句中就会出现文件夹没找到的错误。

   其实不建议这么读文件名，最好从txt之类的文件读入。

2. 空格是否存在

   在用read(*,*)读取文件的时候系统貌似会自动在文件名之前添加一个空格。调整方法就是OPEN(15,FILE=trim(adjustl(FILENAME)),STATUS='OLD',ACCESS='SEQUENTIAL',FORM='F&
   ORMATTED')

3. 文件是否存在。

   这个我就不用多说了。看看默认路径下指定的文件是否存在。

Answer 2

应该是路径不对或文件不存在

LZ能否把file not found后面的错误信息补全？
=======================
1 unit 10说明编号10的文件打不开, 程序有open(10,file=......)吗?
2 把Projects存在简单的路径试试? 比如D:\ProjTest\
3 这个错误是runtime error吗?