bitslave

Protokoll von Batchaktionen

Guten Tag zusammen

Frage:

Ist es eigentlich möglich jede Art von Batchvorgängen (Beisp. mit "XCOPY"
Daten kopieren) zu protokollieren?

Wenn ja, welchen Befehlssatz muss ich in die Batch einfügen.


Danke schon mal...
Auf Facebook teilen
Auf X (Twitter) teilen
Auf Reddit teilen
Auf Linkedin teilen

Content-ID: 2836

Url: https://administrator.de/forum/protokoll-von-batchaktionen-2836.html

Ausgedruckt am: 18.05.2025 um 23:05 Uhr

hofer
hofer 27.09.2004 um 21:38:07 Uhr
Goto Top
Probiers mal mal volgender masen.

z. B.
xcopy Ordner D:\ >prot.txt

mit dem Zeichen > kannst du in ein Textfile schreiben.

Gruss hofer
Randyman
Randyman 27.09.2004 um 22:15:08 Uhr
Goto Top
Hi,

und mit 2>>&1 bekommst Du gleich noch ausgegebene Meldungen (z.B. Fehlermeldung o.ä.).

Beispiel: xcopy blabla c:\ >protokoll.log 2 >>&1

Damit siehst in Protokoll.log alle Vorgänge die sonst am Bildschirm ausgegeben werden.

Übrigens kannst Du immer mit >> an eine Datei anhängen; > überschreibt.

cu
Randy
dai
dai 05.10.2004 um 12:10:30 Uhr
Goto Top
Hi,

und mit 2>>&1 bekommst Du gleich
noch ausgegebene Meldungen (z.B.
Fehlermeldung o.ä.).

Beispiel: xcopy blabla c:\ >protokoll.log
2 >>&1

Damit siehst in Protokoll.log alle
Vorgänge die sonst am Bildschirm
ausgegeben werden.

Übrigens kannst Du immer mit >>
an eine Datei anhängen; >
überschreibt.

cu
Randy

Hiho!

oder du legst mit %Date%.txt eine Datei mit aktuellem Datum an, und lässt noch zusätzlich eine Funktion laufen, die Dateien älter X Tage löscht.... so mach ich es ^^

Auszug aus meinem VB-Script mit der "delete_logs"-Funktion:

' ###########################################################
' DIESE FUNKTION LÖSCHT DIE LOG-FILES NACH X TAGEN !!!!!!!!!!!!!
' ###########################################################
' ANFANG Eigene Einstellungen
Verzeichnis = "E:\Daten_Backup\!logs" ' Hier wird gelöscht!
Aufheben = 30 ' Anzahl der Tage
' ENDE Eigene Einstellungen
Set fso = CreateObject("Scripting.FileSystemObject")
Set ordner = fso.GetFolder(Verzeichnis)
heute = Date()
DeleteInFolder(ordner)

Sub DeleteInFolder(ordner)
Set dateien = ordner.Files
' Alle Dateien in diesem Ordner abklappern
For Each datei In dateien
If datei.DateLastModified < (heute - Aufheben) Then
datei.Delete
End If
Next
Set untere = ordner.SubFolders
'Unterordner abklappern, DeleteInFolder rekursiv aufrufen
For Each unter In untere
DeleteInFolder(unter)
Next
End Sub

Viel Spaß beim "batchen" ;O)