怎样扩张用户资料信息？
在userprofile类中增加属性，然后编译成dll，copy到bin目录中，在web.config中增加profile属性即可。
DataProvider.Instance.UpdateUser(objUser.UserID, objSecurity.InputFilter(objUser.Profile.FirstName, PortalSecurity.FilterFlag.NoScripting Or PortalSecurity.FilterFlag.NoMarkup), objSecurity.InputFilter(objUser.Profile.LastName, PortalSecurity.FilterFlag.NoScripting Or PortalSecurity.FilterFlag.NoMarkup), objUser.Membership.Email)
更新users表里面的数据。
' Created seperate method to save profile data. SaveProfileProperty(objUser.Membership.Username, objUser.Profile.ProfileProperties)
更新web。Config文件里设置的字段，
实现代码如下：
Private Sub SaveProfileProperty(ByVal userName As String, ByVal propHash As Hashtable)
Dim objProfile As AspNetProfile.ProfileBase
Dim objSecurity As New PortalSecurity
objProfile = AspNetProfile.ProfileBase.Create(userName, True)
'Looping through each key in profile hashtable.
'Each key is profile property name.
For Each key As Object In propHash.Keys
'checking if property's datatype is string.
'if it is string then we do input filter on value.
If AspNetProfile.ProfileBase.Properties(key.ToString()).PropertyType Is GetType(String) Then
'Checking if value is set or not? if value is set then do input filter
'otherwise assign Nullstring.
If propHash.ContainsKey(key) AndAlso Not propHash(key) Is Nothing Then
objProfile(key.ToString()) = objSecurity.InputFilter(propHash(key).ToString(), PortalSecurity.FilterFlag.NoScripting Or PortalSecurity.FilterFlag.NoMarkup)
Else
objProfile(key.ToString()) = Null.NullString
End If
Else
objProfile(key.ToString()) = Null.SetNull(propHash(key), AspNetProfile.ProfileBase.Properties(key.ToString()).PropertyType)
End If
Next
objProfile.Save()
End Sub
代码分析：
新建一个实例profilebase pb=profilebase.create(name,true)
把hash表里面的key，value通过调用item（key）=value方法
放入pb hash表中
然后调用pb。Save（）保存hash表。
用户注册信息的最后一步是调用membership.updateuser(msuser)方法
这样注册用户信息已放入三个表中：
users，aspnet_membership,aspnet_profile