Hi,

How do I edit the profile properties to specify that different user roles require different profile properties?

For example:

1. CUSTOMERS - will not require a CompanyName, etc...
2. SUPPLIERS - will require a CompanyName, CompanyAddress, CompanyTel, CompanyURL, etc...

Thanks!

Hi Westa,

Thanks for the note.

How do I remove the original registration "module" and create my own? As far as I know, user registration is a DEFAULT function in DNN, and is not a module.

Please advise. I'm new to DNN, so it's quite a steep learning curve.

Thanks!

In the ADMIN settings -  ADVANCED settings

THE User Page points to a page where you would place your own custom rego / user profile admina module.

When you select a page here - it turns off the default USER MODULE - and uses the one you create.

>>>

As for how to go about writing your own ... umm thats a bit of a more complex ask.

it can be a simple form  - with the fields you require - and a submit button that uses
code similar to this:

>>>

            Dim myUserCtl As New UserController
            Dim myUser As New UserInfo

            myUser.PortalID = PortalId

            ''Initialise the ProfileProperties Collection
            myUser.Profile.InitialiseProfile(PortalId)
            myUserProfile.PreferredLocale = Me.PortalSettings.DefaultLanguage
            myUser.Profile.TimeZone = Me.PortalSettings.TimeZoneOffset

            ''Set AffiliateId
            Dim AffiliateId As Integer = Null.NullInteger

            If Not Request.Cookies("AffiliateId") Is Nothing Then
                AffiliateId = Integer.Parse(Request.Cookies("AffiliateId").Value)
            End If
            myUser.AffiliateID = AffiliateId

            myUser.FirstName = txtFirstName.Text
            myUser.LastName = txtLastName.Text

            'Update DisplayName to conform to Format
            Dim setting As Object = DotNetNuke.Entities.Modules.UserModuleBase.GetSetting(UserPortalID, "Security_DisplayNameFormat")
            If (Not setting Is Nothing) AndAlso (Not String.IsNullOrEmpty(Convert.ToString(setting))) Then
                myUser.UpdateDisplayName(Convert.ToString(setting))
            End If

            myUser.Email = txtEmail.Text
            myUser.Username = txtUsername.Text
            myUser.Membership.Password = txtPassword.Text

            myUser.Profile.Country = cboCountry.SelectedItem.Text
            myUser.Profile.PostalCode = txtPostal.Text

            'Set the Approved status based on the Portal Settings
            If PortalSettings.UserRegistration = PortalRegistrationType.PublicRegistration Then
                myUser.Membership.Approved = True
            Else
                myUser.Membership.Approved = False
            End If

            Dim createStatus As UserCreateStatus = UserController.CreateUser(myUser)

Westa