The Code is below ...
Code behind for "Default.aspx.vb"
Code behind for "Default.aspx.vb"
Public Class _Default
Inherits System.Web.UI.Page
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Dim httpCookie As HttpCookie = Request.Cookies("Name")
If httpCookie Is Nothing Then
txtDiv.Visible = True
Else
msgDiv.Visible = True
WelcomeLabel.Text = "Welcome back - " & httpCookie.Values("ClientName")
End If
End Sub
Protected Sub SignUpButton_Click(sender As Object, e As EventArgs) Handles SignUpButton.Click
Dim httpCookie As New HttpCookie("Name")
httpCookie.Values.Add("ClientName", NameTextBox.Text)
httpCookie.Expires = DateTime.Now.AddDays(1)
Response.Cookies.Add(httpCookie)
Response.Redirect("Thanks.aspx?name=" & NameTextBox.Text)
End Sub
End Class
Code behind for "Thanks.aspx.vb"
Public Class Thanks
Inherits System.Web.UI.Page
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
NameLabel.Text = Request.QueryString("name")
End Sub
End Class
Comments
Post a Comment