jackcartersmith/RepairInventoryManager
Archived
2
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Added log entry for all catch error

Browse Source
This commit is contained in:
JackCarterSmith 2017-10-11 21:47:08 +02:00
parent cf9a756dd9
commit d7ff84d5ef
3 changed files with 25 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
ISEN-Repair Inventory Manager/AddMachine.vb
View File

@ -42,9 +42,12 @@ Public Class AddMachine
Main.log.Info("Computer " & NewIDBox.Text & " added") Main.log.Info("Computer " & NewIDBox.Text & " added")
Main.StatusLabel.Text = "Ordinateur ajouté avec succés dans la base de données." Main.StatusLabel.Text = "Ordinateur ajouté avec succés dans la base de données."
Main.ListAllInv() Main.ListAllInv()
Main.log.Info("Added computer " & NewIDBox.Text & " with success !")
Me.Close() Me.Close()
Catch ex As Exception Catch ex As Exception
Main.StatusLabel.Text = "Une erreur avec la base SQLite s'est produite !" 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) MsgBox(ex.Message)
End Try End Try
End Sub End Sub

26
ISEN-Repair Inventory Manager/Main.vb
View File

@ -53,7 +53,9 @@ Public Class Main
Catch ex As Exception Catch ex As Exception
StatusLabel.Text = "Une erreur avec la base SQLite s'est produite !" 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 End Try
Return True Return True
@ -150,9 +152,12 @@ Public Class Main
con.Close() con.Close()
End Using End Using
StatusLabel.Text = "La base SQLite a été reconstruite avec succès !" StatusLabel.Text = "La base SQLite a été reconstruite avec succès !"
log.Info("Base SQLite reconstructed.")
Catch ex As Exception Catch ex As Exception
StatusLabel.Text = "Une erreur avec la base SQLite s'est produite !" 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 Try
End Sub End Sub
@ -184,7 +189,9 @@ Public Class Main
StatusLabel.Text = "Récupération avec succés de la base SQLite." StatusLabel.Text = "Récupération avec succés de la base SQLite."
Catch ex As Exception Catch ex As Exception
StatusLabel.Text = "Une erreur avec la base SQLite s'est produite !" 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 Try
End Sub End Sub
@ -257,7 +264,9 @@ Public Class Main
End Using End Using
Catch ex As Exception Catch ex As Exception
StatusLabel.Text = "Une erreur avec la base SQLite s'est produite !" 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 Try
End If End If
End Sub 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 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 Catch ex As Exception
StatusLabel.Text = "Une erreur avec la base SQLite s'est produite !" 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 Try
End Sub End Sub
@ -345,10 +356,13 @@ Public Class Main
con.Close() con.Close()
End Using End Using
StatusLabel.Text = "Ordinateur supprimé avec succès !" StatusLabel.Text = "Ordinateur supprimé avec succès !"
log.Info("Delete computer " & IDBox.Text & " with success !")
ListAllInv() ListAllInv()
Catch ex As Exception Catch ex As Exception
StatusLabel.Text = "Une erreur avec la base SQLite s'est produite !" 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 Try
End Sub End Sub

4
ISEN-Repair Inventory Manager/My Project/AssemblyInfo.vb
View File

@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
' en utilisant '*', comme indiqué ci-dessous : ' en utilisant '*', comme indiqué ci-dessous :
' <Assembly: AssemblyVersion("1.0.*")> ' <Assembly: AssemblyVersion("1.0.*")>
<Assembly: AssemblyVersion("0.10.1.3")> <Assembly: AssemblyVersion("0.10.2.4")>
<Assembly: AssemblyFileVersion("0.10.1.3")> <Assembly: AssemblyFileVersion("0.10.2.4")>