iApp递归之文件操作

首先创建一个lly.myu的模块文件，然后复制下列代码就行了。

删除文件夹模块:

//删除目录下所有文件
fn delfiles(path)
fi(path,e)
f(!e)
{
  fd(path,b)
}else{
  fl(path,files)
  for(dir;files)
  {
    ss(path+"/"+dir,newpath)
    fn lly.delfiles(newpath)
    fi(newpath,dire)
    f(dire)
    {
      fd(newpath,b)
    }
  }
}
end fn

获取文件夹里的所有文件大小模块:

//获取目录下所有文件大小
fn dirfilesize(path)
fl(path,files)
for(dir;files)
{
  ss(path+"/"+dir,newpath)
  fi(newpath,e)
  f(e)
  {
    fn lly.dirfilesize(newpath)
    s(ss.ndir+1,ss.ndir)
  }else{
    fs(newpath,size)
    s(ss.size+size,ss.size)
    s(ss.nfile+1,ss.nfile)
  }
}
end fn

mian.iyu载入事件代码:

//要操作的文件夹
fdir("%baidu",path)
//获取文件夹的文件大小以及文件数量
fn lly.dirfilesize(path)
//字节长度转kb
s2(ss.size/1024,kb)
syso(kb+"kb")
//kb转mb
s2(kb/1024,mb)
syso(mb+"mb")
//mb转GB
s2(mb/1024,gb)
syso(gb+"G")
syso("文件夹数:"+ss.ndir)
syso("文件数:"+ss.nfile)
//删除path目录下的全部文件和文件夹
fn lly.delfiles(path)
//因为路径里有文件和文件夹就不能删除当前目录所以最后在删除path
fd(path,b)