| 查看: 658 | 回复: 5 | |||
| 当前主题已经存档。 | |||
[交流]
【求助】Fortran程序中如何实现建立新目录
|
|||
|
我想请问各位大侠： 在C程序中有个mkdir（"./tmper'，S_IRWXU）来建立新目录，在fortran程序中如何实现这样的过程？ 谢谢 [ Last edited by lei0736 on 2008-11-4 at 22:06 ] |
回复此楼» 猜你喜欢
26调剂 086003
已经有6人回复
-
一志愿上海海洋大学083200食品学硕，求调剂，接受其他专业083200
已经有4人回复
-
材料化工306分找合适调剂
已经有4人回复
-
292分，材料与化工，申请调剂
已经有24人回复
-
数一英一274机械调剂
已经有5人回复
-
材料专硕322分
已经有4人回复
-
一志愿211，化学学硕，310分，本科重点双非，求调剂
已经有3人回复
-
一志愿安徽某211 0703化学总分339求调剂
已经有3人回复
-
本9一志愿2 0854低分专硕286求调剂
已经有6人回复
-
求生物学专业调剂-332分
已经有3人回复
grant.tgb
木虫 (小有名气)
- 应助: 1 (幼儿园)
- 金币: 2734.1
- 帖子: 170
- 在线: 41.1小时
- 虫号: 425534
- 注册: 2007-07-27
- 性别: GG
- 专业: 金属材料的力学行为
2楼2008-11-05 16:44:41
Hellen210.46
金虫 (正式写手)
- 应助: 1 (幼儿园)
- 金币: 577.6
- 红花: 1
- 帖子: 311
- 在线: 53.8小时
- 虫号: 166445
- 注册: 2006-01-14
- 性别: MM
- 专业: 凝聚态物性 II ：电子结构
3楼2008-11-05 18:38:20
grant.tgb
木虫 (小有名气)
- 应助: 1 (幼儿园)
- 金币: 2734.1
- 帖子: 170
- 在线: 41.1小时
- 虫号: 425534
- 注册: 2007-07-27
- 性别: GG
- 专业: 金属材料的力学行为
干脆给你编段程序吧
★ ★ ★ ★ ★
lei0736(金币+5,VIP+0):谢谢
lei0736(金币+5,VIP+0):谢谢
|
program NewFolderCreating USE DFPORT integer istatus1,istatus2,istatus3,istatus4 character*256 NewFolderName1,NewFolderName2 istatus1=CHDIR('E:\xxx') ! 定位到e盘的xxx目录，或换成你想创建文件夹的目录 Read(*,*) NewFolderName1 ! 请输入一个新文件夹名称，比如yyy Read(*,* ) NewFolderName2 ! 请再输入一个新文件夹名称，比如zzz，仅为了举例而已，按此法可一层一层创建目录 istatus2=System("Md "//Trim(NewFolderName1)) !建第一层文件夹 istatus3=CHDIR(Trim(NewFolderName1)) ! 定位到E:\xxx\yyy istatus4=System("Md "//Trim(NewFolderName2)) !在E:\xxx\yyy目录下建第二层文件夹 end |
4楼2008-11-05 21:47:23
quantumfang
至尊木虫 (职业作家)
小木虫中医研究院院长
- 应助: 0 (幼儿园)
- 金币: 31419.4
- 红花: 2
- 帖子: 3067
- 在线: 57.3小时
- 虫号: 299070
- 注册: 2006-11-20
- 性别: GG
- 专业: 凝聚态物性 II ：电子结构
5楼2008-11-05 22:06:23
6楼2008-11-11 19:47:10
