$iSize = DirGetSize(@WindowsDir)
MsgBox(4096, "", "Размер (Мегабайт):" & Round($iSize / 1024 / 1024))

$iSize = DirGetSize(@WindowsDir, 2)
MsgBox(4096, "", "Размер (Мегабайт):" & Round($iSize / 1024 / 1024))

$hTimer = TimerInit()
$aSize = DirGetSize("\\10.0.0.1\h$", 1)
$iDiff = Round(TimerDiff($hTimer) / 1000, 2) ; время в секундах
If IsArray($aSize) Then
	MsgBox(4096, "Результат", _
			"Размер (Байт): " & $aSize[0] & @LF & _
			"Файлов: " & $aSize[1] & @LF & _
			"Каталогов: " & $aSize[2] & @LF & _
			"Время выполнения (сек): " & $iDiff)
EndIf