Cookies Project Screen Shot |
Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim sc As New HttpCookie("demo")
sc.Value = TextBox1.Text
sc.Expires = DateTime.Now.AddMinutes(1)
Response.Cookies.Add(sc)
End Sub
Protected Sub Button2_Click(ByVal
sender As Object,
ByVal e As
System.EventArgs) Handles Button2.Click
Label1.Text = Request.Cookies("demo").Value
End Sub