Rated 3 out of 5 stars

by Tiger19 on Aug. 21, 2010 ·

generate-csv.js :

/*
Aufgabe : generate-csv
*/

var FsObj = WScript.CreateObject("Scripting.FileSystemObject");
var FileObj = FsObj.GetFile("G:\\ben\\Skripte\\anwend.log");
var st = FileObj.OpenAsTextStream(1);

WScript.Echo(st.ReadLine());

while (!st.AtEndOfStream)
{
var Buchstabe = (st.Read(1));

var FsObj = WScript.CreateObject("Scripting.FileSystemObject");
var FileName = "C:\\temp\\error.log";
var FileName1 = "C:\\temp\\warn.log";
var FileName2 = "C:\\temp\\info.log";
var FileObj, DateiStream;
//Fehler:
if (Buchstabe == "F") {

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("PC01-11 " + "\t" + Buchstabe + st.ReadLine());
DateiStream.Close();
}
//Warnung
if (Buchstabe == "W") {

if ( FsObj.FileExists(FileName1)) {
FileObj = FsObj.GetFile(FileName1);
DateiStream = FileObj.OpenAsTextStream(8);
}
else {
DateiStream = FsObj.CreateTextFile(FileName1, false, false);
// Hinweis: CreateTextFile enthält ein implizites Getfile mit
// OpenAsTextStream, so dass sofort ein Stream verfügbar ist.
}

DateiStream.WriteLine("PC01-11 " + "\t" + Buchstabe + st.ReadLine());
DateiStream.Close();
}
//Info
//.................
}

Rated 3 out of 5 stars

by Tiger19 on Aug. 21, 2010 ·

gruppen-csv:

var FsObj = WScript.CreateObject("Scripting.FileSystemObject");
var FileObj = FsObj.GetFile("G:\\temp\\gruppen.txt");
var st = FileObj.OpenAsTextStream(1);

WScript.Echo(st.ReadLine());

while (!st.AtEndOfStream)
{
var FsObj = WScript.CreateObject("Scripting.FileSystemObject");
var FileName = "G:\\temp\\gruppe.csv";
var FileObj, DateiStream;
st.Skip(3);
var Gruppe = (st.Read(6));
var Typ = (st.Read(18));
var Anzeige = (st.Read(8));

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("Gruppennamen: Typ: Anzeigenamen: ");
DateiStream.WriteLine("\t" + Gruppe + ";" + Typ + ";" + Anzeige + st.ReadLine());
DateiStream.Close();
}

Rated 3 out of 5 stars

by Tiger19 on Aug. 21, 2010 ·

fileservice:

var file1 = WScript.CreateObject("Scripting.FileSystemObject");
var file3 = WScript.CreateObject("Scripting.FileSystemObject");
var file2 = file1.GetFile("G:\\temp\\a.txt");
var file4 = file3.GetFile("G:\\temp\\b.txt");
file2.Name;
file2.DateLastModified;
WScript.Echo("Auf die Datei " + file2.Name + "wurde am " + file2.DateLastModified + "zuletzt zugeriffen.");
WScript.Echo("Auf die Datei " + file4.Name + "wurde am " + file4.DateLastModified + "zuletzt zugeriffen.");

Rated 3 out of 5 stars

by Tiger19 on Aug. 21, 2010 ·

leer.js :

var argObj = WScript.Arguments;

if (argObj.length == 0) {
WScript.Echo("Bitte vollstaendige Pfadangabe!");
}
else {

var Verz = argObj.item(0);
var FsObj = WScript.CreateObject("Scripting.FileSystemObject");

if (FsObj.FolderExists(Verz)) {
var FolderObj = FsObj.GetFolder(Verz);

if (FolderObj.Size == 0) {
WScript.Echo("Das Verzeichnis ist leer!");
}
else {

var File = new Enumerator(FolderObj.files);
WScript.Echo("Das Verzeichnis existiert!");
WScript.Echo("Name des Ordners: " + FolderObj.Name);

for (; !File.atEnd(); File.moveNext()) {

WScript.Echo("Name der Dateien: " + File.item().Name);
}
}
}
else {
WScript.Echo("Das Verzeichnis existiert nicht!");
}
}

Rated 3 out of 5 stars

by Tiger19 on Aug. 21, 2010 ·

aktuell.js:

var argObj = WScript.Arguments;
var FsObj = WScript.CreateObject("Scripting.FileSystemObject");
var ordner = FsObj.GetFolder(".");
var EnumObj = new Enumerator(ordner.Files); //Enumerator über alle Dateien erstellen.
EnumObj.moveFirst();
var wert = '';

if (argObj.item(0) == "txt")
{
while(EnumObj.atEnd() == false)
{
wert = EnumObj.item() + " "; //Vergleich der Dateien durch Stringvergleich
var pfadteile = wert.split(".");
var filename = pfadteile[pfadteile.length-1];
filename = filename.substr(0,3)

if (filename=="txt")
{
WScript.Echo("Die alle .txt Dateien: "+wert+"\n");
}

EnumObj.moveNext(); //Dateien-Auflistung aufzählen.
}
}

Rated 3 out of 5 stars

by Tiger19 on Aug. 21, 2010 ·

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();

Rated 3 out of 5 stars

by Tiger19 on Aug. 21, 2010 ·

Argument: Bool:

/*
Entwickeln Sie eine JScript-Function, die die Argumentliste des Scripts nach Optionen durchsucht.
Optionen werden bei Windows-Programmen oft mit einem vorangestellten Slash gekennzeichnet
(Bsp.: dir /p) und bei Unix mit einem Dash (Bsp.: ls -l) oder
in der langen Version mit zwei Dashes (Bsp.: who --count).
Dabei ist zu unterscheiden zwischen Script-Optionen,
die nur vorhanden sein können (oder auch nicht; true/false) und
solchen, die nach einem Schlüsselwort oder
Schlüsselzeichen einen Wert erwarten (Bsp.: cut -c1).
*/

// Dieses Skript durchsucht die Argumentliste des Scripts nach der Option die mitgegeben wurden.
var argsobj = WScript.Arguments //Ist ein Collection ähnlich Array!
var i;

for (i = 0; i < argsobj.length; i++) //Durchläuft die Argumentenliste.
{
if (CBool(argsobj(i)))
{
WScript.Echo("Argument ist: " + argsobj(i));
}
else
{
WScript.Echo("kein Argument vorhanden!");
}
}

function CBool(argobj) //Funktion boolean prüft, ob an der ersten Stelle ein / vorranden ist.
{
if (argobj.search("/") == 0)
{
return true;
}
else
{
return false;
}
}

Rated 3 out of 5 stars

by Tiger19 on Aug. 21, 2010 ·

kgw Ordner:

// Dieses Skript zeigt alle Ordner im aktuellem Verzeichnis die mit dem Namen kgw beginnen.

var FsObj = WScript.CreateObject("Scripting.FileSystemObject");
var ordner = FsObj.GetFolder(".");
var EnumObj = new Enumerator(ordner.SubFolders); //Enumerator über alle Ordner erstellen.
EnumObj.moveFirst();
var wert = '';
while(EnumObj.atEnd() == false)
{
wert = EnumObj.item() + " "; //Vergleich der Ordner durch Stringvergleich
var pfadteile = wert.split("\\");
var ordnername = pfadteile[pfadteile.length-1];
ordnername = ordnername.substr(0,3)

if (ordnername=="kgw")
{
WScript.Echo("Die kgw Ordner: "+wert+"\n");
}

EnumObj.moveNext(); //Ordner-Auflistung aufzählen.
}


/*
//Ein Dialogfenster öffnet sich und
//durch die Bestätigug des OK Buttons werden alle kgw Ordner angezeigt.
//Die drei Ordner kgw werden angezeigt, das sie vorhanden sind.
*/

Rated 3 out of 5 stars

by Tiger19 on Aug. 21, 2010 ·

platz.js:

/*
Schreiben Sie ein Script platz.js, das als Argument die Optionen /f oder /w übergeben bekommt.
* Bei Aufruf platz.js /f soll der zur Verfügung stehende Plattenplatz der lokalen Platten
ausgegeben werden (das Format bestimmen Sie selbst).
* Bei Aufruf platz.js /w soll das für die eingelegten Wechselmedien erfolgen.
* Wenn keine der Optionen mitgegeben werden, wird der Gesamtplatz berechnet.
*/

var argObj = WScript.Arguments;
var FsObj = WScript.CreateObject("Scripting.FileSystemObject");
var pruef = new Enumerator(FsObj.Drives);


if (argObj.length == 0)
{
while (!pruef.atEnd())
{
if (pruef.item().DriveType != 4)
{
WScript.Echo("Aktives Laufwerk: " + pruef.item().DriveLetter)
WScript.Echo("Größe in Byte: " + pruef.item().TotalSize);
}
else
{
WScript.Echo("CD Laufwerk hat keine Größe (keine CD im Laufwerk)");
}
pruef.moveNext();
}
}
else if (argObj.item(0) == "/w" || argObj.item(0) == "/W")
{
WScript.Echo("Wechseldatenträger");
while (!pruef.atEnd())
{
if (pruef.item().DriveType ==1)
{
WScript.Echo("Aktives Laufwerk: " + pruef.item().DriveLetter);
WScript.Echo("Größe in Byte: " + pruef.item().TotalSize);
}
pruef.moveNext();
}
}
else if (argObj.item(0) == "/f" || argObj.item(0) == "/F")
{
WScript.Echo("Festplatte");
while (!pruef.atEnd())
{
if (pruef.item().DriveType ==2)
{
WScript.Echo("Aktives Laufwerk: " + pruef.item().DriveLetter);
WScript.Echo("Größe in Byte: " + pruef.item().TotalSize);
}
pruef.moveNext();
}
}