Public Sub getUserByUsername(username As String) As User
Dim u As User = dbCore.GetObjectByUniqueColumnValue("users", "username", username)
If u.IsInitialized Then
Return u
Else
Dim ex As ExceptionEx
ex.Initialize("User not found")
ex.Throw
End If
End Sub