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

EventLog ausgeben und sortieren?!

Frage Entwicklung

Mitglied: deledi

deledi (Level 1) - Jetzt verbinden

27.06.2011 um 17:29 Uhr, 3290 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 ..
Neuester Wissensbeitrag
Ähnliche Inhalte
Windows 10
gelöst EventLog häufige Anzeige, was bedeutet diese? (5)

Frage von M.Marz zum Thema Windows 10 ...

Windows Server
Wie kann ich das Eventlog reparieren? (3)

Frage von joni2000de zum Thema Windows Server ...

Microsoft Office
gelöst Excel Makro zum Sortieren von Spalten an größeres Dokument Anpassen (2)

Frage von Rolfor zum Thema Microsoft Office ...

Heiß diskutierte Inhalte
Switche und Hubs
LAG zwischen Cisco SG300 und Dlink DGS1100 herstellen - wie? (18)

Frage von White-Rabbit2 zum Thema Switche und Hubs ...

CPU, RAM, Mainboards
Hardware Fragen (12)

Frage von xaver-2 zum Thema CPU, RAM, Mainboards ...

Grafikkarten & Monitore
Neue Graifkkarte - kein Bild (10)

Frage von bestelitt zum Thema Grafikkarten & Monitore ...

Exchange Server
gelöst Exchange 2013 - Kontakte aus CSV importieren (9)

Frage von hesper zum Thema Exchange Server ...