fortran 读取奇异文件

白兔糖0217

有多个csv, 里面数据、字符串、逻辑值混合。读取时，我想先跳过前19行，
命令这样写的：
do i=1,19
  read(*,*)  ! 表头，跳过
end do

csv 文件

用简单的print 语句检查了，貌似不对。这三行没办法运行。也不报错。
请大家看看，这是哪里错了？？？

坐等指点！感激不尽

言深深

给一个相对完整的语句，print了什么？

白兔糖0217

言深深 发表于 2015-5-29 10:35
给一个相对完整的语句，print了什么？

count=1
print *, count

用这个做检验的

雪花纷飞

open什么文件了？ read(*,*)读的是终端输入吧，不是指向csv文件的文件号

言深深

白兔糖0217 发表于 2015-5-29 10:43
count=1
print *, count

你敢把程序写的再全一些么？原谅我学的不好，你这个，我真的不知道怎么和你之前给出来的程序组合到一起。

lqouc

四楼正解，顺便说一下，提问的时候把所有相关信息都说出来，信息不全大家都很累。

白兔糖0217

雪花纷飞 发表于 2015-5-29 10:43
open什么文件了？ read(*,*)读的是终端输入吧，不是指向csv文件的文件号

嗯呐   这一部分，我改掉了，

do i=1,19
  read(11,*)    ! 表头，跳过
end do


可以运行了！，问题好像是在打开文件的时候，
dir='D:\Fortran\973_convection\lv2-jn\'
fname='2014-01-01_00-00-08_lv2.csv'
file_ls=trim(dir)//trim(fname)

! print *,file_ls

open (11,file=file_ls,form='formatted',action='read',position='rewind',iostat=istat)
open (21,file=file_ls,form='formatted',action='read',position='rewind',iostat=istat)
open 里面的file没有写好，所以不报错却也无法继续。现在已经改正了。

白兔糖0217

lqouc 发表于 2015-5-29 11:02
四楼正解，顺便说一下，提问的时候把所有相关信息都说出来，信息不全大家都很累。

嗯呐 小lqouc!

咖啡伴侣

fortran 基本语法、教程多看看

白兔糖0217

咖啡伴侣 发表于 2015-5-29 11:14
fortran 基本语法、教程多看看

是呢