【转贴】使用asp.net 2.0 profile存储用户信息[翻译]

本文详细介绍了ASP.NET 2.0中的Profile功能,包括如何定义、使用Profile来存储用户信息,以及如何配置ProfileProvider。此外,还探讨了如何管理Profile信息和生成Profile报告。
导读:
  使用ASP.NET 2.0 Profile存储用户信息[翻译] Level 200
  
  
  作者: Stephen Walther
  原文地址:http://msdn.microsoft.com/asp.net/default.aspx?pull=/library/en-us/dnvs05/html/UserProfiles.asp
  译者:Tony Qu
  概要:许多ASP.NET应用程序需要跨访问的用户属性跟踪功能,在ASP.NET1.1中,我们只能人工实现这一功能。但如今,使用 ASP.NET 2.0的Profile对象,这个过程变得异常简单。Stephen Walther将验证该对象,并向你展示如何使用Profile来跟踪用户属性、创建一个购物篮,及其他一些例子。
  总目录
  介绍
  User Profile总揽
  定义User Profile
  使用Profile组
  使用复杂的Profile属性
  继承一个Profile
  迁移匿名Profile设置
  配置Profile Provider
  管理Profiles并生成Profile报告
  总结
  相关书籍
  Microsoft ASP.NET 2.0支持被称为Profile的新对象,它可以自动在多个Web应用程序的访问之间存储用户信息。一个User Profile中可以存储各种类型的信息,这些信息既可以是简单的string和integer类型,也可以是复杂的自定义类型。例如,你可以存储用户的 姓、购物篮、用户属性或网站使用情况统计。
  本文中,你将学习如何在一个应用中定义user profile。我们也会向你演示如何配置使用不同provider的profile。最后,你将学习如何管理和生成user profile的报告。
   User Profiles总揽
  Profile 对象与Session对象十分相似,但是更好用一些。与Session相似的地方在于,Profile是相对于一个特定的用户的,也就是说,每个Web应 用程序的用户都有他们自己的profile对象。与Session不同的是,Profile对象是持久对象。如果你向Session中添加一个项,在你离 开网站时,该项就会消失。而Profile则完全不同,当你修改Profile的状态时,修改在多个访问之间均有效。
  profile使用provider模式来存储信息,默认情况下,user profile的内容会保存在SQL Server Express数据库中,该数据库位于网站的App_Data目录。然而,在本文的后半部分,你将了解如何使用其他数据提供者(data provider)来存储信息,如完整版的SQL Server中的一个数据库或者一个Oracle数据库。
  与Session不同,Profile是强类型的,Session对象仅仅是一个项集合而已,而profile对象则有强类型属性。
  使用强类型是有它的道理的。例如,使用强类型,你就可以在Microsoft Visual Web Developer中使用智能感知技术,当你键入Profile和一个点的时候,智能感知会弹出你已经定义过的profile属性列表。
  
   定义user profile
  你 既可以在machine.config中,也可以在web.config中定义一个user profile,由于你不能在应用程序的二级目录中创建一个包含文件profile节的web.config文件,这意味着你将无法在一个应用程序中定义 两个以上的profile。
  在列表1的web.config中,列举了一个简单的profile定义的实例,该profile有三个属性,FirstName, LastName和PageVisits。
   列表1
  
  
     name="FirstName"
  defaultValue="??" allowAnonymous="true" />   name="LastName"
  defaultValue="??" allowAnonymous="true" />   name="PageVisits" type="Int32"
  allowAnonymous="true"/>
  
  由于该profile需要同时被匿名用户和已认证用户使用,因此我们在web.config文件中增加包含一个< anonymousIdentification>元素,有了这个元素,系统就会自动为匿名用户生成唯一的ID。仔细看的话我们会发现,每一个 profile属性都有一个allowAnonymous特性,该特性表明这个profile属性是否允许被匿名用户使用。
  
  默认的profile属性类型是System.String类型。列表1中,由于没有为FirstName和LastName这两个profile属性增 加type特性,那么系统默认它们是string类型,而PageVisits属性则指定了type特性为Int32,因此该profile属性可用于表 示一个整型值。
  最后,注意FirstName和LastName属性都有defaultValue特性。你可以为简单的数据类型设置defaultValue特性,但你不能为复杂类型设置defaultValue特性。
  
  当你定义好一个profile之后,系统会自动在下一次页面被调用时,生成一个与该profile相对应的类。这个类会被保存在"Temporary ASP.NET Files Directory"目录(该目录也用于存放用于动态生成页面的类)。你可以使用HttpContext的Profile属性(Property)调用该 类。
  当你定义好一个profile后,你可以使用如下方法为profile属性赋值。
  [Visual Basic .NET]
  Profile.FirstName = "Bill"[C#]
  Profile.FirstName = "Bill"
  
  任何在web.config中定义的profile属性都会在Profile对象中呈现。
  列 表2演示了你该如何使用profile来持久化保存用户信息。这个页显示了FirstName,LastName, PageVisits三个属性的值,同时它包含了一个能够用于修改这三个属性的表单(form)。在Page_Load中更新PageVisits的值, 这意味着每一次刷新页面,PageVisits的值都会改变。
  
  
  图1 使用简单的profile
   列表 2. Simple.aspx (Visual Basic .NET)
  
  
  
  
  
  
Name:
Page Visits:
  

   First Name:
Last Name:
  Text="Update Profile"
  OnClick="UpdateProfile"
  Runat="server" />

  
  
  
   列表 2. Simple.aspx (C#)
  
  
  
  
  
  
Name:
Page Visits:
  

   First Name:
Last Name:
  Text="Update Profile"
  OnClick="UpdateProfile"
  Runat="server" />

  
  
  
  如果你多次访问列表2中的页面,你会注意到PageVisits在不断增大。如果你关闭的浏览器,并在一周之后调用该页面,PageVisits属性仍然会保留原值。从这一点可以看出Profile为每个用户自动保存一个副本。
   使用Profile组
  尽管你仅可以为一个应用程序定义一个profile,但如果你需要让几个profile属性一起工作,把它们放在组中,会让你觉得它们更易管理。
  例如,在列表3中,有一个带有两个组的profile,这两个组分别是Address和Preferences
   列表3. Web.Config
  
  
  
     name="Street"
  allowAnonymous="true" />   name="City"
  allowAnonymous="true" />   name="ReceiveNewsletter"
  type="Boolean" defaultValue="false" allowAnonymous="true" />
  
  
  当你用组来定义profile时,你应该使用组名来设置或读取profile属性。例如,在列表3中,你可以使用以下一些句子来完成三个profile属性的赋值。
  [Visual Basic .NET]
  Profile.Address.City = "Modesto"Profile.Address.Street = "111 King Arthur Ln"Profile.Preferences.ReceiveNewsletter = False
  [C#]
  Profile.Address.City = "Modesto"Profile.Address.Street = "111 King Arthur Ln"Profile.Preferences.ReceiveNewsletter = false
  一个profile的定义只能包含一层组,换句话说,你不能把其他的组放在一个profile组的下面一层。
  使用复杂的profile属性
  到目前为止,我们已经介绍了声明包含简单类型(如string或整型)属性的profile,其实你也可以在profile中声明复杂属性。
  举个例子,假设你现在需要在profile中存储一个购物篮,如果这样做的话,你就可以在每次访问网站时获得自己的购物篮。
  列表4 声明了一个包含profile,这个profile包含一个名为ShoppingCart的属性,而该属性的type特性是一个叫ShoppingCart的类(我们接下来会创建该类),该类名是有效的。
  我们还会注意到,该声明中包含一个serializeAs特性,该特性可以帮助ShoppingCart使用二进制序列化器(binary serializer)进行持久化,而不是使用xml序列化器。
  
  列表4 Web.config
  
  
     name="ShoppingCart" type="ShoppingCart" serializeAs="Binary" allowAnonymous="true" />
  
  
  列表5 中有一个简单购物篮的实现代码,该购物篮拥有添加和删除项(item)的方法(method),同时它还拥有两个属性(property),一个是用于获得该购物篮中的所有项的,一个是用于表示所有商品的总价的。
  
  
  列表5 ShoppingCart (Visual Basic.NET)
  Imports Microsoft.VisualBasic _Public Class ShoppingCart
  Public _CartItems As New Hashtable()
  ' Return all the items from the Shopping Cart
  Public ReadOnly Property CartItems() As ICollection
  Get Return _CartItems.Values
  End Get End Property ' The sum total of the prices
  Public ReadOnly Property Total() As Decimal Get Dim sum As Decimal For Each item As CartItem In _CartItems.Values
  sum += item.Price * item.Quantity
  Next Return sum
  End Get End Property ' Add a new item to the shopping cart
  Public Sub AddItem(ByVal ID As Integer, _
  ByVal Name As String, ByVal Price As Decimal)
  Dim item As CartItem = CType(_CartItems(ID), CartItem)
  If item Is Nothing Then _CartItems.Add(ID, New CartItem(ID, Name, Price))
  Else item.Quantity += 1 _CartItems(ID) = item
  End If End Sub ' Remove an item from the shopping cart
  Public Sub RemoveItem(ByVal ID As Integer)
  Dim item As CartItem = CType(_CartItems(ID), CartItem)
  If item Is Nothing Then Return End If item.Quantity -= 1 If item.Quantity = 0 Then _CartItems.Remove(ID)
  Else _CartItems(ID) = item
  End If End Sub
  End Class
  _Public Class CartItem
  Private _ID As Integer Private _Name As String Private _Price As Decimal Private _Quantity As Integer = 1 Public ReadOnly Property ID() As Integer Get Return _ID
  End Get End Property Public ReadOnly Property Name() As String Get Return _Name
  End Get End Property Public ReadOnly Property Price() As Decimal Get Return _Price
  End Get End Property Public Property Quantity() As Integer Get Return _Quantity
  End Get Set(ByVal value As Integer)
  _Quantity = value
  End Set End Property Public Sub New(ByVal ID As Integer, _
  ByVal Name As String, ByVal Price As Decimal)
  _ID = ID
  _Name = Name
  _Price = Price
  End Sub
  End Class
  
  
  列表5 ShoppingCart (c#)
  using System;using System.Collections;
  [Serializable]public class ShoppingCart
  {
  public Hashtable _CartItems = new Hashtable();
  // Return all the items from the Shopping Cart
  public ICollection CartItems
  {
  get { return _CartItems.Values; }
  }
  // The sum total of the prices
  public decimal Total
  {
  get
  {
  decimal sum = 0 foreach (CartItem item in _CartItems.Values)
  sum += item.Price * item.Quantity;
  return sum;
  }
  }
  // Add a new item to the shopping cart
  public void AddItem(int ID, string Name, decimal Price)
  {
  CartItem item = (CartItem)_CartItems[ID];
  if (item == null)
  _CartItems.Add(ID, new CartItem(ID, Name, Price));
  else {
  item.Quantity++ _CartItems[ID] = item;
  }
  }
  // Remove an item from the shopping cart
  public void RemoveItem(int ID)
  {
  CartItem item = (CartItem)_CartItems[ID];
  if (item == null)
  return item.Quantity-- if (item.Quantity == 0)
  _CartItems.Remove(ID);
  else _CartItems[ID] = item;
  }
  }
  [Serializable]public class CartItem
  {
  private int _ID;
  private string _Name;
  private decimal _Price;
  private int _Quantity = 1 public int ID
  {
  get { return _ID; }
  }
  public string Name
  {
  get { return _Name; }
  }
  public decimal Price
  {
  get { return _Price; }
  }
  public int Quantity
  {
  get { return _Quantity; }
  set { _Quantity = value; }
  }
  public CartItem(int ID, string Name, decimal Price)
  {
  _ID = ID;
  _Name = Name;
  _Price = Price;
  }
  }
  如果你把列表5中的代码添加到应用程序的App_Code目录中,购物篮会自动被编译。
  
  在列表5中有一点值得注意,那就是ShoppingCart和CartItem类都加上了可序列化的特性,这一点对于他们能否被序列化十分重要,只有这样才能保存在Profile对象中。
  最后,列表6的页面显示了可以被添加到购物篮中的产品。购物篮是通过BindShoppingCart方法从Profile对象中载入,该方法把购物篮中的对象绑定到一个GridView对象上,这些对象可以通过ShoppingCart类的CartItems属性获得。
  
  
  图2 在profile中存储购物篮
  AddCartItem方法用于在购物篮中添加一个产品,该方法中包含了检测Profile是否存在ShoppingCart的代码。对于Profile中存储的对象,你必须自己实例化这些对象,他们不会自动实例化。
  RemoveCartItem方法用于从购物篮中移除一个产品,该方法只是简单地通过调用Profile中的ShoppingCart对象的RemoveItem方法。
  
   列表 6 - Products.aspx (Visual Basic .NET)
  
  
  
  
  
  

Products


   ID="ProductGrid" DataSourceID="ProductSource" DataKeyNames="ProductID" AutoGenerateColumns="false" OnSelectedIndexChanged="AddCartItem" ShowHeader="false" CellPadding="5" Runat="Server">  ID="ProductGrid" DataSourceID="ProductSource" DataKeyNames="ProductID" AutoGenerateColumns="false" OnSelectedIndexChanged="AddCartItem" ShowHeader="false" CellPadding="5" Runat="Server">   CommandName="select" Text="Buy" />   DataField="ProductName" />   DataField="UnitPrice"
  DataFormatString="{0:c}" />
   ID="ProductSource" ConnectionString=
"Server=localhost;Database=Northwind;Trusted_Connection=true;" SelectCommand=
"SELECT ProductID,ProductName,UnitPrice FROM Products" Runat="Server" />  ID="ProductSource" ConnectionString=
  "Server=localhost;Database=Northwind;Trusted_Connection=true;" SelectCommand=
  "SELECT ProductID,ProductName,UnitPrice FROM Products" Runat="Server" />

Shopping Cart

  ID="CartGrid" AutoGenerateColumns="false" DataKeyNames="ID" OnSelectedIndexChanged="RemoveCartItem" CellPadding="5"
  Width="300" Runat="Server">   CommandName="select" Text="Remove" />   DataField="Name"
  HeaderText="Name" />   DataField="Price"
  HeaderText="Price"
  DataFormatString="{0:c}" />   DataField="Quantity"
  HeaderText="Quantity" /> Total:
  

  
  
  
  
   列表 6. Products.aspx (C#)
  
  
  
  
  
  
  

Products


   ID="ProductGrid" DataSourceID="ProductSource" DataKeyNames="ProductID" AutoGenerateColumns="false" OnSelectedIndexChanged="AddCartItem" ShowHeader="false" CellPadding="5" Runat="Server">  ID="ProductGrid" DataSourceID="ProductSource" DataKeyNames="ProductID" AutoGenerateColumns="false" OnSelectedIndexChanged="AddCartItem" ShowHeader="false" CellPadding="5" Runat="Server">   CommandName="select" Text="Buy" />   DataField="ProductName" />   DataField="UnitPrice"
  DataFormatString="{0:c}" />
   ID="ProductSource" ConnectionString=
"Server=localhost;Database=Northwind;Trusted_Connection=true;" SelectCommand= "SELECT ProductID,ProductName,UnitPrice FROM Products" Runat="Server" />  ID="ProductSource" ConnectionString=
  "Server=localhost;Database=Northwind;Trusted_Connection=true;" SelectCommand= "SELECT ProductID,ProductName,UnitPrice FROM Products" Runat="Server" />

Shopping Cart

  ID="CartGrid" AutoGenerateColumns="false" DataKeyNames="ID" OnSelectedIndexChanged="RemoveCartItem" CellPadding="5"
  Width="300" Runat="Server">   CommandName="select" Text="Remove" />   DataField="Name"
  HeaderText="Name" />   DataField="Price"
  HeaderText="Price"
  DataFormatString="{0:c}" />   DataField="Quantity"
  HeaderText="Quantity" /> Total:
  

  
  
  继承一个profile
  你也可以通过从一个已经存在的profile类中继承一个profile来完成对profile的定义,这种特性能够帮助你在多个应用程序中使用相同的profile。
  例如,列表7中列出了一个拥有多个用户属性的类,该类是从ProfileBase类继承而来的(你可以在System.Web.Profile中找到)
  
  在列表8中的Web.config包含一个从UserInfo类继承而来的profile,通过该声明,新的profile可以获得UserInfo类的所有属性。
   列表 7. UserInfo (Visual Basic .NET)
  Imports Microsoft.VisualBasicImports System.Web.ProfilePublic Class UserInfo
  Inherits ProfileBase
  Private _FirstName As String Private _LastName As String Public Property FirstName() As String Get Return _FirstName
  End Get Set(ByVal value As String)
  _FirstName = value
  End Set End Property Public Property LastName() As String Get Return _LastName
  End Get Set(ByVal value As String)
  _LastName = value
  End Set End Property
  End Class
   列表 7. UserInfo (C#)using System;
  using System.Web.Profile;
  public class UserInfo : ProfileBase
  {
  private string _FirstName;
  private string _LastName;
  public string FirstName
  {
  get { return _FirstName; }
  set { _FirstName = value; }
  }
  public string LastName
  {
  get { return _LastName; }
  set { _LastName = value; }
  }
  }using System;using System.Web.Profile;public class UserInfo : ProfileBase
  {
  private string _FirstName;
  private string _LastName;
  public string FirstName
  {
  get { return _FirstName; }
  set { _FirstName = value; }
  }
  public string LastName
  {
  get { return _LastName; }
  set { _LastName = value; }
  }
  }
   列表 8. Web.Config
  
  
  迁移匿名Profile设置
  Profile对象既可用于匿名用户也可以用于已认证用户。然而,当用户从匿名用户状态转换为已认证用户状态时,Profile对象能够以一种令人难以理解的方式完成任务。
  当匿名用户使用Profile对象时,用户profile是与一个随机生成的号码相关联的,该号码是根据每个用户唯一生成的,它保存在浏览器的cookie中,无论何时该用户返回应用程序,该用户的Profile设置会被自动加载。
  如果匿名用户通过认证的话,所有与该用户相关的profile就会丢失,同时系统会生成一个新的profile。这时该Profile信息将与用户名相关联,而非唯一识别号。
  要想理解所有这些工作,最好的方法就是看看下面的例子。列表9中的web.config定义了一个profile,该profile只有一个FavoriteColor属性。
  列表 9 Web.config
  
  
  
     name="FavoriteColor" allowAnonymous="true"
  defaultValue="Red" />
  
  
  列表10中有一个包含两个按钮的页面,分别是login和logout按钮,其中还有一个用于更新FavoriteColor属性的表单。
   列表10. Anonymous.aspx (Visual Basic .NET)
  
  
  
  
  
  

  id="txtFavoriteColor" Runat="Server" />
Username:   id="lblUsername" Runat="Server" />
Favorite Color:   id="lblFavoriteColor" Runat="Server" />
  
  

  
  
   列表10. Anonymous.aspx (C#)
  
  
  
  
  
  
  Text="Login" OnClick="Login" Runat="Server" />
  id="txtFavoriteColor" Runat="Server" />   Text="Update Profile" OnClick="UpdateProfile" Runat="Server" />
Username:   id="lblUsername" Runat="Server" />
Favorite Color:   id="lblFavoriteColor" Runat="Server" />
  
  

  
  
  当你打开第一个页面时,UserName的值是一个随机生成的唯一识别号(见图3)。当你按下Login按钮后,你就完成了身份认证,它是通过用户票据(User Bill)完成的。
  
  
  图3 使用匿名和认证profile
  列表10的页面中包含一个用于更新FavoriteColor的表单,要注意的是,在你登录登出的时候,会分别生成两个不同的profile。例如当你先登录,后登出的话,那么系统会生成一个随机的唯一识别号。
  在 很多情况下,你需要把匿名profile迁移到认证profile状态,如果你需要迁移profile属性值的话,你可以利用 ProfileModule类的MigrateAnonymous事件完成该任务,该事件只能在Global.asax文件中进行处理。列表11中的 Global.asax演示了你如何才能实现FavoriteColor属性的迁移。
  列表 11. Global.asax (Visual Basic .NET)
  
  列表 11. Global.asax (C#)
  
  通过Profile类的GetProfile()方法你可以获得匿名profile,该方法接收一个唯一识别号,并且返回与唯一识别号对应的profile。ProfileMigrateEventArgs对象包含一个匿名识别号。
   配置Profile Provider
  默 认情况下,profile被保存在sqlserver 2005 express数据库,它位于App_Data目录中,这或许在你开发一些普通的asp.net应用程序时是没有问题的,但很有可能,你需要把你的应用程 序的profile保存在另一个数据库中,比如一个完整版的SqlServer 2005的实例中,而该数据库又位于你局域网的某个位置。
  Profile使用Provider模式,通过修改web.config或machine.config的设置来告诉系统把信息存储在哪里。
  ASP.NET 本身配了一个profile provider,叫SqlProfileProvider。如果你感到困惑,你可以通过继承ProfileProvider基类来创建一个自己的 provider。例如,你可以创建一个基于Oracle数据库或MySql数据库的Provider。在这里,我们将只讨论最简单的方法,即通过 SqlServer数据库来保存profile信息。
  要使用Microsoft SQL Server存储profile信息,必须完成两个步骤。首先,你必须安装SQL Server数据库,然后你必须重新设置配置文件。
  ASP.NET 2.0框架提供了一个用于配置SQL Server来存储Profile信息的工具,该工具叫做aspnet_regsql,它位于Windows/Microsoft.NET/ Framework/[.NET版本号]。执行该工具后,你会看到图4中的ASP.NET SQL Server安装向导。
  
  
  图4 使用ASP.NET SQL Server安装程序
  SQL Server安装向导会指导你完成必要的步骤,完成这些步骤后,向导会自动创建用于存储profile信息的存储过程和表结构。
  在你完成SQL Server数据库的配置后,你需要修改web.config或machine.config中的数据库连接设置来指向服务器上的SQL Server数据库,本例中该数据库的实例名为MyServer,列表12列出了该配置文件。
  列表 12. Web.Config
  
  "Server=MyServer;Trusted_Connection=true;database=MyDatabase" />  "Server=MyServer;Trusted_Connection=true;database=MyDatabase" />
  
  
  
  
  
  
  
  
  
  
  
  
  
  
  在列表12中的profile配置中,包含了一个defaultProvider特性,这个特性指向一个叫MyProfileProvider的 profile provider,而这个provider定义是在profile标记的 节中完成的。 MyProfileProvider则使用一个叫MyConnectionString的连接字符串完成数据库连接,并保存profile信息到数据库 中。MyConnectionString可以在位于web.config开头的 节中找到。
   管理profile并生成profile报告
  Profile会对象自动保存用户profile信息,这既是好事业是坏事。说它是好事,是因为你不需要写存储信息的所有逻辑代码,说它是坏事,是因为这样可能造成一大堆无用的信息被保存在数据库中。
  幸运的是,ASP.NET 2.0框架包含一个叫做ProfileManager的类,你可以使用它来管理profile信息。它包含了相当多的方法使你能够有效地管理profile并且生成profile报表,下面列出了一些该类的重要方法:
   DeleteInactiveProfiles. 删除一个特定日期之前的所有profile
   DeleteProfile. 删除特定用户的profile
   DeleteProfiles. 删除一个profile集合
   FindInactiveProfilesByUserName. 返回一个ProfileInfo对象的集合,该集合表示的profile是匹配一个某个名字,并且是从某个特定日期开始一直未被使用
   FindProfilesByUserName. 返回一个ProfileInfo对象集合,该集合与某个用户名相关联
   GetAllInactiveProfiles. 返回一个ProfileInfo对象集合,该集合表示的profile是从某个特定日期开始一直未被使用的profile
   GetAllProfiles. 返回一个ProfileInfo对象集合,该集合表示所有的profile
   GetNumberOfInactiveProfiles. 返回从某个特定日期开始一直未被使用的profile的数量
   GetNumberOfProfiles. 返回profile总数 这些方法中,虽然所有的方法都返回一个ProfileInfo对象集合,但没有一个返回一个真正的profile。ProfileInfo对象包含以下profile属性
   IsAnonymous. 表示该profile是否为匿名profile
   LastActivityDate. 最后一次profile被访问的时间和日期
   LastUpdatedDate. 最后一次profile被升级的时间和日期
   Size. 表示profile的大小,这是在profile provider存储profile信息时记录的
   UserName. 与profile关联的用户名 ProfileManager有几个方法提供了额外的参数用于支持分页。例如,GetAllProfiles方法的一个重载版本就提供了专门用于设置页面索引、页面大小、总共的记录数的参数,这些参数在需要分页的页面中十分有用。
  ProfileManager 既可以在asp.net页面下使用,也可以在其它程序中使用。例如,你可能需要做一个控制台程序用于每天清除长时间未使用的 profile。列表14的控制台程序会删除七天未使用的profile,你可以使用Windows计划任务(Windows Scheduled Tasks)来安排该程序的执行时间。
  列表 14. DeleteInactiveProfiles (Visual Basic .NET)Imports System.Web.ProfilePublic Class DeleteInactiveProfiles
  
  Public Shared Sub Main()
  Dim deleted As Integer deleted =
  ProfileManager.DeleteInactiveProfiles(
  ProfileAuthenticationOption.All,
  DateTime.Now.AddDays(-7))
  Console.WriteLine("Deleted " & deleted & " profiles" )
  End Sub End Class
  列表 14. DeleteInactiveProfiles (C#)using System;using System.Web.Profile;public class DeleteInactiveProfiles
  {
  public static void Main()
  {
  int deleted = 0 deleted =
  ProfileManager.DeleteInactiveProfiles(
  ProfileAuthenticationOption.All,
  DateTime.Now.AddDays(-7));
  Console.WriteLine("Deleted " +
  deleted.ToString() + " profiles" );
  }
  }
  你可以通过一下的命令行指令对列表14进行编译
  [Visual Basic .NET]
  C:/WINDOWS/Microsoft.NET/Framework/v2.0.40607/vbc
  /r:System.Web.dll DeleteInactiveProfiles.vb
  [C#]
  C:/WINDOWS/Microsoft.NET/Framework/v2.0.40607/csc
  DeleteInactiveProfiles.cs
  你还可以使用ProfileManager类生成profile信息报表。例如,如果你打算生成一个用户调查的报表,你可以把用户调查保存在profile中,这样就可以轻易的使用ProfileManager生成你需要的报表。
  列表15中的web.config中有三个属性: SurveyCompleted、 FavoriteLanguageFavoriteEnvironment
  Listing 15. Web.Config
  
     name="SurveyCompleted" type="Boolean" allowAnonymous="true" />   name="FavoriteLanguage" allowAnonymous="true" />   name="FavoriteEnvironment" allowAnonymous="true" />
  
  列表16中的页面演示了一个简单的用户调查。该页面包含两个Panel控件,第一个控件中有两个调查问题,当用户完成调查后,第一个控件会自动隐藏,而第二个会显示出来,第二个Panel有一段表示感谢的文字。
  列表 16. Survey.aspx (Visual Basic .NET)
  
  
  
  
  

   What is your favorite programming language?
  
  id="rdlLanguage" runat="Server">
  
  

 

What is your favorite development environment?
  
  id="rdlEnvironment" runat="Server">
  
  

 


   Text="Submit Survey" Onclick="SaveSurvey" Runat="Server" />  Text="Submit Survey" Onclick="SaveSurvey" Runat="Server" /> Thank you for completing the survey!
  

  
  
  列表 16. Survey.aspx (C#)
  
  
  
  
  

   What is your favorite programming language?
  
  id="rdlLanguage" runat="Server">
  
  

 

What is your favorite development environment?
  
  id="rdlEnvironment" runat="Server">
  
  

 


   Thank you for completing the survey!
  

  
  
  列表17中显示调查的结果,该页面中有一个显示ProfileInfo对象集合的GridView控件,该ProfileInfo对象集合是由 ProfileManager的GetAllProfiles方法获得的。当你点击GridView中的任意一行的Select链接时,你将会看到对这个 问题的调查结果,该调查结果是由Profile类的GetProfile方法获得的。
  
  
  图5 显示调查结果
  列表 17. SurveyResults.aspx (Visual Basic .NET)
  
  
  
  
  

Survey Results

  id="ResultsGrid" DataKeyNames="UserName" AutoGenerateSelectButton="true" OnSelectedIndexChanged="DisplayProfileDetails" SelectedRowStyle-BackColor="LightYellow" Runat="Server" />

 

Survey Details

Favorite Language:   id="lblLanguage" Runat="Server" />
Favorite Environment:   id="lblEnvironment" Runat="Server" />

  
  
  列表 17. SurveyResults.aspx (C#)
  
  
  
  
  

Survey Results

  id="ResultsGrid" DataKeyNames="UserName" AutoGenerateSelectButton="true" OnSelectedIndexChanged="DisplayProfileDetails" SelectedRowStyle-BackColor="LightYellow" Runat="Server" />

 

Survey Details

Favorite Language:   id="lblLanguage" Runat="Server" />
Favorite Environment:   id="lblEnvironment" Runat="Server" />

  
  
   总结
  当建立Web应用程序时,我依旧花费了大量的时间和精力用于做一些大伤脑筋的事情。其中的一个任务就是写一些用于从数据库存储和获得用户信息的代码。虽然 Profile对象引入的都是asp.net 1.0中可以实现的功能,但是这个新特性帮助我们从乏味的编码工作中解脱出来,这样也能让我们在写Web应用程序的过程中,把更多的精力放在我们更感兴趣 的事情上。
   相关书籍
  ASP.NET 2.0 初探 (A First Look at ASP.NET V. 2.0)
  ASP.NET 2.0 测试版预览(ASP.NET 2.0 Beta Preview)
  Microsoft ASP.NET 2.0开发指南(Introducing Microsoft ASP.NET 2.0)
  ASP.NET技术内幕 (ASP.NET Unleashed)
  
  Trackback: http://tb.blog.youkuaiyun.com/TrackBack.aspx?PostId=1491433
  
  Trackback: http://tb.blog.youkuaiyun.com/TrackBack.aspx?PostId=1513882

本文转自
http://blog.youkuaiyun.com/heker2007/archive/2007/02/25/1513882.aspx
内容概要:本文系统介绍了算术优化算法(AOA)的基本原理、核心思想及Python实现方法,并通过图像分割的实际案例展示了其应用价值。AOA是一种基于种群的元启发式算法,其核心思想来源于四则运算,利用乘除运算进行全局勘探,加减运算进行局部开发,通过数学优化器加速函数(MOA)和数学优化概率(MOP)动态控制搜索过程,在全局探索与局部开发之间实现平衡。文章详细解析了算法的初始化、勘探与开发阶段的更新策略,并提供了完整的Python代码实现,结合Rastrigin函数进行测试验证。进一步地,以Flask框架搭建前后端分离系统,将AOA应用于图像分割任务,展示了其在实际工程中的可行性与高效性。最后,通过收敛速度、寻优精度等指标评估算法性能,并提出自适应参数调整、模型优化和并行计算等改进策略。; 适合人群:具备一定Python编程基础和优化算法基础知识的高校学生、科研人员及工程技术人员,尤其适合从事人工智能、图像处理、智能优化等领域的从业者;; 使用场景及目标:①理解元启发式算法的设计思想与实现机制;②掌握AOA在函数优化、图像分割等实际问题中的建模与求解方法;③学习如何将优化算法集成到Web系统中实现工程化应用;④为算法性能评估与改进提供实践参考; 阅读建议:建议读者结合代码逐行调试,深入理解算法流程中MOA与MOP的作用机制,尝试在不同测试函数上运行算法以观察性能差异,并可进一步扩展图像分割模块,引入更复杂的预处理或后处理技术以提升分割效果。
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值