Customize messages displayed on screen after registration, see #8

App_LocalResources/View.ascx.resx

@@ -282,7 +282,7 @@
   <data name="PasswordsDontMatch.Text" xml:space="preserve">
     <value>The passwords do not match!</value>
   </data>
-  <data name="RegisterSuccess.Text" xml:space="preserve">
+  <data name="RegisterSuccess_Public.Text" xml:space="preserve">
     <value>Your account has been created sucessfully. &lt;a href="{0}"&gt;Proceed&lt;/a&gt;</value>
   </data>
   <data name="RegistrationMode_Private.Text" xml:space="preserve">
@@ -342,4 +342,10 @@
   <data name="Error_Unknown.Text" xml:space="preserve">
     <value>The data you provided is not valid. Please review and try again</value>
   </data>
+  <data name="RegisterSuccess_Private.Text" xml:space="preserve">
+    <value>Your account has been created sucessfully. We will review your registration as soon as possible and let you know if we have accepted your request. &lt;a href="{0}"&gt;Proceed&lt;/a&gt;</value>
+  </data>
+  <data name="RegisterSuccess_Verified.Text" xml:space="preserve">
+    <value>Your account has been created sucessfully. We have sent you an e-mail containing a verification link. You must verify your identity first by following that link from within that e-mail. &lt;a href="{0}"&gt;Proceed&lt;/a&gt;</value>
+  </data>
 </root>

View.ascx.vb

@@ -660,7 +660,17 @@ Namespace Connect.Modules.UserManagement.AccountRegistration
 
             End If
 
-            lblSucess.Text = "<ul><li>" & String.Format(Localization.GetString("RegisterSuccess", LocalResourceFile), NavigateURL(PortalSettings.HomeTabId)) & "</li></ul>"
+            Dim strResult As String = ""
+            Select Case PortalSettings.UserRegistration
+                Case PortalRegistrationType.PublicRegistration
+                    strResult = String.Format(Localization.GetString("RegisterSuccess_Public", LocalResourceFile), NavigateURL(PortalSettings.HomeTabId))
+                Case PortalRegistrationType.PrivateRegistration
+                    strResult = String.Format(Localization.GetString("RegisterSuccess_Private", LocalResourceFile), NavigateURL(PortalSettings.HomeTabId))
+                Case PortalRegistrationType.VerifiedRegistration
+                    strResult = String.Format(Localization.GetString("RegisterSuccess_Verified", LocalResourceFile), NavigateURL(PortalSettings.HomeTabId))
+            End Select
+
+            lblSucess.Text = "<ul><li>" & strResult & "</li></ul>"
             pnlSuccess.Visible = True
 
             'run the final interface if applicable