记录Session：Session("username")=TextBox1.Text.ToString().Trim();
  读出Session: Dim user As String
                user=Session("username").ToString()
  Cookies：
         首先,要定义一个 HttpCookie 
        Dim  acookie As New HttpCookie("user")

       然后可以向其中的添加一个名为"name"的项,值为"itone"
       acookie.Values.Add("name","jacky")
       然后可以向其中的添加一个名为"psw"的项,值为"itone"
       acookie.Values.Add("psw","password")
       然后将这acookie 写入客户端
        Response.AppendCookie(acookie)
       设置其过期时长
        acookie.Expires = DateTime.Now.AddDays(1)

       这里设置的是一天后过期,当然,你可以随便设置.    
'==========================================================

       写入client端后,如何在下一次客户端登录的时候读取咧? 
        Dim acookie = Request.Cookies("user")

        Label1.Text = acookie.values("name")   ' 获取值为 "itone"
        Label2.Text = acookie.values("psw")  ' 获取值为 "sksk"

源：http://zhidao.baidu.com/question/87785899.html