爱气象,爱气象家园! 

气象家园

 找回密码
 立即注册

QQ登录

只需一步,快速开始

新浪微博登陆

只需一步, 快速开始

搜索
查看: 5045|回复: 11

[求助] fortran批处理中的一点小问题

[复制链接]

新浪微博达人勋

发表于 2016-1-17 23:11:30 | 显示全部楼层 |阅读模式

登录后查看更多精彩内容~

您需要 登录 才可以下载或查看,没有帐号?立即注册 新浪微博登陆

x
我用fortran处理多个文件,思路是这样的,把多个文件的文件名放在一个txt中,用fortran依次读取,这样就对这些文件进行批处理了。但是打开文件那一步不知道如何设定可变的文件名了,open(10,'nf.txt'),文件名好像不能使变量吧?求大神解答。O(∩_∩)O谢谢!
密码修改失败请联系微信:mofangbao

新浪微博达人勋

发表于 2016-1-17 23:55:28 | 显示全部楼层
integer i
integer,parameter:: n=100!你有多少个文件这就是几
character*200 ,path,file_name(n)
path='d:\data_path'
do i=1,n
read(10,*)file_name
open(11,file=trim(path)//file_name)
read(11).........
enddo
密码修改失败请联系微信:mofangbao

新浪微博达人勋

发表于 2016-1-17 23:57:06 | 显示全部楼层
本帖最后由 石破天惊 于 2016-1-18 14:12 编辑

刚才那个写的有点问题,这个应该是对的
integer i
integer,parameter:: n=100!你有多少个文件这就是几
character*200 path,file_name(n)
path='d:\data_path'
do i=1,n
    read(10,*)file_name
    open(11,file=trim(path)//trim(file_name(i)))
    read(11).........
    close(11)
enddo


评分

参与人数 1金钱 +10 贡献 +2 收起 理由
言深深 + 10 + 2

查看全部评分

密码修改失败请联系微信:mofangbao

新浪微博达人勋

发表于 2016-1-18 08:14:52 | 显示全部楼层
论坛里有很多人批量处理的帖子,楼主自己搜索一下
密码修改失败请联系微信:mofangbao

新浪微博达人勋

发表于 2016-1-18 11:09:52 | 显示全部楼层
石破天惊 发表于 2016-1-17 23:57
刚才那个写的有点问题,这个应该是对的
integer i
integer,parameter:: n=100!你有多少个文件这就是几

@石破天惊;是不是需要一个write()。楼主是把文件名写到文件里
密码修改失败请联系微信:mofangbao

新浪微博达人勋

发表于 2016-1-18 14:08:16 | 显示全部楼层
乱世一杯茶 发表于 2016-1-18 11:09
@石破天惊;是不是需要一个write()。楼主是把文件名写到文件里

他不是已经把文件名放进去了么?现在的问题不是怎么读取可变的文件名么?只要知道“//”这个东西是进行字符串分段的就行了
密码修改失败请联系微信:mofangbao

新浪微博达人勋

发表于 2016-1-18 15:25:38 | 显示全部楼层
1.使用批处理,主要是生成一个路径名字的TXT。
http://bbs.06climate.com/forum.php?mod=viewthread&tid=34991
2.然后使用上面大神的方法
密码修改失败请联系微信:mofangbao

新浪微博达人勋

 楼主| 发表于 2016-1-18 21:15:31 | 显示全部楼层
石破天惊 发表于 2016-1-17 23:57
刚才那个写的有点问题,这个应该是对的
integer i
integer,parameter:: n=100!你有多少个文件这就是几

谢谢啦,我试试。(*^__^*)
密码修改失败请联系微信:mofangbao

新浪微博达人勋

发表于 2016-1-20 10:44:02 | 显示全部楼层
石破天惊 发表于 2016-1-18 14:08
他不是已经把文件名放进去了么?现在的问题不是怎么读取可变的文件名么?只要知道“//”这个东西是进行字 ...

我懂了,果然是大神,小弟Fortran刚刚入门。以后有什么问题想就请教你了
密码修改失败请联系微信:mofangbao

新浪微博达人勋

发表于 2016-1-20 11:04:41 | 显示全部楼层
乱世一杯茶 发表于 2016-1-20 10:44
我懂了,果然是大神,小弟Fortran刚刚入门。以后有什么问题想就请教你了

互相学习,互相交流
密码修改失败请联系微信:mofangbao
您需要登录后才可以回帖 登录 | 立即注册 新浪微博登陆

本版积分规则

Copyright ©2011-2014 bbs.06climate.com All Rights Reserved.  Powered by Discuz! (京ICP-10201084)

本站信息均由会员发表,不代表气象家园立场,禁止在本站发表与国家法律相抵触言论

快速回复 返回顶部 返回列表