ws.Session.SetAttribute("authType", "local")
ws.Session.SetAttribute("authName", inp1.Text)
ws.Session.SetAttribute("IsAuthorized", "true")
ws.Session.SetAttribute("UserType", "" & user.Get("usertype") ) ' lowercase!
ws.Session.SetAttribute("UserID", "" & user.Get("userid") ) ' lowercase!