471,582 Members | 1,434 Online
Bytes | Software Development & Data Engineering Community
Post +

Home Posts Topics Members FAQ

Join Bytes to post your question to a community of 471,582 software developers and data experts.

Profiles & Membership

This is a portion of my Web.config file:

<membership defaultProvider="SqlProvider">
<add name="SqlProvider"
requiresQuestionAndAnswer="true" />
<profile defaultProvider="SqlProvider">
<add name="SqlProvider"
connectionStringName="SqlServices" />
<add name="UserName" defaultValue="" allowAnonymous="true" />
<add name="FirstName" defaultValue="" allowAnonymous="true" />
<add name="LastName" defaultValue="" allowAnonymous="true" />
<add name="StreetAddress" defaultValue="" allowAnonymous="true" />
<add name="City" defaultValue="" allowAnonymous="true" />
<add name="State" defaultValue="" allowAnonymous="true" />
<add name="ZipCode" defaultValue="" allowAnonymous="true" />
<add name="EmailAddress" defaultValue="" allowAnonymous="true" />
<add name="HomePhoneNumber" defaultValue="" allowAnonymous="true" />
<add name="CellPhoneNumber" defaultValue="" allowAnonymous="true" />
<add name="Volunteer" defaultValue="" allowAnonymous="true" />

This is how I create a new user and profile:
'Create the profile

'Gather profile information
Profile.UserName = CleanString(CreateUserWizard.UserName)
Profile.FirstName = CleanString(CustomProfileInfo.FirstName)
Profile.LastName = CleanString(CustomProfileInfo.LastName)
Profile.StreetAddress =
Profile.City = CleanString(CustomProfileInfo.City)
Profile.State = CleanString(CustomProfileInfo.State)
Profile.ZipCode = CleanString(CustomProfileInfo.ZipCode)
Profile.EmailAddress = CreateUserWizard.Email
Profile.HomePhoneNumber =
Profile.CellPhoneNumber =
Profile.Volunteer = CleanString(CustomProfileInfo.Volunteer)

'Default each new user to the role of USER
Roles.AddUserToRole(CreateUserWizard.UserName, "User")
Catch strError As Exception
End Try

This is how I delete a user:
Private Function DeleteUser(ByVal strUserName As String) As Boolean
Dim blnResult As Boolean = False

'Delete the users profile
If blnResult = ProfileManager.DeleteProfile(strUserName) = True
'Delete the users membership
If blnResult = Membership.DeleteUser(strUserName) = True Then
blnResult = True
End If
End If
Catch strError As Exception
End Try

Return blnResult
End Function

There are many problems I am having;
1. When adding a new user sometimes there profile information doesn't get
2. When adding a new user sometimes they don't get added to the membership
3. When adding a new user sometimes they over write existing profile
information to current users.
4. When updating a current users profile it creates duplicate profile records
5. When displaying all the user in a GridView using the GetAllUsers method
it doesn't always display every user, if at all.
6. Deleting users does not work, nor does it delete their profile.

Can anyone help?


Jun 27 '07 #1
0 1294

This discussion thread is closed

Replies have been disabled for this discussion.

Similar topics

3 posts views Thread by Alexandr Zverev | last post: by
3 posts views Thread by Jeff | last post: by
1 post views Thread by R.A.M. | last post: by
reply views Thread by =?Utf-8?B?V2FycmVuIFNpcm90YQ==?= | last post: by
reply views Thread by =?Utf-8?B?QV9SZXB1YmxpY2Fu?= | last post: by
1 post views Thread by =?Utf-8?B?ZVByaW50?= | last post: by
2 posts views Thread by =?Utf-8?B?RWQ=?= | last post: by
reply views Thread by XIAOLAOHU | last post: by
reply views Thread by lumer26 | last post: by
reply views Thread by Vinnie | last post: by
1 post views Thread by lumer26 | last post: by

By using Bytes.com and it's services, you agree to our Privacy Policy and Terms of Use.

To disable or enable advertisements and analytics tracking please visit the manage ads & tracking page.