Fortran 中如何实现文件的复制

avatar 三月 28, 201504:00:34 评论 1,234 views

如要将 文件 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 中如何实现文件的复制 - 老坊的日志 - 网易博客.

weinxin
我的微信公众号
分享科研软件、科研方法,为你的科研助力。
avatar

发表评论

:?: :razz: :sad: :evil: :!: :smile: :oops: :grin: :eek: :shock: :???: :cool: :lol: :mad: :twisted: :roll: :wink: :idea: :arrow: :neutral: :cry: :mrgreen: