fortran批处理.000文件，批量生成.dat文件。我现在只能生成一个2012072002.dat。谢谢

关于 Fortran 批处理文件。有多种方法，他们各有其适用性。
1.如果文件名是有一定规律的。
a. 那么在程序里按照规律构建文件名（字符串）。Open 时给予该字符串，作为文件名。
2.如果文件名没有规律。
b. 可以使用 System 语句，调用 dir 命令，把所有文件名写入某文件。然后读取该文件，每读一行，获得一个文件名，Open 处理一次。
这就是你代码里的方法。

c. 如果你使用的是 Visual Fortran 系列编译器，该编译器为你提供了 GetFileInfoQQ 函数，可以实现文件循环。
d. 如果你的编译器没有 GetFileInfoQQ 函数，但可以使用 Windows API 函数接口，那么 windows 为你提供了 FindFileFirst 和 FindFileNext 两个函数用来穷举文件。

我个人比较不喜欢 b 方法。
其中，a 方法通用性最好。但它要求文件名是有一定规律的。（比如 201101.txt 到 201109.txt ，是有规律的）
c 方法只适合于 Visual Fortran 编译器
d 方法适用于几乎所有 windows 平台编译器。

如果你对哪个方法有兴趣，请追问我。