Review for Wolfram MathWorld by Tiger19
Rated 3 out of 5 stars
Festplatten Report:
/*
Erstellen Sie ein WSH-Script namens lwreport.js,
das im aktuellen Verzeichnis eine csv-Datei lwreport.csv mit Infos
über alle vorhandenen Laufwerke füllt.
Der Name der Datei soll als Parameter übergeben werden.
Die erste Zeile der Datei enthält entsprechende Spaltenüberschriften.
Die Tabelle soll dann folgende Informationen umfassen:
- den Laufwerksbuchstaben,
- die Art des Laufwerks,
- die Art des Filesystems,
- die Seriennummer sowie
- den freien Speicherplatz in GB mit einer Nachkommastelle
*/
var FsObj = WScript.CreateObject("Scripting.FileSystemObject");
var pruef = new Enumerator(FsObj.Drives);
var argsObj = WScript.Arguments;
var FileName = argsObj.item(0);
var FileObj, DateiStream;
var ergebnis1;
//Datei und Überschrift erzeugen:
if ( FsObj.FileExists(FileName))
{
FileObj = FsObj.GetFile(FileName);
DateiStream = FileObj.OpenAsTextStream(8);
}
else
{
DateiStream = FsObj.CreateTextFile(FileName, false, false);
// Hinweis: CreateTextFile enthält ein implizites Getfile mit
// OpenAsTextStream, so dass sofort ein Stream verfügbar ist.
}
DateiStream.WriteLine("Laufwerksbuchstabe: Art des Laufwerks: Dateisystemtyp: Nummer des Mediums: Freier Speicherplatz in GB: ");
while (!pruef.atEnd())
{
if (pruef.item().DriveType != 4 && pruef.item().DriveType != 1)
{
var DObj = pruef.item();
WScript.Echo("Laufwerksbuchstabe: " + DObj.DriveLetter); // Schreibt zum Vergleich auf stdout!
WScript.Echo("Art des Laufwerks: " + DObj.DriveType);
WScript.Echo("Dateisystemtyp: "+ DObj.FileSystem);
WScript.Echo("Nummer des Mediums: " + DObj.SerialNumber);
WScript.Echo("Freier Speicherplatz in Byte: " + DObj.FreeSpace);
if (DObj.FreeSpace > 1024)
{
ergebnis1 = DObj.FreeSpace / 1024/1024/1024;
var ergebnis2 = ergebnis1 * 10;
var ergebnis3 = Math.round(ergebnis2);
var ergebnis4 = ergebnis3 / 10;
WScript.Echo("Freier Speicherplatz in GB: " + ergebnis4);
}
//In die Datei schreiben:
DateiStream.WriteLine(DObj.DriveLetter+";"+DObj.DriveType+";"+DObj.FileSystem+";"+DObj.SerialNumber+";"+ergebnis4);
}
else
{
WScript.Echo("Keine CD oder Diskette im Laufwerk!");
}
pruef.moveNext();
}
DateiStream.Close();
To create your own collections, you must have a Mozilla Add-ons account.