Fortran 中如何实现文件的复制

如要将 文件 e:\document\rgb.txt  拷贝到根目录下

program main

implicit none

integer*4::result

integer,external::systemqq

result=systemqq(‘copy e:\document\rgb.txt  e:\rgb.txt’)

end

此外,fortran中函数RENAME也可实现此目的

RENAME

Portability Function: Renames a file.

Module: USE DFPORT

Syntax

result = RENAME (from, to)

from

(Input) Character*(*). Path of an existing file.

to

(Input) Character*(*). The new path (see Warning below).

Results:

via Fortran 中如何实现文件的复制 – 老坊的日志 – 网易博客.

发表评论

电子邮件地址不会被公开。 必填项已用*标注

CAPTCHA

*