
Working with headphones on usually means youd rather not be bothered, but sometimes it means youre just listening to something while you work.

Now my entries into this log look just like those from the Office programs. From the Event Viewer Log Name OAlerts Source Microsoft Office 14 Alerts Date 12302010 110657 AM Event ID 300 Task Category None Level. MsgBox("Error Add2EventLog - Inform Admin and Restart Word!!", MsgBoxStyle.Critical)īasically, each of the six items are separated by a comma once I got the correct eventlog.writeevent format. Microsoft Windows Operating System: Event ID: 300: Source: StorageSpaces-Drivers: Version: Windows Server 2012 R2, Windows Server 2012 Windows 8.1, Windows 8: Level: Error: Message: Physical drive 1 failed to read the configuration or returned corrupt data for storage space 2. New EventInstance(300, 0, EventLogEntryType.Information), _ StrEvent6 = .FullName & vbCrĮventLog.WriteEvent("Microsoft Office 15 Alerts", _ 'vbCr added to each to make the error listing look like the rest.ĭim strEvent1 As String = "MS Word - RprinterAI" & vbCr 'Reporting Applicationĭim strEvent2 As String = strEventMSG & vbCr 'Messageĭim strEvent3 As String = ().Assembly.GetName().Version.ToString & vbCr 'Unknown 0 use for Addin versionĭim strEvent4 As String = .ToString & vbCr 'Reporting Application versionĭim strEvent5 As String = strEventLevel & vbCr 'Unused - Severityĭim strEvent6 As String 'Unused - get namem of current document


Public Shared Sub AddEventlog(strEventMSG As String, strEventLevel As String) The good news is I found the answer by reviewing other unanswered questions. Really thought this was the right forum since my questions was specifically about writing to the General Office Event Log - "Microsoft Office 15 Alerts".
