24小时热门版块排行榜    

查看: 712  |  回复: 5

dongjianzhi

铜虫 (小有名气)

[求助] Fortran 求助

iLengthPath = Len_Trim(cDataPath)
      if(iLengthPath.gt.260-13) goto 930
      cFileName = cDataPath(1:iLengthPath)//'\Options.in'
      open(35,file=cFileName, status='old',err=998)

请问在这个命令下,fortran所生成的文件在那个文件夹呢?

谢谢

回复此楼
已阅   关注TA 给TA发消息 送TA红花 TA的回帖

自由神

木虫 (正式写手)

【答案】应助回帖

★ ★ ★ ★ ★
感谢参与,应助指数 +1
dongjianzhi: 金币+5 2012-09-25 14:37:44
xzhdty: 谢谢参与 2012-12-23 18:17:43
应该在你前面设置的位置去找吧,具体的我也不大清楚
2楼2012-09-25 09:27:48
已阅   关注TA 给TA发消息 送TA红花 TA的回帖

dongjianzhi

铜虫 (小有名气)

引用回帖:
2楼: Originally posted by 自由神 at 2012-09-25 09:27:48
应该在你前面设置的位置去找吧,具体的我也不大清楚

iCount = NARGS()
      if(iCount.gt.1) then
        i2=1
        call GETARG(i2, cDataPath, status)
      else
        cFileName = 'LEVEL_01.DIR'
        open(10,file=cFileName, status='old',err=901)
        read(10,101,err=904) cDataPath
        close (10)
      end if

我实在是没看见呢。。。
3楼2012-09-25 14:37:32
已阅   关注TA 给TA发消息 送TA红花 TA的回帖

gongxd325

至尊木虫 (文坛精英)

【答案】应助回帖

★ ★ ★
感谢参与,应助指数 +1
dongjianzhi: 金币+3 2012-09-25 17:25:19
你在哪个目录运行程序,就在哪个目录
一个人做点好事并不难难的是一辈子做好事!!!
4楼2012-09-25 15:42:27
已阅   关注TA 给TA发消息 送TA红花 TA的回帖

dongjianzhi

铜虫 (小有名气)

引用回帖:
4楼: Originally posted by gongxd325 at 2012-09-25 15:42:27
你在哪个目录运行程序,就在哪个目录

是程序的文件夹?
木有输入和输出文件...
5楼2012-09-25 17:25:09
已阅   关注TA 给TA发消息 送TA红花 TA的回帖

gongxd325

至尊木虫 (文坛精英)

【答案】应助回帖


xzhdty: 金币+1, 谢谢参与 2012-12-23 18:18:18
(1) 你在DOS下运行看会不会在当前目录产生输出文件
(2) 运行完后搜索一下看有没有输出文件
(3) 要是都没有,运行有问题,没有执行输出语句
一个人做点好事并不难难的是一辈子做好事!!!
6楼2012-09-26 07:39:52
已阅   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 dongjianzhi 的主题更新
信息提示
请填处理意见