I would like to add the logged in user's user_id to the application object when they log in


I would like to add the logged in user's user_id to the application...
Author
Message
Marcia G Akins
Marcia G Akins
Advanced StrataFrame User (698 reputation)Advanced StrataFrame User (698 reputation)Advanced StrataFrame User (698 reputation)Advanced StrataFrame User (698 reputation)Advanced StrataFrame User (698 reputation)Advanced StrataFrame User (698 reputation)Advanced StrataFrame User (698 reputation)Advanced StrataFrame User (698 reputation)Advanced StrataFrame User (698 reputation)
Group: StrataFrame Users
Posts: 322, Visits: 529
Edhy Rijo (10/29/2008)
Marcia G Akins (10/29/2008)
I take it that this code requires that I have the Role Based Security module installed. Since I do not, this could be a problem Tongue

If you are not use RBS, then are you talking about Windows Logged User? if that is the case, I have not done that yet, but there are plenty of info in google on how to read the Windows current user.

No, I am not talking about Windows Logged User. My application has its own log in form and it has a table of application users in SQL server.

Edhy Rijo
E
StrataFrame VIP (6.4K reputation)StrataFrame VIP (6.4K reputation)StrataFrame VIP (6.4K reputation)StrataFrame VIP (6.4K reputation)StrataFrame VIP (6.4K reputation)StrataFrame VIP (6.4K reputation)StrataFrame VIP (6.4K reputation)StrataFrame VIP (6.4K reputation)StrataFrame VIP (6.4K reputation)
Group: StrataFrame Users
Posts: 2.4K, Visits: 23K
Marcia G Akins (10/29/2008)
I take it that this code requires that I have the Role Based Security module installed. Since I do not, this could be a problem Tongue

If you are not use RBS, then are you talking about Windows Logged User? if that is the case, I have not done that yet, but there are plenty of info in google on how to read the Windows current user.

Edhy Rijo

Marcia G Akins
Marcia G Akins
Advanced StrataFrame User (698 reputation)Advanced StrataFrame User (698 reputation)Advanced StrataFrame User (698 reputation)Advanced StrataFrame User (698 reputation)Advanced StrataFrame User (698 reputation)Advanced StrataFrame User (698 reputation)Advanced StrataFrame User (698 reputation)Advanced StrataFrame User (698 reputation)Advanced StrataFrame User (698 reputation)
Group: StrataFrame Users
Posts: 322, Visits: 529
Edhy Rijo (10/29/2008)
I don't quite understand your question, but in case this may help you, I have a method that will show up the current logged user in a ThemedLinkMenuItem:

AddHandler MicroFour.StrataFrame.Security.SecurityBasics.CurrentUserChanged, AddressOf UpdateCurrentUserInfo

 

''' <summary>

''' Update the Current User info on the main form.

''' </summary>

''' <remarks></remarks>

Private Sub UpdateCurrentUserInfo()

     '-- Show the current logged user info.

     Dim currentUserName As String = MicroFour.StrataFrame.Security.BusinessObjects.SFSUsersBO.RetrieveFullName(SecurityBasics.CurrentUser.UserPK, False)

     If SecurityBasics.CurrentUser.UserName.Equals("Administrator", StringComparison.CurrentCultureIgnoreCase) Then 

          currentUserName = SecurityBasics.CurrentUser.UserName

     End If

     Me.tlmUserInfo.ItemCollection("CurrentUser").Title = currentUserName

     Me.tlmUserInfo.ItemCollection("LoggedOnValue").Title = SecurityBasics.CurrentUser.LoggedOnAt.ToString

End Sub

I take it that this code requires that I have the Role Based Security module installed. Since I do not, this could be a problem Tongue

Edhy Rijo
E
StrataFrame VIP (6.4K reputation)StrataFrame VIP (6.4K reputation)StrataFrame VIP (6.4K reputation)StrataFrame VIP (6.4K reputation)StrataFrame VIP (6.4K reputation)StrataFrame VIP (6.4K reputation)StrataFrame VIP (6.4K reputation)StrataFrame VIP (6.4K reputation)StrataFrame VIP (6.4K reputation)
Group: StrataFrame Users
Posts: 2.4K, Visits: 23K
I don't quite understand your question, but in case this may help you, I have a method that will show up the current logged user in a ThemedLinkMenuItem:

AddHandler MicroFour.StrataFrame.Security.SecurityBasics.CurrentUserChanged, AddressOf UpdateCurrentUserInfo

 

''' <summary>

''' Update the Current User info on the main form.

''' </summary>

''' <remarks></remarks>

Private Sub UpdateCurrentUserInfo()

     '-- Show the current logged user info.

     Dim currentUserName As String = MicroFour.StrataFrame.Security.BusinessObjects.SFSUsersBO.RetrieveFullName(SecurityBasics.CurrentUser.UserPK, False)

     If SecurityBasics.CurrentUser.UserName.Equals("Administrator", StringComparison.CurrentCultureIgnoreCase) Then 

          currentUserName = SecurityBasics.CurrentUser.UserName

     End If

     Me.tlmUserInfo.ItemCollection("CurrentUser").Title = currentUserName

     Me.tlmUserInfo.ItemCollection("LoggedOnValue").Title = SecurityBasics.CurrentUser.LoggedOnAt.ToString

End Sub



Edhy Rijo

Marcia G Akins
Marcia G Akins
Advanced StrataFrame User (698 reputation)Advanced StrataFrame User (698 reputation)Advanced StrataFrame User (698 reputation)Advanced StrataFrame User (698 reputation)Advanced StrataFrame User (698 reputation)Advanced StrataFrame User (698 reputation)Advanced StrataFrame User (698 reputation)Advanced StrataFrame User (698 reputation)Advanced StrataFrame User (698 reputation)
Group: StrataFrame Users
Posts: 322, Visits: 529
So can you help me with this Smile ?

Thanks

GO

Merge Selected

Merge into selected topic...



Merge into merge target...



Merge into a specific topic ID...




Similar Topics

Reading This Topic

Login

Explore
Messages
Mentions
Search