24小时热门版块排行榜    

查看: 790  |  回复: 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 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[基金申请] 今年也是没消息就是没中么 +4 vito刘 2026-06-13 5/250 2026-06-14 09:30 by zzahkj
[考研] *O_o^ +3 jk31rb6vyz 2026-06-12 3/150 2026-06-14 09:08 by 8bmv3h4hvh
[论文投稿] ⊙▽⊙ +3 m584r2z4j3 2026-06-11 3/150 2026-06-14 08:46 by 8bmv3h4hvh
[硕博家园] T^T +7 m584r2z4j3 2026-06-11 8/400 2026-06-14 08:34 by 8bmv3h4hvh
[公派出国] T^T +6 q1zg6x4lf3 2026-06-12 6/300 2026-06-14 08:28 by 8bmv3h4hvh
[考研] O(∩_∩)O +4 q1zg6x4lf3 2026-06-12 5/250 2026-06-14 08:23 by 8bmv3h4hvh
[考博] T^T +4 m584r2z4j3 2026-06-11 4/200 2026-06-14 08:08 by 8bmv3h4hvh
[找工作] 售SCI文章,我:8.O.5.51O.5.4,科目齐全,可十急 +3 q1zg6x4lf3 2026-06-12 3/150 2026-06-13 19:07 by 1js5n6upxm
[公派出国] +4 q1zg6x4lf3 2026-06-12 4/200 2026-06-13 19:05 by 1js5n6upxm
[考研] T^T +6 m584r2z4j3 2026-06-11 6/300 2026-06-13 18:29 by lkmi35jdzt
[文学芳草园] 咸菜 +3 myrtle 2026-06-10 3/150 2026-06-13 18:29 by ahsoarli
[考博] π_π +4 m584r2z4j3 2026-06-11 4/200 2026-06-13 18:25 by lkmi35jdzt
[考博] T^T +4 jk31rb6vyz 2026-06-12 4/200 2026-06-13 12:09 by 80j16ujcu8
[找工作] 售SCI文章,我:8.O.5.51O.5.4,科目齐全,可十急 +4 q1zg6x4lf3 2026-06-12 4/200 2026-06-13 08:53 by t4hz8376wy
[论文投稿] →_→ +5 m584r2z4j3 2026-06-11 5/250 2026-06-13 08:13 by t4hz8376wy
[基金申请] 面上项目没有好文章就没希望了吗? +19 1234567wang 2026-06-07 21/1050 2026-06-12 21:24 by littlezl
[考博] [急招]吉林大学招收26年9月入学考核制博士生1名,截止今晚24点前 +3 hehejin 2026-06-10 4/200 2026-06-12 18:24 by 冻雨天
[教师之家] 重庆理工大学副校长遇刺身亡 传涉案副教授疑因积怨行凶 +6 yexuqing 2026-06-07 7/350 2026-06-12 16:46 by wwwkkk83
[教师之家] AASSDDFF +3 m584r2z4j3 2026-06-11 3/150 2026-06-12 11:28 by zs48m4lz8g
[考博] 博士申请 +3 张城斐 2026-06-07 3/150 2026-06-08 09:15 by A大朋同学
信息提示
请填处理意见