当前位置：首页 > 资讯 > 技术文档

如何检测用户第一次访问我的网站并显示友好信息？

时间：2021-03-07 10:43 编辑：来源：阅读：
扫一扫，手机访问

摘要：如何检测用户第一次访问我的网站并显示友好信息？

< %@ 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>随风起舞欢迎你!</title>

< /head > < body bgcolor="#ccffff" text="black" link="navy" vlink="purple" > < DIV ALIGN="CENTER" > < form action="index.asp" method="POST" > < H2 >欢迎光临精彩春风< /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 ' 结束其余代码.

% > [b][1][/b]

全部评论(0)

上一篇：如何显示一个文本文件？
下一篇：如何利用当前时间生成随机函数？

资讯排行榜
更多>>