diff --git a/ISEN-Repair Inventory Manager/AddMachine.vb b/ISEN-Repair Inventory Manager/AddMachine.vb index bda5c5a..4e7ebab 100644 --- a/ISEN-Repair Inventory Manager/AddMachine.vb +++ b/ISEN-Repair Inventory Manager/AddMachine.vb @@ -42,9 +42,12 @@ Public Class AddMachine Main.log.Info("Computer " & NewIDBox.Text & " added") Main.StatusLabel.Text = "Ordinateur ajouté avec succés dans la base de données." Main.ListAllInv() + Main.log.Info("Added computer " & NewIDBox.Text & " with success !") Me.Close() Catch ex As Exception Main.StatusLabel.Text = "Une erreur avec la base SQLite s'est produite !" + Main.log.Critical("Error has been occur when saving data to DB !") + Main.log.Critical(ex.Message) MsgBox(ex.Message) End Try End Sub diff --git a/ISEN-Repair Inventory Manager/Main.vb b/ISEN-Repair Inventory Manager/Main.vb index 45d72f1..52a334e 100644 --- a/ISEN-Repair Inventory Manager/Main.vb +++ b/ISEN-Repair Inventory Manager/Main.vb @@ -53,7 +53,9 @@ Public Class Main Catch ex As Exception StatusLabel.Text = "Une erreur avec la base SQLite s'est produite !" - MsgBox(ex.Message) + log.Critical("Error has been occur when connect to DB !") + log.Critical(ex.Message) + MsgBox("Error ! Check log file for details.") End Try Return True @@ -150,9 +152,12 @@ Public Class Main con.Close() End Using StatusLabel.Text = "La base SQLite a été reconstruite avec succès !" + log.Info("Base SQLite reconstructed.") Catch ex As Exception StatusLabel.Text = "Une erreur avec la base SQLite s'est produite !" - MsgBox(ex.Message) + log.Critical("Error has been occur when reconstrut DB !") + log.Critical(ex.Message) + MsgBox("Error ! Check log file for details.") End Try End Sub @@ -184,7 +189,9 @@ Public Class Main StatusLabel.Text = "Récupération avec succés de la base SQLite." Catch ex As Exception StatusLabel.Text = "Une erreur avec la base SQLite s'est produite !" - MsgBox(ex.Message) + log.Critical("Error has been occur when retrieve data from DB !") + log.Critical(ex.Message) + MsgBox("Error ! Check log file for details.") End Try End Sub @@ -257,7 +264,9 @@ Public Class Main End Using Catch ex As Exception StatusLabel.Text = "Une erreur avec la base SQLite s'est produite !" - MsgBox(ex.Message) + log.Critical("Error has been occur when retrieve data from DB !") + log.Critical(ex.Message) + MsgBox("Error ! Check log file for details.") End Try End If End Sub @@ -326,7 +335,9 @@ Public Class Main If HWCheck.Checked And OSCheck.Checked And DrvCheck.Checked And SoftCheck.Checked And ActivateCheck.Checked Then SendOutButton.Enabled = True Else SendOutButton.Enabled = False Catch ex As Exception StatusLabel.Text = "Une erreur avec la base SQLite s'est produite !" - MsgBox(ex.Message) + log.Critical("Error has been occur when retrieve data from DB !") + log.Critical(ex.Message) + MsgBox("Error ! Check log file for details.") End Try End Sub @@ -345,10 +356,13 @@ Public Class Main con.Close() End Using StatusLabel.Text = "Ordinateur supprimé avec succès !" + log.Info("Delete computer " & IDBox.Text & " with success !") ListAllInv() Catch ex As Exception StatusLabel.Text = "Une erreur avec la base SQLite s'est produite !" - MsgBox(ex.Message) + log.Critical("Error has been occur when saving data to DB !") + log.Critical(ex.Message) + MsgBox("Error ! Check log file for details.") End Try End Sub diff --git a/ISEN-Repair Inventory Manager/My Project/AssemblyInfo.vb b/ISEN-Repair Inventory Manager/My Project/AssemblyInfo.vb index 88e5ad8..4ae34b2 100644 --- a/ISEN-Repair Inventory Manager/My Project/AssemblyInfo.vb +++ b/ISEN-Repair Inventory Manager/My Project/AssemblyInfo.vb @@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices ' en utilisant '*', comme indiqué ci-dessous : ' - - + +