/*
豆腐制作 都是精品
www.asp888.net 豆腐技术站
假如转载 请添加这个 版权信息
*/
<%@ Page Language=\"VB\" %>
<script language=\"VB\" runat=\"server\">
Const COOKIE_NAME As String = \"豆腐站点\"
Const COOKIE_VALUE As String = \"http://www.asp888.net\"
\\\' 声明 Cookie 对象
Dim objCookieObject As HttpCookie
Sub btnSetCookie_OnClick(Sender As Object, E As EventArgs)
\\\' Create a cookie object - I\\\'m passing name and value,
\\\' but you can also pass in a name and set the value later. objCookieObject = New HttpCookie(COOKIE_NAME, COOKIE_VALUE)
\\\' 另外的一种操作Cookie 的 方式
\\\'objCookieObject = New HttpCookie(COOKIE_NAME)
\\\'objCookieObject.Name = COOKIE_NAME
\\\'objCookieObject.Value = \"sdsd\"
\\\' 设置Cookie 的 过期时间 2001/12/31 23:59:59
objCookieObject.Expires = New DateTime(2001, 12, 11, 23, 59, 59)
\\\' 下面的这些可以不使用
objCookieObject.Domain = \"www.asp888.net\"
objCookieObject.Path = \"/path/\"
objCookieObject.Secure = True
Response.AppendCookie(objCookieObject)
End Sub
Sub btnRemoveCookie_OnClick(Sender As Object, E As EventArgs)
objCookieObject = New HttpCookie(COOKIE_NAME)
\\\' 删除Cookie
objCookieObject.Expires = New DateTime(1974, 11, 12)
Response.AppendCookie(objCookieObject)
End Sub
Sub btnGetCookie_OnClick(Sender As Object, E As EventArgs)
objCookieObject = Request.Cookies(COOKIE_NAME)
If Not(objCookieObject = null) Then
lblCookieDetails.Text = objCookieObject.Name
lblCookieDetailsName.Text = objCookieObject.Name
lblCookieDetailsValue.Text = objCookieObject.Value
lblCookieDetailsExpires.Text = objCookieObject.Expires.ToString
lblCookieDetailsDomain.Text = objCookieObject.Domain
lblCookieDetailsPath.Text = objCookieObject.Path
lblCookieDetailsSecure.Text = objCookieObject.Secure.ToString
lblCookieDetailsHasKeys.Text = objCookieObject.HasKeys.ToString
Else
lblCookieDetails.Text = \"Cookie Not Set!\"
lblCookieDetailsName.Text = \"\"
lblCookieDetailsValue.Text = \"\"
lblCookieDetailsExpires.Text = \"\"
lblCookieDetailsDomain.Text = \"\"
lblCookieDetailsPath.Text = \"\"
lblCookieDetailsSecure.Text = \"\"
lblCookieDetailsHasKeys.Text = \"\"
End If
End Sub
</script>
<html>
<head>
<title> asp+ 操作Cookie 方式大全 </title>
</head>
<body>
<h4>我们设置的Cookie 的名称是: <em><%= COOKIE_NAME %></em></h4>
<form method=\"post\" runat=\"server\">
<asp:Button type=\"submit\" id=\"btnSetCookie\" text=\"Set Cookie\" OnClick=\"btnSetCookie_OnClick\" runat=\"server\" />
<asp:Button type=\"submit\" id=\"btnRemoveCookie\" text=\"Remove Cookie\" OnClick=\"btnRemoveCookie_OnClick\" runat=\"server\" />
<p>
想要看看 Cookie 的当前的各个属性，请点击下面的按钮
</p>
<asp:Button type=\"submit\" id=\"btnGetCookie\" text=\"Get Cookie Details\" OnClick=\"btnGetCookie_OnClick\" runat=\"server\" />
</form>
<p>
<strong>Details of:</strong> <asp:label id=\"lblCookieDetails\" runat=\"server\" />
</p>
<table border=\"1\">
<thead>
<tr>
<th>Cookie属性</th>
<th>Cookie 的属性Value</th>
</tr>
</thead>
<tbody>
<tr>
<td>名称</td>
<td><asp:label id=\"lblCookieDetailsName\" runat=\"server\" /></td>
</tr>
<tr>
<td>Cookie的值</td>
<td><asp:label id=\"lblCookieDetailsValue\" runat=\"server\" /></td>
</tr>
<tr>
<td>过期时间</td>
<td><asp:label id=\"lblCookieDetailsExpires\" runat=\"server\" /></td>
</tr>
<tr>
<td>所在域</td>
<td><asp:label id=\"lblCookieDetailsDomain\" runat=\"server\" /></td>
</tr>
<tr>
<td>路径</td>
<td><asp:label id=\"lblCookieDetailsPath\" runat=\"server\" /></td>
</tr>
<tr>
<td>安全性</td>
<td><asp:label id=\"lblCookieDetailsSecure\" runat=\"server\" /></td>
</tr>
<tr>
<td>主键</td>
<td><asp:label id=\"lblCookieDetailsHasKeys\" runat=\"server\" /></td>
</tr>
</tbody>
</table>
</body>
</html>
作者:豆腐()
返回类别: 教程
上一教程: .Net开发平台研究(二)
下一教程: C#中使用DirectX编程
您可以阅读与"asp+ 操作Cookie 方式大全"相关的教程:
· asp+中的session 的使用和原理() 不需要cookie也可以使用session
· ASP.NET中Cookie编程的基础知识(5)
· ASP.NET中数据库的操作初步(3)
· ASP.NET中数据库的操作初步(2)
· ASP.NET中Cookie编程的基础知识(6)
首页
会员中心
