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

Added time support to logger, continu to add log function to software

Browse Source
This commit is contained in:
JackCarterSmith 2017-07-08 17:27:01 +02:00
parent b170a860be
commit ebd37c68f2
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
ISEN-Repair Inventory Manager/Logger.vb
View File

@ -13,7 +13,7 @@ Public Class Logger
Public Sub Info(str As String) Public Sub Info(str As String)
Dim objWriter As New StreamWriter(logFileName, True) Dim objWriter As New StreamWriter(logFileName, True)
Try Try
objWriter.WriteLineAsync("[INFO] " & str) objWriter.WriteLineAsync("[" & DateTime.Now.ToString("HH:mm:ss") & "][INFO] " & str)
Catch ex As Exception Catch ex As Exception
MsgBox(ex.ToString) MsgBox(ex.ToString)
End Try End Try
@ -23,7 +23,7 @@ Public Class Logger
Public Sub Warn(str As String) Public Sub Warn(str As String)
Dim objWriter As New StreamWriter(logFileName, True) Dim objWriter As New StreamWriter(logFileName, True)
Try Try
objWriter.WriteLineAsync("[WARN] " & str) objWriter.WriteLineAsync("[" & DateTime.Now.ToString("HH:mm:ss") & "][WARN] " & str)
Catch ex As Exception Catch ex As Exception
MsgBox(ex.ToString) MsgBox(ex.ToString)
End Try End Try
@ -33,7 +33,7 @@ Public Class Logger
Public Sub Critical(str As String) Public Sub Critical(str As String)
Dim objWriter As New StreamWriter(logFileName, True) Dim objWriter As New StreamWriter(logFileName, True)
Try Try
objWriter.WriteLineAsync("[CRITICAL] " & str) objWriter.WriteLineAsync("[" & DateTime.Now.ToString("HH:mm:ss") & "][CRITICAL] " & str)
Catch ex As Exception Catch ex As Exception
MsgBox(ex.ToString) MsgBox(ex.ToString)
End Try End Try