If pos = "MEC" Then
Session.Add("user", txt_L_Username.Text)
Dim objT As New transactions
objT._username = Session("user")
objT._logintime = TimeOfDay.TimeOfDay.ToString
objT._dayoftransaction = Date.Today
objT.record_user(objT)
Response.Redirect("Emis_Admin_create.aspx")
Exit Sub