Hallo zusammen,
habe gerade irgendwie eine (gedankliche) Blockade, hoffe aber hier geholfen zu bekommen.
Ich will/muss auf diversen Servern die jeweiligen Größen der vorhandenen Directories ermitteln.
Die Serven haben sowohl physikalische LW als auch logische (LUN's).
Nach Mappen des jeweilen Serverlaufwerkes (DriveMapAdd), erzeuge ich mittels _FileListToArray ein Array mit den vorhanden Directorys.
Soweit - so gut
Der nächste Schritt - denke ich zumindest - ist ein
For $i = 1 To $aFileList[0]$iFreeSpace = DriveSpaceFree($aFileList[i])
$aDirSize = $iFreeSpace$iFreeSpace <----- und das soll jetzt auch noch der Dir Name ($aFileList[i]) mit ins Array geschrieben werden
Next
und jetzt hängt es bei mir. Folgendes sollte passieren:
Es soll wieder ein Array erzegut werden in dem zum einen der Dir Name (also $aFileList[i]) und zum zweiten die Grösse (also $iFreeSpace) geschrieben wird.
Zum Ende soll dann dieses Array (_ArrayDisplay()) angezeigt werden.
Hier mein Versuch soweit:
#include <Array.au3>
#include <File.au3>
#include <MsgBoxConstants.au3>
DriveMapAdd("M:", "\\XXXXXX\D$\123", $DMA_DEFAULT, "blablabla", "blub") ;Mapping networkdrives
cdeDir()
For $i = 1 To $aFileList[0]
$iFreeSpace = DriveSpaceFree($aFileList[i]) ;compute dirsize
$aDirSize = $iFreeSpace
Next
Func cdeDir()
Local $aFileList = _FileListToArray("M:\", "*", 2, "True") ;List folders only
If @error = 1 Then
MsgBox($MB_SYSTEMMODAL, "", "Path was invalid.")
Exit
EndIf
If @error = 4 Then
MsgBox($MB_SYSTEMMODAL, "", "No dir(s) were found.")
Exit
EndIf
_ArrayDisplay($aFileList, "$aFileList") ;List all the folders
EndFunc ;==>cdeDir
Alles anzeigen
Danke schon einmal im voraus für die Tips/ Hilfe
Gruss
ugt100