RosettaCodeData/Task/Write-to-Windows-event-log/F-Sharp/write-to-windows-event-log.fs

use log = new System.Diagnostics.EventLog()
log.Source <- "Sample Application"
log.WriteEntry("Entered something in the Application Eventlog!")