You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
|
Public Class clsLog
|
|
Dim db As New clsDB
|
|
|
|
Public Enum Logtype
|
|
Information = 0
|
|
Wartning = 1
|
|
ApplError = 2
|
|
End Enum
|
|
|
|
Public Function Writelog(ByVal entry As String, ByVal Ltype As Logtype)
|
|
If Ltype >= My.Settings.LogLevel Then db.WriteLog(entry, Ltype)
|
|
|
|
End Function
|
|
End Class
|
