Write to Windows event log: Difference between revisions
Content added Content deleted
(Added FreeBASIC) |
(PascalABC.NET) |
||
| Line 514: | Line 514: | ||
props["parameters"] = "/t INFORMATION /id 123 /l APPLICATION /so Lingo /d ""E&"Rosetta Code Example""E |
props["parameters"] = "/t INFORMATION /id 123 /l APPLICATION /so Lingo /d ""E&"Rosetta Code Example""E |
||
shell.shell_exec("EventCreate", props)</syntaxhighlight> |
shell.shell_exec("EventCreate", props)</syntaxhighlight> |
||
=={{header|PascalABC.NET}}== |
|||
<syntaxhighlight lang="delphi"> |
|||
uses System.Diagnostics; |
|||
begin |
|||
if not EventLog.SourceExists('MyApp') then |
|||
EventLog.CreateEventSource('MyApp', 'Application'); |
|||
EventLog.WriteEntry('MyApp', 'Hello from PABC!'); |
|||
end. |
|||
</syntaxhighlight> |
|||
=={{header|Perl}}== |
=={{header|Perl}}== |
||