in debg continua a darmi eccezione invece di mostrarmela a videocodice:Try Dim log As String = Configuration.ConfigurationSettings.AppSettings.Item("LogExFileName") Console.WriteLine("Scrittura di una eccezione in esecuzione...") log = log & "LogException" & Format(Now, "ddMMyyyy") & ".txt" Dim SwFromFileTrue As StreamWriter = New StreamWriter(log, True) SwFromFileTrue.WriteLine("Generata eccezione: " & ex.Message.ToString & " " & Format(Now, "yyyy-MM-dd hh:mm")) SwFromFileTrue.Flush() SwFromFileTrue.Close() Console.WriteLine("Scrittura eccezione eseguita correttamente...") Catch ex1 As DirectoryNotFoundException Throw New Exception("Eccezione in TraceException") End Try

Rispondi quotando