To dowload a quik fix use use my support web site.
The problem are located in obtaining the user profile.
All I did to fix it was the follwing:
in
Public Class ForumUserController
the shared function "GetForumUser"
add the folowing inside the "With fUser" section
.Profile = dnnUser.Profile
so the shared function "GetForumUser" should read
-------------------------------------------------
Public Shared Function GetForumUser(ByVal UserID As Integer) As ForumUser
Dim _portalSettings As PortalSettings = PortalController.GetCurrentPortalSettings
Dim keyID As String = FORUM_USER_CACHE_KEY_PREFIX & UserID.ToString
Dim fUser As ForumUser
If DataCache.GetCache(keyID) Is Nothing Then
' If current user is authenticated, get it
If UserID > 0 Then
Dim ctlForumUser As New ForumUserController
fUser = ctlForumUser.UserGet(_portalSettings.PortalId, UserID)
'If we could not find this forum user, create it from DNN users data
If fUser Is Nothing Then
Dim ctlDNNUser As New UserController
Dim dnnUser As UserInfo = ctlDNNUser.GetUser(_portalSettings.PortalId, UserID)
' Insert new forum user with minumun requirement info
Try
fUser = New ForumUser
With fUser
.UserID = dnnUser.UserID
.Alias = dnnUser.Membership.Username
.Profile = dnnUser.Profile
End With
ctlForumUser.UserAdd(fUser)
Catch Exc As System.Exception
End Try
End If
Else ' If not, return an anonymous user
fUser = New ForumUser
With fUser
.UserID = -1
.Alias = "anonymous"
End With
End If
DataCache.SetCache(keyID, fUser)
End If
Return CType(DataCache.GetCache(keyID), ForumUser)
End Function