关于查询文件夹是否存在并新建的问题

fcode

md 就是创建文件夹，这是windows命令行的一个命令（而不是fortran，fortran只是调用它）
md 的意思是 make directory

而 cd 就是切换文件夹（也叫目录），同样是windows命令行的内容。
cd 的意思是 change current directory

[Fortran] 纯文本查看 复制代码

program main
  implicit none
  character(len=80) :: filename
  integer :: i,n
  logical :: isExist
  i = 1
  Do
    write(filename,'(i9)') i
    filename="scalar"//trim(adjustl(filename))//".txt"
    inquire(directory=filename,exist=isExist)    
    if (.not.isExist) then
      !call system('touch '//filename) !!!创建文件
      call system('mkdir '//filename) !!!创建文件夹
      exit
    endif
    i=i+1
  End Do  
end program main