1. 爱易网页
  2. ASP教程
  3. 使用Cookie来跟踪用户

使用Cookie来跟踪用户

日期：2011-04-24　 浏览次数：20853 次

Source Code:



<%

'*** Keeping track of how many times
'*** a user visits a web page, by
'*** reading and writing cookies.

'*** In this example "asphole" will be
'*** the name of our cookie, and
'*** "totalvisit" will be the 'key'
'*** value we keep track of. You can
'*** have multiple 'keys' for each
'*** cookie.

'*** Declare your variables
Dim NumVisit

'*** Check to see how many times they
'*** have been to your web page.
NumVisit = Request.Cookies("asphole")("totalvisit")

'*** If this is their first visit to
'*** the page NumVisit is blank, so
'*** make the value of NumVisit 0.
If NumVisit = "" Then
NumVisit = 0
End If

'*** Display how many times they have
'*** visited your web page.
Response.Write "Visits to this page: " & NumVisit

'*** Count the visit to the web page
NumVisit = NumVisit + 1

'*** Write the new total back to
'*** the cookie in their browser
Response.Cookies("asphole")("totalvisit") = NumVisit

'*** Specify when the cookie expires.
'*** If you don't, the cookie will
'*** expire when the user closes their
'*** browser, and you'll lose all info.
Response.Cookies("asphole").Expires = "January 1, 2020"

%>




-END-

相关资料更多>

  1. 用asp编写文档搜索页面_ASP全文检索_ASP教程
  2. FSO使用教程9 -- 终结FSO应用实例篇
  3. 关于ASP中堆栈溢出错误的解决
  4. 深入研究Application和Session对象(包括global.asa)3
  5. 用asp显示当前在线用户信息，不是简单只显示人数那种！[2](转)
  6. Asp.Net MVC4入门指南（七）：给电影表和模型添加新字段
  7. 在ASP.NET中怎么进行文件下传
  8. 关于组件出现的有关问题 请
  9. asp+access数据库更新的有关问题