Benvenuto in Thunderbird Add-ons.
Aggiungi nuove funzionalità e stili per rendere Thunderbird veramente tuo.
ChiudiRecensione di Tiger19 per Wolfram MathWorld
Assegnate 3 su 5 stelle
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
//.................
}
Per creare una tua raccolta devi avere un account per Mozilla Add-ons.