Visual Basic 限定的サンプル
VB.NET 2002 対応 VB.NET 2003 対応 VB2005 対応

 

Visual Basic 中学校 > 限定的サンプル >

クッキーの読み書き

Button1をクリックするとクッキーに「こんにちは」という値を書き込みます。Button2をクリックするとクッキーに書き込まれている値(「こんにちは」)を読み込みます。

必要なコントロール
Button1
Button2
Label1

 

VB.NET 2002 対応 VB.NET 2003 対応 VB2005 対応

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

    Response.Cookies("MyCookie").Expires = Now.AddHours(1)
'クッキーの有効期間を1時間に設定
   
Response.Cookies("MyCookie")("Memo") = "こんにちは" 'クッキーに書き込

   
Label1.Text = "クッキーに書き込みました。"

End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

    Dim
CookieValue As String = Request.Cookies("MyCookie")("Memo")

    Label1.Text =
"クッキーの内容:" & CookieValue

End
Sub