本文整理匯總了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)