corpse2001
Goto Top

EMail aus Eventlog-Eintrag autom. erzeugen

Hallo,

ich habe hier mehrere Windows 2003 R2 Server auf dem z.B. auch ein RAS-Server läuft. Ich möchte nun das die Einwahl protokolliert wird und die Einträge aus dem Eventlog mit Quelle RemoteAccess in eine eMail umgewandelt werden und in meinem eMail-System (Tobit David.fx 2011) auftauschen.
Hat jemand eine Idee wie ich sowas realisieren kann?

MfG corpse2001

Content-ID: 165728

Url: https://administrator.de/forum/email-aus-eventlog-eintrag-autom-erzeugen-165728.html

Ausgedruckt am: 23.12.2024 um 03:12 Uhr

Dani
Dani 05.05.2011 um 16:41:18 Uhr
Goto Top
Hi corpse2001,
sowas in der Art hatten wir auch am Laufen. Das Ganze besteht aus folgenden Befehlen / Dateien.

1) Zuerst musst du einen Event-Trigger anlegen:
eventtriggers /create /T Information /L System /EID 20200 /SO RemoteAccess /tr VPN-Einwahl /tk "C:\Scripte\vpn_einwahl_mail\mail_send.bat"  
Die Bedeutung der einzlenen Parameter entnimmst du der Hilfe.

2) eventlog.vbs:
' Es werden alle Events mit der ID "20200" und aus dem Bereich "System" ausgelesen.  
' Mit "Exit For" wird sichergestellt, dass die Schleife nur einmal durchläuft.  
strComputer = "."  

Set objWMIService = GetObject("winmgmts:" & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")  
Set colLoggedEvents = objWMIService.ExecQuery ("Select * from Win32_NTLogEvent Where LogFile = 'System' and EventCode ='20200'")  
For Each objEvent in colLoggedEvents
   Wscript.Echo objEvent.Message
 Exit For
Next
Diese VBS-Datei liest immer die aktuelleste Meldung dazu aus. Evtl. Eventcode anpassen...

3) Die Batchdatei in der Empfänger, Betreff, etc... steht:
@echo off

set sender=service@xxxx.de
set empf=administrator@xxxx.de

for /f "skip=3 tokens=6,7,10,11 delims= " %%a in ('cscript "C:\Scripte\vpn_einwahl_mail\eventlog.vbs"') do (  
	echo %%a: %%b > "%temp%\mailtext.txt"  
	echo %%c:  %%d >> "%temp%\mailtext.txt"  
)

bmail -s emailserver -t %empf% -f %sender% -a "VPN-Einwahl" -h -c -m "c:\temp\mailtext.txt"  

del "%temp%\mailtext.txt"  
Der E-Mailversand haben wir über bmail.exe realisiert und die IP-Adresse im Exchange als Relay freigeschalten.


Grüße,
Dani
corpse2001
corpse2001 06.05.2011 um 11:52:16 Uhr
Goto Top
Hallo Dani,

das ist henau das richtige. Danke für die Hilfe.

MfG
corpse2001