2 Questions

[Jop]

I know how to get the filesize of a file, but couldn't figure out how to get the filesize of a dir.. anyone?

and second..
Is it possible to stop all active tasks your program is doing (finding files in directories) when pressing a cancel button? (i know this one sounds stupid)

Thanks in advance..

[Iain17]

1. Loop through every file in the directory and add the total.

stFileList = dir$("c:\myDir\*.*")

do while stFileList <> ""
  lSize = lSize + filelen(stfilelist)
  stfilelist = dir
loop

2. You will need to add a exit clause to the function. E.g a boolean. When the user clicks the cancel button, set the boolean = true.

Priavte Sub cmdCancel_Click()
  blCancel = True
End Sub

Priavte Sub myLoop()

  stFileList = dir$("c:\myDir\*.*")
 
  do while (stFileList <> "") and (blcancel = False)
    lSize = lSize + filelen(stfilelist)
    stfilelist = dir
    doevents
  loop

end sub

Check out either of the links:

http://www.planet-source-code.com/vb...txtCodeId=4716

http://www.planet-source-code.com/vb...txtCodeId=7274