macgarnigle 10 Geschrieben 18. Dezember 2008 Melden Geschrieben 18. Dezember 2008 Hallo zusammen, ich muss, um das Datenvolumen für ein Backup abschätzen zu können, bestimmte (aber immer gleiche) Verzeichnisse auf 720 Servern (W2K3) abfragen. Es soll also nicht der benutzte Diskspace angezeigt werden, sondern nur die Grösse der gegebenen Verzeichnisse per Server. Kennt ihr ein Tool welches es erlaubt das automatisiert und remote zu machen (also so dass ich nur die Servernamen und die Verzeichnisse angebe und das läuft dann selbständig durch)? Vielen Dank! Cheers, macgarnigle
Cybquest 36 Geschrieben 18. Dezember 2008 Melden Geschrieben 18. Dezember 2008 Hier mal auf die Schnelle was in VBScript: strMachineFile="C:\UNCPath.txt" strCSVFile="C:\Foldersizes.csv" Set objFSO = CreateObject("Scripting.FileSystemObject") Const ForReading = 1, ForWriting = 2 On Error resume next if objFSO.FileExists(strCSVFile) then if MsgBox("Datei existiert bereits! Überschreiben?",vbYesNo) = vbYes then varOK = true else varOK = false if varOK then Set txtStreamOut = objFSO.OpenTextFile(strCSVFile,ForWriting) end if else varOK = true Set txtStreamOut = objFSO.CreateTextFile(strCSVFile,ForWriting) end if ok = (Err.number = 0) if (ok and varOK) then txtStreamOut.WriteLine "UNC-Path;Foldersize" Set fin = objFSO.OpenTextFile(strMachineFile, ForReading) do while not fin.AtEndOfStream strUNCPath = fin.readLine() Set objFolder = objFSO.GetFolder(strUNCPath) strLine= strUNCPath & ";" & objFolder.Size txtStreamOut.WriteLine strLine loop MsgBox "Fertig!" & chr(13) & "CSV-Datei: " & strCSVFile else if not ok then MsgBox "Datei " & strCSVFile & " konnte nicht erzeugt/geöffnet werden!" end if Ggf. Pfade bzw. Dateinamen ganz oben einfach entspr. anpassen. In "UNCPath.txt" stehen untereinander einfach die Pfade (z.B. \\server\c$\temp) Wenn es den Pfad nicht gibt, wird einfach nichts weggeschrieben. Voraussetzung ist natürlich, dass man sich nicht vorher noch authentifizieren muss. Sonst müsste man vorher ein IPC-Mapping o.ä. machen. Gruß, Frank
NilsK 3.046 Geschrieben 19. Dezember 2008 Melden Geschrieben 19. Dezember 2008 Moin, Tools4Net - Skripts and .NET Tools for Administration Gruß, Nils
Empfohlene Beiträge
Erstelle ein Benutzerkonto oder melde dich an, um zu kommentieren
Du musst ein Benutzerkonto haben, um einen Kommentar verfassen zu können
Benutzerkonto erstellen
Neues Benutzerkonto für unsere Community erstellen. Es ist einfach!
Neues Benutzerkonto erstellenAnmelden
Du hast bereits ein Benutzerkonto? Melde dich hier an.
Jetzt anmelden