Script richtig beenden (Popup schliessen)
Hallo
ich habe mir ein Script geschrieben und es funktioniert auch.
Es wird im laufenden Prozess einer Batch-Datei aufgerufen.
Nun habe ich folgendes Problem:
Die Batch-Datei läuft nicht weiter solange die "Bestätigungsmeldung" des VB-Scripts nicht mit "OK" bestätigt wird.
Da das ganze aber automatis ch nachts ablaufen soll muß die Meldung also irgendwie bestätigt werden oder es darf erst gar keine kommen.
Hier das Script:
Code:
' Dieser Code archiviert ein Ereignisprotokoll in der angegebenen Datei.
' ------ Skript-Konfiguration ------
strLog = "application"
strdate = date ' z.B. Anwendung
strBackupFile = "\\stratos\logs\tokyo\application\app_" & year(strdate) & right("0" & month(strdate),2) & right("0" & day(strdate),2) & ".evt" ' z.B. c:\app_back.evt ' z.B. tokyo (verwenden Sie "." für den lokalen Server)
strServer = "."
' ------ ENDE DER KONFIGURATION ------
set objWMI = GetObject(_
"winmgmts:{impersonationLevel=impersonate,(Backup)}!\\" & _
strServer & "\root\cimv2")
set colLogs = objWMI.ExecQuery("Select * from Win32_NTEventlogFile Where " & _
" Logfilename = '" & strLog & "'")
if colLogs.Count <> 1 then
WScript.Echo "Fataler Fehler. Anzahl gefundener Ereignisprotokolle: " & colLogs.Count
WScript.Quit
end if
for each objLog in colLogs
objLog.BackupEventlog strBackupFile
WScript.Echo strLog & " gesichert in " & strBackupFile
next
Code:
Kann mir jemand die letzten Zeilen so ändern, das keine Meldung mehr kommt óder die Meldung automatisch bestätigt wird
Würde mir sehr helfen
Danke
eismanhobbit
ich habe mir ein Script geschrieben und es funktioniert auch.
Es wird im laufenden Prozess einer Batch-Datei aufgerufen.
Nun habe ich folgendes Problem:
Die Batch-Datei läuft nicht weiter solange die "Bestätigungsmeldung" des VB-Scripts nicht mit "OK" bestätigt wird.
Da das ganze aber automatis ch nachts ablaufen soll muß die Meldung also irgendwie bestätigt werden oder es darf erst gar keine kommen.
Hier das Script:
Code:
' Dieser Code archiviert ein Ereignisprotokoll in der angegebenen Datei.
' ------ Skript-Konfiguration ------
strLog = "application"
strdate = date ' z.B. Anwendung
strBackupFile = "\\stratos\logs\tokyo\application\app_" & year(strdate) & right("0" & month(strdate),2) & right("0" & day(strdate),2) & ".evt" ' z.B. c:\app_back.evt ' z.B. tokyo (verwenden Sie "." für den lokalen Server)
strServer = "."
' ------ ENDE DER KONFIGURATION ------
set objWMI = GetObject(_
"winmgmts:{impersonationLevel=impersonate,(Backup)}!\\" & _
strServer & "\root\cimv2")
set colLogs = objWMI.ExecQuery("Select * from Win32_NTEventlogFile Where " & _
" Logfilename = '" & strLog & "'")
if colLogs.Count <> 1 then
WScript.Echo "Fataler Fehler. Anzahl gefundener Ereignisprotokolle: " & colLogs.Count
WScript.Quit
end if
for each objLog in colLogs
objLog.BackupEventlog strBackupFile
WScript.Echo strLog & " gesichert in " & strBackupFile
next
Code:
Kann mir jemand die letzten Zeilen so ändern, das keine Meldung mehr kommt óder die Meldung automatisch bestätigt wird
Würde mir sehr helfen
Danke
eismanhobbit
Bitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben
Content-ID: 82972
Url: https://administrator.de/contentid/82972
Ausgedruckt am: 22.11.2024 um 19:11 Uhr
1 Kommentar
...wir sprachen neulich darüber, dass Doppelpostings und Crossposting weder eine -Formatierung noch ein spontanes Feedback des Fragestellers bei Lösungsvorschlägen ersetzen können.
Das ist kein guter Stil, in mehreren Foren zeitgleich die identische Frage zu stellen als wäre es furchtbar dringend und vielleicht nach zwei Wochen wieder vorbeizuschauen, wer denn alles so was gepostet hat.
Bitte antworte erst mal im MCSEBoard.
Hier mach ich dicht.
Grüße
Biber
Das ist kein guter Stil, in mehreren Foren zeitgleich die identische Frage zu stellen als wäre es furchtbar dringend und vielleicht nach zwei Wochen wieder vorbeizuschauen, wer denn alles so was gepostet hat.
- Bitte probier cybquests Vorschlag aus...
WshShell.Popup "Fataler Fehler. Anzahl gefundener Ereignisprotokolle: " & colLogs.Count, 10, "Meldung", vbOKOnly
-oder-- schreib in eine Logdatei statt auf den Bildschirm
- starte das Schnipselchen ohne Änderungen, aber mit cscript.exe statt wscript.exe
- oder tipp ein einziges Mal Deine Frage selbst in eine Suchmaschine/Forumssuche ein.
Bitte antworte erst mal im MCSEBoard.
Hier mach ich dicht.
Grüße
Biber