Fortran Coder

查看: 12057|回复: 4
打印 上一主题 下一主题

[文件读写] 关于fortran中新建文件夹的问题。

[复制链接]

5

帖子

2

主题

0

精华

入门

F 币
48 元
贡献
24 点
跳转到指定楼层
楼主
发表于 2015-3-17 15:28:07 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
我用的编译器是cvf,inquire语句不能查询文件夹是否存在。
在用istatus2=System("Md "//Trim(NewFolderName1)) 新建文件夹的时候,如果要新建的文件夹不存在,那就直接新建了;如果存在,就会输出一行字,说要新建的文件夹已存在。
我不需要这行字,有没有可能让这句话不要出现或者输出到别的地方而不是直接输出到屏幕上?
分享到:  微信微信
收藏收藏 点赞点赞 点踩点踩

835

帖子

2

主题

0

精华

大宗师

F 币
3926 元
贡献
2334 点
沙发
发表于 2015-3-17 16:28:19 | 只看该作者
[Fortran] 纯文本查看 复制代码
program test
use dfport
i = MAKEDIRQQ('DIR name')
end 

评分

参与人数 1F 币 +9 贡献 +9 收起 理由
fcode + 9 + 9 赞一个!

查看全部评分

5

帖子

2

主题

0

精华

入门

F 币
48 元
贡献
24 点
板凳
 楼主| 发表于 2015-3-18 16:38:34 | 只看该作者

谢谢,但是试了一下,cvf好像不能用这个命令。

737

帖子

4

主题

0

精华

大师

农村外出务工人员

F 币
704 元
贡献
361 点

新人勋章爱心勋章水王勋章元老勋章热心勋章

地板
发表于 2015-3-18 16:58:47 | 只看该作者
经过测试,cvf可用

有可能需要改为
USE DFLIB

如果你还是不能用,请给出错误提示

5

帖子

2

主题

0

精华

入门

F 币
48 元
贡献
24 点
5#
 楼主| 发表于 2015-3-24 22:03:50 | 只看该作者
楚香饭 发表于 2015-3-18 16:58
经过测试,cvf可用

有可能需要改为

谢谢,我刚看到,之前已经用别的方法解决了。明天我试试看。
您需要登录后才可以回帖 登录 | 极速注册

本版积分规则

捐赠本站|Archiver|关于我们 About Us|小黑屋|Fcode ( 京ICP备18005632-2号 )

GMT+8, 2024-12-24 22:07

Powered by Tencent X3.4

© 2013-2024 Tencent

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