thanks for the suggestion, but it still doesn't show for members of creditors? The thing is, these users are added programmatically, could that be it? the code is below:
Public Function CreateNewUser() As DotNetNuke.Security.Membership.UserCreateStatus
Dim aNewUser As New UserInfo
Dim objRoleController As New DotNetNuke.Security.Roles.RoleController
' create a new user instance and populate it
aNewUser = New DotNetNuke.Entities.Users.UserInfo
With aNewUser
.Profile.InitialiseProfile(Me.PortalSettings.PortalId)
.AffiliateID = -1
.DisplayName = tbUserName.Text
.Username = tbUserName.Text
.Email = tbEmail.Text
.FirstName = tbFirstName.Text
.Profile.Unit = tbAddress1.Text
.Profile.Street = tbAddress2.Text
.Profile.Region = tbAddress3.Text
.Profile.City = tbAddress4.Text
.Profile.PostalCode = tbpostcode.Text
.Profile.Telephone = tbtelephone.Text
.Profile.SetProfileProperty("IPFirm", tbCompany.Text)
.Profile.SetProfileProperty("FirmCode", "NA")
.IsSuperUser = False
.Membership.Approved = True
.Membership.CreatedDate = DateTime.Now
.Email = tbEmail.Text
.Membership.Password = tbPassword.Text
.Membership.UpdatePassword = False
.PortalID = Me.PortalSettings.PortalId
.Profile.FirstName = tbFirstName.Text
.Profile.LastName = tbSurname.Text
.Profile.PreferredLocale = Me.PortalSettings.DefaultLanguage
.Profile.TimeZone = Me.PortalSettings.TimeZoneOffset
.Membership.PasswordAnswer = "stakeholder"
End With
Dim objStatus As UserCreateStatus = DotNetNuke.Entities.Users.UserController.CreateUser(aNewUser)
If objStatus = UserCreateStatus.Success Then
objRoleController.AddUserRole(aNewUser.PortalID, aNewUser.UserID, 3, Now, Nothing)
SendRegEmail(tbEmail.Text, tbFirstName.Text, tbFirstName.Text + " " + tbSurname.Text, tbPassword.Text)
objRoleController.DeleteUserRole(aNewUser.PortalID, aNewUser.UserID, 4)
Response.Redirect(Request.Url.Scheme + "://" + Request.Url.Host + ":" + Request.Url.Port.ToString() + System.Web.HttpRuntime.AppDomainAppVirtualPath + "/login.aspx")
End If
Return objStatus
End Function