Count Files

[PcExpert]

Hi,

Is it possible to count the number of files that are in a specified directory?

Thanks!

[p)(d]

$search=FilefindFirstFile("C:\dir\*.txt")

while 1

$file = FileFindNextFile($search)

if @error then exitloop

$countfiles += 1

wend

fileclose($search)

this counts all *.txt in c:\dir

[Uten]

No offence but this is a kind of hilarious question from someone with your kind of nick

Anyhow, modify the sample provided in the help file for FileFindNextFile and you should be set. If you want to filter out the folders you could do so by checking the result from FileGetAttrib.

Happy coding

[Don N]

;change the working directory
FileChangeDir( ".\temp" )

;get the first file
$search = FileFindFirstFile( "*.*" )

If $search = -1 Then
    MsgBox( 0, "ERROR!", "There are no files or could not connect to remote directory" )
EndIf

Dim $fileCount = 0

While 1
    $file = FileFindNextFile( $search )
    
    If @error Then
        ExitLoop
    EndIf
    If StringInStr( FileGetAttrib( $file ), "D" ) == 0 Then
        $fileCount += 1
    EndIf
WEnd

MsgBox( 0, "File Count", "Found " & $fileCount & " files." )

[Valuater]

with 219 posts, i would think this was an easy one ????

#Include <File.au3>

$FileList=_FileListToArray(@DesktopDir, "*.*", 1)
If (Not IsArray($FileList)) and (@Error=1) Then
    MsgBox (0,"","No Files\Folders Found.")
    Exit
EndIf

MsgBox(64,"File Count", "Files in folder = " & $FileList[0])

8)

[blademonkey]

with 219 posts, i would think this was an easy one ????

#Include <File.au3>

$FileList=_FileListToArray(@DesktopDir, "*.*", 1)
If (Not IsArray($FileList)) and (@Error=1) Then
    MsgBox (0,"","No Files\Folders Found.")
    Exit
EndIf

MsgBox(64,"File Count", "Files in folder = " & $FileList[0])

8)

Quantity of Posts <> Knowledge of Autoit

[Valuater]

Quantity of Posts <> Knowledge of Autoit

Quantity of Posts = Knowledge of Autoit's Help File

8)

[/dev/null]

Hi,

Is it possible to count the number of files that are in a specified directory?

Thanks!

Look at the extended mode of DirGetSize().

$retArray = DirGetSize("C:\",1)

$nFiles = $retArray[1]
$nDirs = $retArray[2]

BTW: Think about error checking!! See help file sample.

Cheers

Kurt

[Uten]

Hi @Kurt,

Nice pointer to the DirGetSize.

I did not know that one, so I guess I'm still learning