1.cookie的保存:
第一种方法:

   response.cookies("name").value = "xxx"
   response.cookies("name").expires = datetime.now.adddays(1)

第二种方法:

   dim acookie as httpcookie("lastvisit")

   acookie.value = datetime.now.tostring
   acookie.expires = datetime.now.adddays(1) 

该示例向 Cookies 集合中添加了两个 Cookie，一个称为“userName”，另一个称为“lastVisit”。对于第一个 Cookie，我直接设置了 Response.Cookies 集合的值。您可以使用这种方法向集合中添加值，因为 Response.Cookies 是从 NameObjectCollectionBase（英文）类型的特殊集合派生得到的。

对于第二个 Cookie，我创建了 Cookie 对象的一个实例（HttpCookie [英文] 类型），并设置了其属性，然后通过 Add 方法把它添加到 Response.Cookies 集合。实例化 HttpCookie 对象时，您必须把 Cookie 名称作为构造函数的一部分进行传递.

在这两种方法中，有效期值必须为 DateTime 类型。而“lastVisited”值也是日期/时间值。但在这种情况下，我必须把日期/时间值转换为字符串，因为 Cookie 中的任何值最终都是以字符串的形式保存的。

2.带子键的cookie的保存方法:

     response.cookies("info")("username").value = "xxx"
     response.cookies("info")("lastvisit").value = datetime.now.tostring
     response.cookies("info").expires = datetime.now.adddays(1)


     dim acookie as httpcookie("info")
      acookie.values("username") = "xxx"

      acookie.values("lastvisit") = datetime.now.tostring

      acookie.expires = datetime.now.adddays(1)

      response.cookies.add(acookie) 

3.控制 Cookie 有效范围 :
1.>控制cookie到指定的文件夹或者应用程序:
要将 Cookie 限制到服务器上的某个文件夹，请按如下方法设置 Cookie 的 Path 属性:

     response.cookie("username").value = "xxx"

     response.cookie("username").expires = datetime.now.tostring
     response.cookie("username").path = "/a1"      ' a1为文件夹 

提示：通过对 Internet Explorer 和 Mozilla 浏览器进行测试发现，此处使用的路径是区分大小写的。一般而言，Windows 服务器上的 URL 不区分大小写，但这种情况例外。您无法控制用户如何在浏览器中输入 URL，但是，如果您的应用程序依赖于与特定路径相关的 Cookie，则请确保您所创建的所有超链接中的 URL 与 Path 属性值的大小写相匹配。

2.> 控制cookie到指定的域中:

默认情况下，Cookie 与特定的域相关联。例如，如果您的站点是 www.contoso.com，那么当用户向该站点请求页面时，您编写的 Cookie 就被发送到服务器。（有特定路径值的 Cookie 除外，我在上一节刚刚解释过。） 如果您的站点有子域（例如 contoso.com、sales.contoso.com 和 support.contoso.com），就可以把 Cookie 同特定的子域相关联。为此，需要设置 Cookie 的 Domain 属性，如下所示：

  Response.Cookies("domain").Value = DateTime.Now.ToString
  Response.Cookies("domain").Expires = DateTime.Now.AddDays(1)
  Response.Cookies("domain").Domain = "support.contoso.com" 

如果按照这种方式设置域，则 Cookie 只能用于指定子域中的页面。

您也可以利用 Domain 属性来创建可在多个子域中共享的 Cookie。例如，对域进行如下设置：

  Response.Cookies("domain").Value = DateTime.Now.ToString
  Response.Cookies("domain").Expires = DateTime.Now.AddDays(1)
  Response.Cookies("domain").Domain = "contoso.com" 

这样，该 Cookie 就可用于主域、sales.contoso.com 和 support.contoso.com。
4.读取cookie:

当浏览器向服务器发送请求时，该服务器的 Cookie 会与请求一起发送。在 ASP.NET 应用程序中，您可以使用 Request 对象来读取 Cookie。Request 对象的结构与 Response 对象的结构基本相同，所以从 Request 对象中读取 Cookie 的方法与向 Response 对象中写入 Cookie 的方法非常类似。以下示例显示了两种方法，目的都是获取名为“username”的 Cookie 的值并将值显示在 Label 控件中：

    if not request.cookie("username") is nothing then
      label.text=server.htmlencode(request.cookie("username") .value)
    end if


    if not request.cookie("username") is nothing then
     dim acookie as httpcookie = request.cookie("username")

     label.text = server.htmlencode(acookie.value)

   end if

在获取 Cookie 的值之前，应该确保该 Cookie 确实存在。否则，您将得到一个 System.NullReferenceException（英文）异常。还需要注意的是，在页面中显示 Cookie 的内容之前，我调用了 HttpServerUtility.HtmlEncode（英文）方法对 Cookie 的内容进行编码。之所以这样做，是因为我要显示 Cookie 的内容（一般您不会这样做）而且要确保没有任何恶意用户在 Cookie 中添加了可执行脚本.

读取 Cookie 中子键值的方法与设置该值的方法类似。以下是获取子键值的一种方法：

  If Not Request.Cookies("userInfo") Is Nothing Then
  Label1.Text = _
  Server.HtmlEncode(Request.Cookies("userInfo")("userName"))
  Label2.text = _
  Server.HtmlEncode(Request.Cookies("userInfo")("lastVisit"))
  End If 

在上面的示例中，我获取的是子键“lastVist”的值，在此前的讨论中我把该值设置为 DateTime 值的字符串表示形式。请记住，Cookie 是用字符串的形式保存值的，所以要将 lastVisit 值用作日期，就必须对其进行转换：

  Dim dt As DateTime
  dt = CDate(Request.Cookies("userInfo")("lastVisit")) 

Cookie 中子键的类型是 NameValueCollection（英文）类型的集合。因此，另一种获取单个子键的方法是先获取子键集合，然后按名称提取子键的值，如下所示：

  If Not Request.Cookies("userInfo") Is Nothing Then
  Dim UserInfoCookieCollection As _
  System.Collections.Specialized.NameValueCollection
  UserInfoCookieCollection = Request.Cookies("userInfo").Values
  Label1.Text = Server.HtmlEncode(UserInfoCookieCollection("userName"))
  Label2.Text = Server.HtmlEncode(UserInfoCookieCollection("lastVisit"))
  End If 

5.cookie有效期:

您可以读取 Cookie 的名称和值，除此以外，需要了解的有关 Cookie 的信息并不是很多。虽然您可以获取 Domain 和 Path 属性，但是这些属性的用途很有限。例如，您可以读取 Domain 属性，但如果您的页面与 Cookie 不在相同的域，您根本就不会在页面的位置接收到该 Cookie。

您无法读取的是 Cookie 的过期日期和时间。事实上，当浏览器向服务器发送 Cookie 信息时，浏览器并未将过期信息包括在内。您可以读取 Expires 属性，但总是返回为零的日期/时间值。

在前面的编写 Cookie 一节中，我已经讲过，是浏览器负责管理 Cookie 的，Expires 属性就很好地印证了这一点。Expires 属性的主要作用是帮助浏览器执行有关 Cookie 保存的日常管理。从服务器的角度来看，Cookie 要么存在要么不存在，所以对服务器而言，有效期并不是有用的信息。所以，浏览器在发送 Cookie 时并不提供此信息。如果您需要 Cookie 的过期日期，就必须重新设置，关于这一点我将在修改和删除 Cookie 中介绍。

更确切地说，您可以在向浏览器发送 Cookie 之前读取已在 Response 对象中设置的 Expires 属性，但您无法从返回的 Request 对象中获取有效期信息

6.读取 Cookie 集合

前面的示例假设您要读取名称已知的 Cookie。有时，您可能需要读取可供页面使用的所有 Cookie。要读取可供页面使用的所有 Cookie 的名称和值，您可以利用如下代码遍历 Request.Cookies 集合：

  Dim i As Integer
  Dim output As String = ""
  Dim aCookie As HttpCookie
  For i = 0 to Request.Cookies.Count - 1
  aCookie = Request.Cookies(i)
  output &= "Cookie 名称 = " & Server.HtmlEncode(aCookie.Name) & "
"
  output &= "Cookie 值 = " & Server.HtmlEncode(aCookie.Value) & _
  & "

"
  Next
  Label1.Text = output 

注意：运行此代码时，您很可能会看到一个名为“ASP.NET_SessionId”的 Cookie，ASP.NET 用这个 Cookie 来保存您的会话的唯一标识符。这个会话 Cookie 不会永久保存到您的硬盘上。有关会话 Cookie 的详细信息，请参阅本文后面的 Cookie 和会话状态。
前面的示例有一个限制：如果 Cookie 有子键，就会以一个单独的名称/值字符串来显示子键。Cookie 的 HasKeys（英文）属性可以告诉您该 Cookie 是否有子键。如果有子键，您可以在子键集合中向下钻取，获取各个子键的名称和值。

如前文所述，您可以从 Cookie 属性 Values（英文）中获取有关子键的信息，该属性是类型 NameValueCollection 的集合。您可以根据索引值从 Values 集合中直接读取子键值。相应的子键值可以从 Values 集合的成员 AllKeys（英文）中得到，该成员将返回一个字符串集合。

以下示例是对前一示例的修改。示例中使用 HasKeys 属性来测试子键，如果检测到子键，就从 Values 集合中获取子键：

  Dim i As Integer
  Dim j As Integer
  Dim output As String = ""
  Dim aCookie As HttpCookie
  Dim subkeyName As String
  Dim subkeyValue As String
  For i = 0 To Request.Cookies.Count - 1
  aCookie = Request.Cookies(i)
  output &= "名称 = " & aCookie.Name & "
"
  If aCookie.HasKeys Then
  For j = 0 To aCookie.Values.Count - 1
  subkeyName = Server.HtmlEncode(aCookie.Values.AllKeys(j))
  subkeyValue = Server.HtmlEncode(aCookie.Values(j))
  output &= "子键名称 = " & subkeyName & "
"
  output &= "子键值 = " & subkeyValue & "

"
  Next
  Else
  output &= "值 = " & Server.HtmlEncode(aCookie.Value) & "

"
  End If
  Next
  Label1.Text = output 

您也可以把子键作为 NameValueCollection 对象进行提取，如下所示：

  If aCookie.HasKeys Then
  Dim CookieValues As _
  System.Collections.Specialized.NameValueCollection = aCookie.Values
  Dim CookieValueNames() As String = CookieValues.AllKeys
  For j = 0 To CookieValues.Count – 1
  subkeyName = Server.HtmlEncode(CookieValueNames(j))
  subkeyValue = Server.HtmlEncode(CookieValues(j))
  output &= "子键名称 = " & subkeyName & "
"
  output &= "子键值 = " & subkeyValue & "

"
  Next
  Else
  output &= "值 = " & aCookie.Value & "

"
  End If 

注意：请记住，我之所以调用 Server.HtmlEncode 方法，只是因为我要在页面上显示 Cookie 的值。如果您只是测试 Cookie 的值，就不必在使用前对其进行编码。

7.修改和删除 Cookie

有时，您可能需要修改某个 Cookie，更改其值或延长其有效期。（请记住，由于浏览器不会把有效期信息传递到服务器，所以您无法读取 Cookie 的过期日期。）

当然，实际上您并不是直接更改 Cookie。尽管您可以从 Request.Cookies 集合中获取 Cookie 并对其进行操作，但 Cookie 本身仍然存在于用户硬盘上的某个地方。因此，修改某个 Cookie 实际上是指用新的值创建新的 Cookie，并把该 Cookie 发送到浏览器，覆盖客户机上旧的 Cookie。

以下示例说明了如何更改用于储存站点访问次数的 Cookie 的值：

  Dim counter As Integer
  If Request.Cookies("counter") Is Nothing Then
  counter = 0
  Else
  counter = CInt(Request.Cookies("counter").Value)
  End If
  counter += 1
  Response.Cookies("counter").Value = counter.ToString
  Response.Cookies("counter").Expires = DateTime.Now.AddDays(1) 

或者：

  Dim ctrCookie As HttpCookie
  Dim counter As Integer
  If Request.Cookies("counter") Is Nothing Then
  ctrCookie = New HttpCookie("counter")
  Else
  ctrCookie = Request.Cookies("counter")
  End If
  counter = CInt(ctrCookie.Value) + 1
  ctrCookie.Value = counter.ToString
  ctrCookie.Expires = DateTime.Now.AddDays(1)
  Response.Cookies.Add(ctrCookie) 

删除 Cookie

删除 Cookie（即把该 Cookie 从用户的硬盘上物理删除）是修改 Cookie 的一种形式。由于 Cookie 位于用户的计算机中，所以您无法直接将其删除。但是，您可以让浏览器为您删除 Cookie。修改 Cookie 的方法前面已经介绍过（即用相同的名称创建一个新的 Cookie），不同的是将其有效期设置为过去的某个日期。当浏览器检查 Cookie 的有效期时，就会删除这个已过期的 Cookie。

所以，删除 Cookie 的方法与创建该 Cookie 的方法是相同的，只不过要把其有效期设置为过去的某个日期。以下示例比删除单个 Cookie 要稍微有趣一些，它使用的方法可以删除当前域的所有 Cookie：

  Dim i As Integer
  Dim cookieName As String
  Dim limit As Integer = Request.Cookies.Count - 1
  For i = 0 To limit
  aCookie = Request.Cookies(i)
  aCookie.Expires = DateTime.Now.AddDays(-1)
  Response.Cookies.Add(aCookie)
  Next 

修改或删除子键

修改单个子键的方法与最初创建它的方法相同：

  Response.Cookies("userInfo")("lastVisit") = DateTime.Now.ToString
  Response.Cookies("userInfo").Expires = DateTime.Now.AddDays(1) 

比较复杂的问题是如何删除单个子键。您不能只是简单地重新设置 Cookie 的过期日期，因为这样只能删除整个 Cookie 而不能删除单个子键。实际的解决方案是对包含子键的 Cookie 的 Values 集合进行操作。首先，通过从 Request.Cookies 对象中获取 Cookie 来重新创建 Cookie。然后，您就可以调用 Values 集合的 Remove 方法，将要删除的子键名称传递到 Remove 方法。接下来，您通常可以将修改后的 Cookie 添加到 Response.Cookies 集合，以便将修改后的 Cookie 发送回浏览器。

以下代码显示了如何删除子键。在示例中，要删除的子键的名称在变量中指定。

  Dim subkeyName As String
  subkeyName = "userName"
  Dim aCookie As HttpCookie = Request.Cookies("userInfo")
  aCookie.Values.Remove(subkeyName)
  aCookie.Expires = DateTime.Now.AddDays(1)
  Response.Cookies.Add(aCookie)

8.Cookie 与安全性

在使用 Cookie 时，您必须意识到其固有的安全弱点。我所指的安全性并不是隐私问题，正如我在前面的什么是 Cookie？中所述，隐私在更大程度上是某些用户面对的问题：这些用户很关心 Cookie 中的信息是如何被使用的。而 Cookie 的安全性问题与从客户机获取数据的安全性问题类似。对于初学者，就应用程序而言，Cookie 是用户输入的另一种形式，因而很容易被他人非法获取和利用。由于 Cookie 保存在用户自己的计算机上，所以用户至少可以看到您保存在 Cookie 中的信息。如果用户愿意，还能在浏览器向您发送 Cookie 之前修改该 Cookie。

所以，您千万不要在 Cookie 中保存保密信息 - 用户名、密码、信用卡号等等。在 Cookie 中不要保存不应该由用户掌握的内容，也不要保存可能被其他窃取 Cookie 的人控制的内容。

同样，要对从 Cookie 中得到的任何信息都持怀疑态度。不要认为得到的数据就是您当初设想的信息。处理 Cookie 值时采用的安全措施应该与处理 Web 页面中用户键入的数据时采用的安全措施相同。例如，在页面中显示值之前，我会对 Cookie 中的内容进行 HTML 编码。这是一种标准的方法，可以在显示之前净化从用户处得到的信息，对 Cookie 的处理与此相同。

另一个需要关心的问题是，Cookie 是以纯文本的形式在浏览器和服务器之间传送的，任何可以截取 Web 通信的人都可以读取 Cookie。您可以对 Cookie 的属性进行设置，使其只能在使用安全套接字层（SSL，又称 https://）的连接上传输。SSL 并不能防止保存在用户计算机上的 Cookie 被他人读取或操作，但它能防止 Cookie 在传输途中被他人截取。本文不讨论 SSL，但您必须清楚，您可以对 Cookie 进行传输保护。有关 SSL 的详细信息，请参阅 Secure Sockets Layer: Protect Your E-Commerce Web Site with SSL and Digital Certificates（英文）。

面对这些安全问题，如何才能安全地使用 Cookie？您可以在 Cookie 中保存一些不重要的数据，如用户首选项或其他对应用程序没有重大影响的信息。如果确实需要把某些敏感信息（如用户 ID）保存在 Cookie 中，就对这些信息进行加密。一种可行的方法是利用 ASP.NET Forms Authentication 实用程序创建一个身份验证票据，作为 Cookie 保存。本文不讨论有关加密的问题，但是，如果您需要在 Cookie 中保存敏感信息，就应该试着采取措施来隐藏信息，防止被他人盗用。

在 Mitigating Cross-site Scripting With HTTP-only Cookies（英文）一文中，您可以了解到更多有关 Cookie 及其安全弱点的信息。

检查浏览器是否接受 Cookie

我在前面的 Cookie 的限制一节中曾经提到一个潜在问题，即用户可以设置自己的浏览器拒绝接受 Cookie。如何才能知道您是否可以读写 Cookie？在不能写入 Cookie 时不会出现任何错误（例如 Response.Cookies 不会抛出异常），因为服务器并不跟踪呈现页面后出现的情况。浏览器同样不会向服务器发送任何有关其当前的 Cookie 设置的信息。（也许您需要了解，但 HttpBrowserCapabilities.Cookies Property [英文] 属性并不会告诉您 Cookie 是否被启用，而只能告诉您当前的浏览器是否支持 Cookie。）

一种确定浏览器是否接受 Cookie 的方法是先编写一个 Cookie，然后再尝试读取这个 Cookie。如果不能读取这个 Cookie，则可以认为该浏览器不接受 Cookie。

我编写了一个简单的示例来说明如何测试 Cookie 是否被接受。该示例包含两个页面。在第一个页面中，我编写了一个 Cookie，然后把浏览器重新定向到第二个页面。第二个页面尝试读取这个 Cookie，转而将浏览器重新定向到第一个页面，并向 URL 添加一个带有测试结果的查询字符串变量。

第一个页面的代码如下：

  Sub Page_Load()
  If Not Page.IsPostBack Then
  If Request.QueryString("AcceptsCookies") Is Nothing Then
  Response.Cookies("TestCookie").Value = "ok"
  Response.Cookies("TestCookie").Expires = _
  DateTime.Now.AddMinutes(1)
  Response.Redirect("TestForCookies.aspx?redirect=" & _
  Server.UrlEncode(Request.Url.ToString))
  Else
  labelAcceptsCookies.Text = "接受 Cookie = " & _
  Request.QueryString("AcceptsCookies")
  End If
  End If
  End Sub 

第一个页面测试是否有回信，如果没有，就搜索包含测试结果的查询字符串变量 (AcceptsCookies)。如果没有找到查询字符串变量，则表示测试还没有完成，代码就写出一个名为“TestCookie”的 Cookie。写出 Cookie 之后，示例调用 Response.Redirect 来切换到测试页面 (TestForCookies.aspx)。附加到测试页面的 URL 的是名为 redirect 的查询字符串变量，该变量中包含了当前页面的 URL，这样就能在执行测试后把重定向到该页面。

测试页面可以完全由代码组成，不需要包含控件。以下就是我使用的代码：

  Sub Page_Load()
  Dim redirect As String = Request.QueryString("redirect")
  Dim acceptsCookies As String
  ' 是否接受 Cookie？
  If Request.Cookies("TestCookie") Is Nothing Then
  ' 没有 Cookie，因此不需要接受
  acceptsCookies = 0
  Else
  acceptsCookies = 1
  ' 删除测试 Cookie
  Response.Cookies("TestCookie").Expires = _
  DateTime.Now.AddDays(-1)
  End If
  Response.Redirect(redirect & "?AcceptsCookies=" & acceptsCookies, _
  True)
  End Sub 

读取 redirect 查询字符串变量后，代码就尝试读取 Cookie。为了实现日常管理，如果该 Cookie 确实存在，就会被立即删除。测试完成后，代码从 redirect 查询字符串变量传递的 URL 构造一个新的 URL。新的 URL 也包括一个包含测试结果的查询字符串变量。最后一步是使用新的 URL 将浏览器重定向到原来的页面。

这个示例十分简单，但说明了通过运行程序并查看结果来进行测试的基本原则。其中最需要改进的地方是要永久保存 Cookie 测试结果，这样用户就不必在每次浏览原始页面时都重复进行测试。但是，实际上并不能做到这一点。Cookie 不会起作用，原因是显而易见的。另一种可能是把测试结果保存在会话状态中，但在默认情况下，会话状态也依赖于 Cookie，而如果浏览器不接受 Cookie，会话状态也不会起作用。解决后一个问题的办法是采用无 Cookie 的会话状态。下一节我将简要介绍会话状态如何与 Cookie 协作。

Cookie 和会话状态

当用户访问您的站点时，服务器会为该用户创建唯一的会话，会话将一直延续到用户访问结束。对于每个会话，ASP.NET 都维护一种基于服务器的结构（会话状态），在该结构中应用程序可以保存用户的相关信息。有关详细信息，请参阅 Session State（英文）。

ASP.NET 需要能跟踪每个用户的会话 ID，这样才能把用户映射到服务器上的会话状态信息。默认情况下，ASP.NET 使用一个非永久性的 Cookie 来保存会话状态。如果您使用读取 Cookie 一节的“读取 Cookie 集合”中的示例，您可能就会在 Cookie 中发现一个会话状态 Cookie。

但是如果用户禁用了浏览器的 Cookie，会话状态就不能使用 Cookie 来保存会话 ID，会话状态也不会起作用。这就是为什么我在前面的检查浏览器是否接受 Cookie 中说，无法在 Cookie 测试完毕后把测试结果实际保存在会话状态中，因为没有 Cookie 就没有会话状态。

ASP.NET 提供了一种解决方案，即利用无 Cookie 的会话。您可以配置自己的应用程序，不在 Cookie 中保存会话 ID，而是在站点页面的 URL 中保存。会话 ID 保存在 URL 中，也就是 ASP.NET 将 ID 保存在浏览器中，从而能够在用户请求其他页面时取回 ID。

无 Cookie 会话可以避免浏览器拒绝 Cookie 的问题，使您能够使用会话状态。如果您的应用程序依赖于会话状态，您可能就需要对其进行配置，使它能使用无 Cookie 会话。但是，在某些情况下，如果用户与其他人共享 URL - 可能是用户通过电子邮件将 URL 发送给同事，而该用户的会话仍然处于激活状态 - 那么最终这两个用户可能共享同一个会话，结果将难以预料。