razc 发表于 2014-5-27 17:49:48

如何遍历指定目录下的所有文件之后找出大于5MB的文件

$search = FileFindFirstFile("c:\11\*.*")

While 1
    $file = FileFindNextFile($search)
    If @error Then ExitLoop
WEnd
FileClose($search)

比如c:\11 里面有   10个文件   其中某个文件大小是高于5MB的,其他都是小于5MB

如何把高于5MB 的给找出来,再把低于5MB的也找出来,以为我要对大于5MB文件进行一种处理,小于5MB的进行另外一种处理!

shqf 发表于 2014-5-27 18:05:54

用FileGetSize()获得文件大小,单位KB,再除以1024即为MB。

razc 发表于 2014-5-27 19:28:05

回复 2# shqf

能不能把这个大于5MB的文件名给获取到?   FileGetSize   只能返回文件大小啊~

f4李文杨 发表于 2014-5-27 21:14:36

FindAllFile("F:\F4")

Func FindAllFile($sDir) ;删除桌面图标
        Local $hSearch = FileFindFirstFile($sDir & "\*.*")
        ; 检查搜索是否成功
        If $hSearch = -1 Then Return
        While 1
                Local $sFile = FileFindNextFile($hSearch)
                If @error Then ExitLoop
                If int(FileGetSize($sDir & "\" & $sFile) / 1024 / 1024) >= 50 Then
                        MsgBox(0, $sFile, "大或等50M")
                Else
                        MsgBox(0, $sFile, "小50M")
                EndIf
        WEnd
        FileClose($hSearch)
EndFunc

这样的效果看有没有达到你的效果!!{:face (356):}
上面的遍历 先前都有人搞过了!应该不难的朋友!!

razc 发表于 2014-5-28 00:20:55

回复 4# f4李文杨


    热泪盈眶 谢谢啊~

zxhou1 发表于 2014-5-28 08:47:38

学习了,好牛

zxhou1 发表于 2014-5-29 15:53:22

学习了,厉害
页: [1]
查看完整版本: 如何遍历指定目录下的所有文件之后找出大于5MB的文件