本文整理汇总了VB.NET中System.Diagnostics.EventLogEntryType枚举的典型用法代码示例。如果您正苦于以下问题:VB.NET EventLogEntryType枚举的具体用法?VB.NET EventLogEntryType怎么用?VB.NET EventLogEntryType使用的例子?那么, 这里精选的枚举代码示例或许可以为您提供帮助。
在下文中一共展示了EventLogEntryType枚举的1个代码示例,这些例子默认根据受欢迎程度排序。您可以为喜欢或者感觉有用的代码点赞,您的评价将有助于系统推荐出更棒的VB.NET代码示例。
示例1: EventLog
' Check whether source exist in event log.
If False = EventLog.SourceExists(mySource) Then
' Create a new source in a specified log on a system.
EventLog.CreateEventSource(mySource, myLog)
End If
' Create an event log instance.
myEventLog = New EventLog(myLog)
' Initialize source property of obtained instance.
myEventLog.Source = mySource
Select Case myIntLog
Case 1
' Write an 'Error' entry in specified log of event log.
myEventLog.WriteEntry(myMessage, EventLogEntryType.Error, myID)
Case 2
' Write a 'Warning' entry in specified log of event log.
myEventLog.WriteEntry(myMessage, EventLogEntryType.Warning, myID)
Case 3
' Write an 'Information' entry in specified log of event log.
myEventLog.WriteEntry(myMessage, EventLogEntryType.Information, myID)
Case 4
' Write a 'FailureAudit' entry in specified log of event log.
myEventLog.WriteEntry(myMessage, EventLogEntryType.FailureAudit, myID)
Case 5
' Write a 'SuccessAudit' entry in specified log of event log.
myEventLog.WriteEntry(myMessage, EventLogEntryType.SuccessAudit, myID)
Case Else
Console.WriteLine("Error: Failed to create an event in event log.")
End Select
Console.WriteLine("A new event in log '{0}' with ID '{1}' " + _
"is successfully written into event log.", myEventLog.Log, myID)