Re: getting folder size

[System64 Development <64xcode@xxxxxxxxx>]

sorry, I forgot to put the DirSizefunction

Public Function DirSize(sDir As String, bSymbolic As Boolean) As Long

  Dim a As String[]
  Dim f As String
  Dim z As Long

  a = ScanFiles(sDir,,,, True)

  For Each f In a
    z = z + Stat2(f)["size"]
  Next

  Return z

End

Best regards.

Martin.