版块导航: 正在加载中...

客户端APP下载

登录注册

应《网络安全法》要求，自2017年10月1日起，未进行实名认证将不得使用互联网跟帖服务。为保障您的帐号能够正常使用，请尽快对帐号进行手机号验证，感谢您的理解与支持！

24小时热门版块排行榜

lijunjiexm

铁虫 (小有名气)

应助: 0 (幼儿园)
金币: 22.8
红花: 1
帖子: 182
在线: 87.1小时
虫号: 1198843
注册: 2011-02-03
专业: 常微分方程与动力系统

[求助] 请教下关于文件操作的命令，谢谢

如下语句是否有不妥的地方，特别是REWIND(是不是要写全REWIND23 和REWIND24？，谢谢)
   CHARACTER*80 LINE
C
   OPEN ( 1, FILE = 'G:\Program Files\sucontr\dat\ns2dev.dat',
   >       status='old')
   OPEN (66, FILE = 'G:\Program Files\sucontr\eval\ns2dev.log' )
   OPEN ( 8, FILE = 'G:\Program Files\sucontr\eval\ns2dev.con' )
   OPEN ( 9, FILE = 'G:\Program Files\sucontr\eval\ns2dev.str' )
   OPEN (11, FILE = 'G:\Program Files\sucontr\eval\ns2dev.cfg',
   >       FORM = 'UNFORMATTED')
   OPEN (14, FILE = 'G:\Program Files\sucontr\eval\ns2dev.trc' )
   OPEN (15, FILE = 'G:\Program Files\sucontr\eval\ns2dev.msh' )
   OPEN (16, FILE = 'G:\Program Files\sucontr\eval\ns2dev.err' )
   OPEN (17, FILE = 'G:\Program Files\sucontr\eval\ns2dev.pre' )
   OPEN (19, FILE = 'G:\Program Files\sucontr\eval\ns2dev.out' )
   OPEN (22, FILE = 'G:\Program Files\sucontr\eval\ns2dev.prf' )
   OPEN (23, FILE = 'G:\Program Files\sucontr\eval\
   >       ns2dev.out.forcontraction' )
   OPEN (24, FILE = 'G:\Program Files\sucontr\eval\ns2dev.grd' )
   OPEN (99, FILE = 'G:\Program Files\sucontr\eval\ns2dev.ve2' )
   REWIND 1
   REWIND 66
   REWIND 8
   REWIND 9
   REWIND 10
   REWIND 14
   REWIND 15
   REWIND 16
   REWIND 17
   REWIND 19
   REWIND 22
   REWIND 99
C

» 猜你喜欢

导师想让我从独立一作变成了共一第一已经有8人回复
博士读完未来一定会好吗已经有23人回复
到新单位后，换了新的研究方向，没有团队，持续积累2区以上论文，能申请到面上吗已经有11人回复
读博已经有4人回复
JMPT 期刊投稿流程已经有4人回复
心脉受损已经有5人回复
Springer期刊投稿求助已经有4人回复
小论文投稿已经有3人回复
申请2026年博士已经有6人回复

» 本主题相关价值贴推荐，对您同样有帮助:

请教各位高手，如何几个cif文件合并成一个cif文件？急，谢谢！已经有11人回复
ansys的命令流看不明白，能不能帮忙翻译一下命令流是怎么操作的？？？已经有4人回复
word2003每次初次打开都出现“向程序发送命令失败”,请教高手！谢谢！已经有2人回复
c语言高手请进，请勿灌水，谢谢！（关于读写文件的问题）已经有6人回复
请教一下在PPT中的SHIFT键的使用方法的汇总，谢谢大家：）已经有2人回复
【请教】请教单晶解析时怎么生成TXT文件，谢谢~ 已经有6人回复
【求助】请教湿法装柱后干法上样的具体操作，越详细越好。谢谢！已经有5人回复
【请教】关于.ins文件中FREE命令的意思已经有5人回复

1楼2011-07-22 07:50:15

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

lijunjiexm

铁虫 (小有名气)

应助: 0 (幼儿园)
金币: 22.8
红花: 1
帖子: 182
在线: 87.1小时
虫号: 1198843
注册: 2011-02-03
专业: 常微分方程与动力系统

★
dubo(金币+1): 欢迎常来程序语言版讨论 2011-07-31 13:23:11

因为在程序执行的时候出现问题：forrtl: severe<24> end-of-file during read,unit 23,file = 'G:\Program Files\sucontr\eval\ ns2dev.out.forcontraction'

赞一下(1人)

2楼2011-07-22 07:52:48

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

snoopyzhao

至尊木虫 (职业作家)

程序强帖: 16
应助: 157 (高中生)
贵宾: 0.02
金币: 18844.7
红花: 29
帖子: 3803
在线: 1422.4小时
虫号: 183750
注册: 2006-02-13
专业: 污染生态化学

【答案】应助回帖

★
xzhdty(金币+1): 谢谢 2011-07-22 10:37:01
lijunjiexm(金币+10): rewind不知道是具体什么用的，不要他也可以吧 2011-10-26 20:16:34

似乎都没有必要 rewind，除非你前面读了几句，然后又打算从头读起……

至于你提到的错误，与上面给出的代码没有什么关系……

赞一下(1人)

3楼2011-07-22 09:24:41

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

相关版块跳转我要订阅楼主 lijunjiexm 的主题更新