[VB.NET] System.Diagnostics.EventLog

[cipi]

ciao,
chi mi spiega qualcosa al riguardo? Non mi sono chiari alcuni concetti tipo quello di Log, di Source ecc.
Prendendo questo semplice codice dal sito di msdn:

Module Module1

    Sub Main()
        Dim DS As System.Data.DataSet
        Dim MyCommand As System.Data.OleDb.OleDbDataAdapter
        Dim MyConnection As System.Data.OleDb.OleDbConnection

        MyConnection = New System.Data.OleDb.OleDbConnection( _
              "provider=Microsoft.Jet.OLEDB.4.0; " & _
              "data source=C:\Documents eccetera\table.XLS; " & _
              "Extended Properties=Excel 8.0;")
        ' Select the data from Sheet1 of the workbook.
        MyCommand = New System.Data.OleDb.OleDbDataAdapter( _
              "select * from [Sheet1$]", MyConnection)

        DS = New System.Data.DataSet()
        MyCommand.Fill(DS)
        MyConnection.Close()
    End Sub

End Module

mi dava il debug Eccezione non gestita di tipo "System.Data.OleDb.OleDbException" in system.data.dll
Allora ho deciso di aggiungere un

        Try
            MyCommand.Fill(DS)
        Catch e As System.Data.OleDb.OleDbException
            Dim errorMessages As String
            Dim i As Integer
            Dim sSource As String

            For i = 0 To e.Errors.Count - 1
                errorMessages += "Index #" & i.ToString() & ControlChars.Cr _
                               & "Message: " & e.Errors(i).Message & ControlChars.Cr _
                               & "NativeError: " & e.Errors(i).NativeError & ControlChars.Cr _
                               & "Source: " & e.Errors(i).Source & ControlChars.Cr _
                               & "SQLState: " & e.Errors(i).SQLState & ControlChars.Cr
            Next i

            Dim log As System.Diagnostics.EventLog = New System.Diagnostics.EventLog()
            log.Source = "Monte Carlo Optimization"
            log.Log = "Applicazione"
            log.MachineName = System.Environment.MachineName
            System.Diagnostics.EventLog.CreateEventSource("Monte Carlo Optimization", "Applicazione")
            log.WriteEntry(errorMessages)
            Console.WriteLine("An exception occurred. Please contact your system administrator.")
        Finally
            MyConnection.Close()
        End Try

e mi sono definitivamente incasinato... Alla fine avevo un errore del tipo uploadato...
Chi mi chiarisce?

[cipi]

scusate... questo è il file...

[cipi]

...mi regalo un up!