cookies

  Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim k As Short
        Response.Cookies("a").Value = "tiger"
        Response.Cookies("b").Value = "good"
        For k = 0 To Request.Cookies.Count - 1
            Response.Write(Request.Cookies.Item(k).Name)
            Response.Write("<br>")
            Response.Write(Request.Cookies.Get(k).Value)
            Response.Write("<br>")
            Response.Write("<br>")
        Next
        Response.Cookies.Clear()
    End Sub