Top-Themen

Aktuelle Themen (A bis Z)

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

EventLog ausgeben und sortieren?!

Mitglied: deledi

deledi (Level 1) - Jetzt verbinden

27.06.2011 um 17:29 Uhr, 3338 Aufrufe, 4 Kommentare

Hallo Leute weis nicht ob das schon gefragt wurde bin auch neu hier.....
Also ich habe das volgende Programm das mier den EventLog ausgiebt soweit so gut.
Nun aber muss ich sortieren und zwar soll er mier nur die Wichtigen und Kritischen EventLogs ausgeben und immer nur vom heutigen Datum 2 Wochen zurück die Meldung ausgeben...?

Danke schon mall im vorraus.

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim myEVL As EventLog

myEVL = New EventLog("System")

For x = 0 To myEVL.Entries.Count - 1
ListBox1.Items.Add(myEVL.Entries.Item(x).TimeWritten &
myEVL.Entries.Item(x).Message)
Next
End Sub
End Class
Mitglied: TsukiSan
27.06.2011 um 17:47 Uhr
Hallo Leute weis nicht ob das schon gefragt wurde bin auch neu hier.....
also auch ein Hallo zurück und Willkommen im Forum!

ob es so oder so ähnlich schon mal gefragt worden ist, sagt uns nur die Suchmaschine.
Aber eines kann ich mit Sicherheit sagen - und das nimm mir bitte nicht übel! - mit so vielen Rechtschreibfehlern bestimmt noch nicht!

Um hier beim Ratequiz mitzumachen, müßten die Spieler noch erfahren, um welche Programmiersprache es sich genau handelt!

Ich wünsche allen nun viel Spass bei Was bin ich

Gute Nacht! ist schon spät, wo ich bin

Gruss
Tsuki
Bitte warten ..
Mitglied: mathe172
27.06.2011 um 20:46 Uhr
Hallo,

schau dir mal diesen Code an:
01.
Public Class Form1 
02.
 
03.
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 
04.
        Dim MyEVL As New EventLog("System") 
05.
        For Each Entry As EventLogEntry In MyEVL.Entries 
06.
            If DateDiff(DateInterval.Day, Entry.TimeGenerated, Now) <= 20 Then 
07.
                ListBox1.Items.Add(Entry.TimeWritten & Entry.Message) 
08.
            End If 
09.
        Next 
10.
    End Sub 
11.
 
12.
End Class
Für die Filterung schau dir mal EventLogEntryType an (Hier gibts was dazu)

Mathe172
Bitte warten ..
Mitglied: svipdagr
28.06.2011 um 10:24 Uhr
Also ich würde das Ganze mit dem Log Parser von Microsoft machen.
Da kannst du eigtl relativ schnell und einfach Events filtern zb nach Datum, Quelle, etc und nach Belieben auch zb als Excel oder HTML File ausgeben lassen!
Bitte warten ..
Mitglied: deledi
29.06.2011 um 22:03 Uhr
Hallo

schau mall so hab ich es gemacht....

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim MyEVL As New EventLog("System")
Dim iCounter As Integer = 0
For Each Entry As EventLogEntry In MyEVL.Entries

If DateDiff(DateInterval.Day, Entry.TimeGenerated, Now) <= 20 Then


If MyEVL.Entries.Item(iCounter).EntryType.ToString = "Warning" Or MyEVL.Entries.Item(iCounter).EntryType.ToString = "Error" Then
ListBox1.Items.Add(Entry.EntryType.ToString & " - " & _
Entry.TimeWritten.ToString & " - " & _
Entry.Message.ToString().Replace(ControlChars.CrLf, "" & _
"").Replace(ControlChars.Lf, ""))
End If


End If
Next
End Sub


nur das Funktioniert nicht so ganz und vorallem braucht es ewigkeiten bis er alles rausgelesen hat.....

kannst du weiter Helfen?
Bitte warten ..
Ähnliche Inhalte
Windows Server
Wie kann ich das Eventlog reparieren?
Frage von joni2000deWindows Server3 Kommentare

Hallo, kann mir jemand beim meinem Problem wie in dieser Frage ganz unten beschrieben weiter helfen? Ich habe mich ...

Windows Server

Eventlog - bestimmte Events exportieren und Eventlog leeren

gelöst Frage von Xaero1982Windows Server8 Kommentare

Moin Zusammen, aufgrund eines ziemlichen GAUs (Ein unbekannter Nutzer hat die Daten aus einem Verzeichnis gelöscht) bin ich gezwungen ...

Windows 8

Einstellungen Eventlog

gelöst Frage von Wisch43Windows 84 Kommentare

Hallo miteinander, wie (wenn überhaupt) kann ich den Eventlog so einstellen, dass meine erstellte Benutzerdefinierte Ansicht beim Start des ...

VB for Applications

Dateien aus Ordnerstruktur in Textdatei schreiben, nach Dateinamen sortieren und zusätzlich in HTML in Tabellenform ausgeben

gelöst Frage von cbliVB for Applications6 Kommentare

Hallo An Allle Ich habe ein Script (hier nochmals vielen Dank an Bastla für die Hilfe) welches Dateien mit ...

Neue Wissensbeiträge
Windows 10
Zero-Day-Lücke in Microsoft Edge
Information von kgborn vor 1 TagWindows 10

In Microsofts Edge-Browser klafft wohl eine nicht geschlossene (0-Day) Sicherheitslücke im Just In Time Compiler (JIT Compiler) für Javascript. ...

Sicherheit
Microsoft und Skype: Sicherheit
Information von kgborn vor 1 TagSicherheit

Die Tage gab es ja einige Berichte zur Sicherheit des Skype-Updaters. Der Updater von Skype läuft unter dem Konto ...

Datenschutz

Behörden ignorieren Sicherheitsbedenken gegenüber Windows 10

Information von Penny.Cilin vor 2 TagenDatenschutz8 Kommentare

Hallo, passend zum Thema Ablösung LIMUX in München ein Beitrag bei Heise (siehe Link folgend). Behörden ignorieren Sicherheitsbedenken gegenüber ...

Sicherheit
Information Security Hub Munich airport
Information von brammer vor 2 TagenSicherheit

Hallo, Neues Center für Cyber Kriminalität am Münchener Flughafen brammer

Heiß diskutierte Inhalte
DSL, VDSL
Mindestgeschwindigkeiten DSL Telekom
Frage von justlukasDSL, VDSL13 Kommentare

Hallo zusammen, Seit diesem Jahr habe ich Verständnisprobleme mit dem Verhalten der Telekom. Wir haben seit einem Jahr VDSL ...

Switche und Hubs
LANCOM-Switch: Probleme (no link) mit SFP-Modulen?
Frage von THETOBSwitche und Hubs10 Kommentare

Hi zusammen, ich habe folgendes Problem: Und zwar habe ich an einem Standort drei Switche verbaut - LANCOM GS-2326P+, ...

Debian
Wie finde ich den betroffenen user
Frage von ProtectedDebian8 Kommentare

Hallo, Wie kann ich den User finden der dies verursacht hat? Betriebsystem ist Debian 7 your Server/Customer with the ...

Firewall
RB2011 Firewall Rule eine bestimmte Mac oder IP Adresse nicht zu blockieren
Frage von lightmanFirewall8 Kommentare

Hallo liebes Forum mit ihren Spezialisten. Ich habe meine Firewall so konfiguriert das kein Endgerät ohne meine Speziellen Erlaubnis ...