code:

---

$Path = 'H:\'
$TempFile = '%TEMP%\00003.tmp'

$Lokaal = GETFILEVERSION('%WINDIR%\Explorer.exe', 'Language')
? $Lokaal
IF $Lokaal = "0413Dutch"
  $String = "bestand(en)"
ELSE
  $String = "File(s)"
ENDIF

;=== Vang de DIR info op, filter alle regels weg behalve de regels met $String (directory output)
SHELL '%COMSPEC% /C dir '+$Path+' /s /a-d /-c | find "'+$String+'" >'+$TempFile

IF OPEN(1, $TempFile)
  $Line = READLINE(1)
  WHILE $Line<>'' AND @ERROR=0
    $PrevLine=$Line
    $Line = READLINE(1)
  LOOP
  $retcode = CLOSE(1)
  DEL $TempFile

  $array=split($line,' ')
  $files=$array[0]
  $bytes=val($array[3])
  $megabytes=$bytes/1048576
ENDIF

---