如何检测用户第一次访问我的网站并显示友好信息？
来源：asp之家 发布时间：2009-11-25 20:33:00
使用cookie来判断来访者身份，是否是首次登陆， asp代码实例如下：
< ％@ LANGUAGE="VBSCRIPT" ％ >
< ％
RequestName = Request.Form("Name")
RequestLeaveMeAlone = Request.Form("LeaveMeAlone")
If RequestName < >"" or RequestLeaveMeAlone < >"" then
' 在同一个页面中检查表单变量
Response.Cookies("MySiteVisitorName") = RequestName
Response.Cookies("MySiteVisitorName").Expires = #January 01, 2008#
Response.Cookies("MySiteLeaveMeAlone") = RequestLeaveMeAlone
Response.Cookies("MySiteLeaveMeAlone").Expires = #January 01, 2008#
' 如果表单变量存在,就创建cookie,并设置到期时间
End if
VisitorName = request.cookies("MySiteVisitorName")
LeaveMeAlone = request.cookies("MySiteLeaveMeAlone")
' 读取cookie
If VisitorName ="" and LeaveMeAlone ="" then
' 如果用户机子上不存在该cookie,就创建一个表单询问相关信息
％ >
< HTML >
< HEAD >
<title>Aspxhome.com欢迎你!</title>
< /HEAD >
< body bgcolor="#ccffff" text="black" link="navy" vlink="purple" >
< DIV ALIGN="CENTER" >
< form action="index.asp" method="POST" >
< H2 >欢迎光临asp之家< /H2 >
您的网上昵称是< input type="text" name="name" > (您可以选择不回答而直接点击"发送"按钮)
< br >< br >
< input type="hidden" name="LeaveMeAlone" value="x" >
< input type="submit" value="发送" >
< /FORM >
< /DIV >
< /BODY >
< ％
End if
If VisitorName < > "" then
Response.write "欢迎您," & VisitorName & "! 这儿就是您的家!"
' 如果cookie和用户名都已存在,则显示一个欢迎页面
End if
' 结束其余代码
％ >
0
投稿猜你喜欢
实现如下需求：在PyQt界面上有一个控件，实现其可任意拖动，且鼠标释放时自动对齐到网格。1.控件任意拖动并对齐到网格如下按钮(尺寸100&a- 我们先看一下淘宝的页面：这么一个庞然大物，该怎么切图呢？显然按照给出的方法也可以完成这项任务，但是做为前端开发的我们是否应该给自己提出更高的
- 本文实例讲述了Python操作mongodb数据库进行模糊查询操作。分享给大家供大家参考，具体如下：# -*- coding: utf-8
- 写在最前面：我在研究机器学习的过程中，给的数据集是手写数字图片被处理后的由0，1表达的txt文件，今天写一写关于图片转化为二进制txt文件的
- 环境：前端 vue ip地址：192.168.1.205后端 springboot2.0 ip地址：192.168.1.217主要开发后端。
- time 模块主要包含各种提供日期、时间功能的类和函数。该模块既提供了把日期、时间格式化为字符串的功能，也提供了从字符串恢复日期、时间的功能
- 1)doctest 使用doctest是一种类似于命令行尝试的方式，用法很简单，如下 def f(n): ""
- 有时你需临时搭建一个简单的 Web Server，但你又不想去安装 Apache、Nginx 等这类功能较复杂的 HTTP 服务程序时。这时
- 本文实例讲述了GO语言实现简单的目录复制功能。分享给大家供大家参考。具体实现方法如下：创建一个独立的 goroutine 遍历文件，主进程负
- 我就废话不多说了，大家还是直接看代码吧~from docx import Documentfrom docx import RTimport
- 最近写程序需要从文件中读取数据，并把读取的数据转换成向量。查阅资料之后找到了读取csv文件和txt文件两种方式，下面结合自己的实验过程，做简
- 我是windows下安装的Anaconda2，对应的python版本是python2.7。为了方便，又借助conda安装了python3.6
- 在防止sql注入这些细节出现问题的一般是那些大意的程序员或者是新手程序员，他们由于没有对用户提交过来的数据进行一些必要的过滤，从而导致了给大
- 在这篇文章中，我将展示如何在 CentOS/RHEL 7、Debian 以及它的衍生版本比如 Ubuntu（最新的 Ubuntu 16.04
- 什么是图像平滑处理在尽量保留图像原有信息的情况下，过滤掉图像内部的噪声，这一过程我们称之为图像的平滑处理，所得到的图像称为平滑图像。那么什么
- 在微软的ASP编程体系中，ADO对象的建立，使得从网页访问数据库成为一件易事，特别是ADO的Recordset对象使得控制数据的输出显示更为
- 由于tornado内置的AsyncHTTPClient功能过于单一, 所以自己写了一个基于Tornado的HTTP客户端库, 鉴于自己多处使
- 本文实例讲述了sql server实现递归查询的方法示例。分享给大家供大家参考，具体如下：有时候面对树结构的数据时需要进行递归查询,网上找了
- 本文实例讲述了Python实现的文本简单可逆加密算法。分享给大家供大家参考，具体如下：其实很简单，就是把一段文本每个字符都通过某种方式改变（
- 本文实例讲述了Flask框架学习笔记之消息提示与异常处理操作。分享给大家供大家参考，具体如下：flask通过flash方法来显示提示消息：f
