24小时热门版块排行榜    

Znn3bq.jpeg
汕头大学海洋科学接受调剂
查看: 551  |  回复: 2
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

yhwsmile

金虫 (小有名气)

[交流] 【求助】一个读文件问题,请教各位大虾…… 已有2人参与

读取文件遇到问题,请教各位大虾……
open那个地方怎么测试都通不过,请问这里怎么弄啊,谢谢……
例:
数据文件:r52653_5107.dat
config.txt内容:
inputpre    =  E:\cxbf\pre\data\
outlinian    =  E:\cxbf\pre\output\linian\
outleinian  =  E:\cxbf\pre\output\leinian\

程序部分:
        open(10,file='config.txt')
        read(10,'(15x,a50)')c(1)
        read(10,'(15x,a50)')c(2)
       
               do ii=1,3
           len1(ii)=len_trim(c(ii))
        end do
      
c        do istat=50000,59999
      do istat=52652,52653
           write(cstat,'(i5)')istat
      open(11,file=c(1)(1:len1(1))'r'//cstat//'_5107.dat',
     *status='old',err=999)
回复此楼

» 猜你喜欢

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

yhwsmile

金虫 (小有名气)

引用回帖:
Originally posted by dingxb at 2011-04-14 16:39:01:
在'r'前面加上//试试。
open(11,file=c(1)(1:len1(1))//'r'//cstat//'_5107.dat',
     *status='old',err=999)

OK了,谢谢咯……
3楼2011-04-14 17:57:15
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 3 个回答

dingxb

金虫 (正式写手)

迷途书虫

★ ★
小木虫(金币+0.5):给个红包,谢谢回帖交流
微尘、梦想(金币+1): 谢谢回复…… 2011-04-14 21:15:43
在'r'前面加上//试试。
open(11,file=c(1)(1:len1(1))//'r'//cstat//'_5107.dat',
     *status='old',err=999)
http://sites.google.com/site/nwnuatom/个人网站,欢迎猛击乱点!
2楼2011-04-14 16:39:01
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
普通表情 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 材料考研调剂 +29 云木达达 2026-04-11 31/1550 2026-04-13 13:32 by lyh鲁老师
[考研] 一志愿085802 323分求调剂 +13 drizzle_9 2026-04-12 14/700 2026-04-13 10:26 by Faiz5552
[教师之家] 山东双非院校考核超级无底线,领导幸灾乐祸,教师遭殃恐 +3 qut2026 2026-04-11 7/350 2026-04-12 20:24 by qut2026
[考研] 0831生医工第一轮调剂失败求助 +12 小熊睿睿_s 2026-04-11 16/800 2026-04-12 16:28 by 钰璞
[考研] 一志愿华中农微生物,288分,三年实验经历 +11 代fish 2026-04-09 11/550 2026-04-12 10:21 by Hayaay
[基金申请] 山东省基金2026 +5 jerry681 2026-04-08 6/300 2026-04-12 08:33 by kudofaye
[考研] 求调剂 +11 月@163.com 2026-04-07 13/650 2026-04-11 22:55 by BruceLiu320
[考研] 086003调剂求助 +21 苏弋万 2026-04-09 22/1100 2026-04-11 20:25 by dongdian1
[考研] 调剂 +19 小张ZA 2026-04-10 20/1000 2026-04-10 22:08 by 猪会飞
[考研] 083200 305分 求二轮调剂 不接受跨专业 +9 Claireyyyy 2026-04-09 10/500 2026-04-10 21:21 by Claireyyyy
[考研] 284求调剂 +9 让我上岸吧阿西 2026-04-09 11/550 2026-04-10 19:18 by 靖jing
[考研] 0858求调剂 5+5 Gky09300550, 2026-04-10 8/400 2026-04-10 19:13 by chemisry
[考研] 287求调剂 +15 Fnhc 2026-04-07 21/1050 2026-04-10 19:09 by chemisry
[考研] 265求调剂 +12 风说她早忘了 2026-04-10 13/650 2026-04-10 18:56 by chemisry
[考研] 本9 一志愿西工大085601 324求调剂 +5 wysyjs25 2026-04-10 5/250 2026-04-10 16:57 by luoyongfeng
[考研] 材料专硕调剂 +16 哈哈哈吼吼吼哈 2026-04-07 17/850 2026-04-09 21:16 by wutongshun
[考研] 286求调剂 +19 Faune 2026-04-08 20/1000 2026-04-09 08:36 by 哦哦123
[考研] 270求调剂 +3 031127 2026-04-06 4/200 2026-04-08 21:00 by 逆水乘风
[考研] 388求调剂 +6 四川王涛 2026-04-07 8/400 2026-04-08 00:17 by JourneyLucky
[考研] 318求调剂 +5 李青山山山 2026-04-07 5/250 2026-04-07 18:24 by 蓝云思雨
信息提示
请填处理意见