Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

EMail aus Eventlog-Eintrag autom. erzeugen

Frage Microsoft Windows Server

Mitglied: corpse2001

corpse2001 (Level 1) - Jetzt verbinden

05.05.2011 um 16:35 Uhr, 4088 Aufrufe, 2 Kommentare

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
Mitglied: Dani
05.05.2011 um 16:41 Uhr
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:
01.
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:
01.
' Es werden alle Events mit der ID "20200" und aus dem Bereich "System" ausgelesen. 
02.
' Mit "Exit For" wird sichergestellt, dass die Schleife nur einmal durchläuft. 
03.
strComputer = "." 
04.
 
05.
Set objWMIService = GetObject("winmgmts:" & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2") 
06.
Set colLoggedEvents = objWMIService.ExecQuery ("Select * from Win32_NTLogEvent Where LogFile = 'System' and EventCode ='20200'") 
07.
For Each objEvent in colLoggedEvents 
08.
   Wscript.Echo objEvent.Message 
09.
 Exit For 
10.
Next
Diese VBS-Datei liest immer die aktuelleste Meldung dazu aus. Evtl. Eventcode anpassen...

3) Die Batchdatei in der Empfänger, Betreff, etc... steht:
01.
@echo off 
02.
 
03.
set sender=service@xxxx.de 
04.
set empf=administrator@xxxx.de 
05.
 
06.
for /f "skip=3 tokens=6,7,10,11 delims= " %%a in ('cscript "C:\Scripte\vpn_einwahl_mail\eventlog.vbs"') do ( 
07.
	echo %%a: %%b > "%temp%\mailtext.txt" 
08.
	echo %%c:  %%d >> "%temp%\mailtext.txt" 
09.
10.
 
11.
bmail -s emailserver -t %empf% -f %sender% -a "VPN-Einwahl" -h -c -m "c:\temp\mailtext.txt" 
12.
 
13.
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
Bitte warten ..
Mitglied: corpse2001
06.05.2011 um 11:52 Uhr
Hallo Dani,

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

MfG
corpse2001
Bitte warten ..
Neuester Wissensbeitrag
Windows Update

Windows Update-Suche nach Win7 Neuinstallation wieder schneller

(1)

Erfahrungsbericht von the-buccaneer zum Thema Windows Update ...

Ähnliche Inhalte
VB for Applications
gelöst Ausgewählten Bereich eines Excel Dokumentes per email verschicken (7)

Frage von Edd1ng zum Thema VB for Applications ...

Exchange Server
Suche in autom. eingebundenen Postfächern

Frage von corpse2001 zum Thema Exchange Server ...

VB for Applications
Einzelne PDFs aus Serienbrief an neue Email anhängen (1)

Frage von onkelsibb zum Thema VB for Applications ...

Microsoft Office
gelöst Email-Adresse aus Adressbuch-String in Excel 2010 herausschneiden (4)

Frage von rudeboy zum Thema Microsoft Office ...

Heiß diskutierte Inhalte
Exchange Server
Bestehende eMails autoamatisch weiterleiten (21)

Frage von metal-shot zum Thema Exchange Server ...

Hyper-V
gelöst Reiner Hyper- V Server oder lieber Rolle (21)

Frage von Winuser zum Thema Hyper-V ...

SAN, NAS, DAS
gelöst Synology Version 6.1 Probleme (18)

Frage von Hendrik2586 zum Thema SAN, NAS, DAS ...

Router & Routing
gelöst IP Kamera für drei unabhängige Netzwerke (16)

Frage von ProfessorZ zum Thema Router & Routing ...