会员级别跳转页面问题请教?

myname_wenxiuyun 2005-12-11 05:37:10
假如VIP会员 登入 跳转至VIP.asp,
假如VIP2会员 登入 跳转至VIP2.asp,
假如VIP3会员 登入 跳转至VIP3.asp,
假如VIP4会员 登入 跳转至VIP4.asp,

否则跳转至reg.asp页面;
下面是这样的:


'判断帐号及密码是否正确
set recCheckUser=server.CreateObject("ADODB.recordset")
uid=trim(Request("userid"))
upwd=trim(Request("password"))
strSQL="select * from userinfo where txtId='" & uid & "' and txtPass='" & upwd & "'"
recCheckUser.Open strSQL,conn

if not recCheckUser.EOF then
'如果用户帐号及密码正确

'检测用户帐号是否审核通过或被锁定
If CheckUserIdBegin(Uid)=0 Then
Response.Write "<script language=JavaScript>{window.alert('此会员帐号尚未通过验证，请尽快与我们联系!');window.history.go(-1);}</script>"
response.end
End If

'用户进入,就是这句怎样识别会员类型及跳转的页面
call UserEnter(uid,1)
response.Redirect("vip.asp")
Response.End
else
'用户帐号及密码不正确
recCheckUser.Close
set recCheckUser=nothing
set conn=nothing
Response.Write "<script language=JavaScript>{window.alert('您输入的帐号及密码错误，请重新输入!');window.history.go(-1);}</script>"
end if



这些代码怎么写?
...全文
254 20 打赏 收藏 转发到动态 举报
写回复
用AI写文章
20 条回复
切换为时间正序
请发表友善的回复…
发表回复
xx123731 2005-12-19
  • 打赏
  • 举报
 回复
vipkind=recCheckUser("vip")
call UserEnter(uid,1)
select case vipkind
case 1
response.Redirect("vip.asp")
case 2
response.Redirect("vip2.asp")
case 3
response.Redirect("vip3.asp")
case 4
response.Redirect("vip4.asp")
case else
response.Redirect("reg.asp")
end select
Response.End()
myname_wenxiuyun 2005-12-17
  • 打赏
  • 举报
 回复
存储VIP级别的字段为VIP,级别有四种VIP1、VIP21、VIP3、VIP4

VIP1对应的文件是VIP1.asp
VIP2对应的文件是VIP2.asp
VIP3对应的文件是VIP3.asp
VIP4对应的文件是VIP4.asp

vipkind=recCheckUser("vip級別")
call UserEnter(uid,1)
select case vipkind
case 1
response.Redirect("vip.asp")
case 2
response.Redirect("vip2.asp")
case 3
response.Redirect("vip3.asp")
case 4
response.Redirect("vip4.asp")
case else
response.Redirect("reg.asp")
end select
Response.End()
这样的话不能跳转到各自的页面
xx123731 2005-12-15
  • 打赏
  • 举报
 回复
你用一个字段存储VIP的级别就行了啊。。。你怎么用4个？

如果VIP的级别是100个，难道你要建100个VIP字段？
myname_wenxiuyun 2005-12-13
  • 打赏
  • 举报
 回复
楼上说:
用session存用户的级别，在一个页面进行判断。
if session("vip")=vip级别 then response.redirect vip级别&".asp"

每个页面都包含这个判断页面就行了。
==============================================================
但我处理登陆成功的代码是:
'用户进入,就是这句怎样识别会员类型及跳转的页面
call UserEnter(uid,1)
response.Redirect("vip.asp")
Response.End
也就是说只有一个文件处理,不是像你说的每个页面都加.所以我想用上面的代码修改一下就可以自动登陆到各自的页面.
xx123731 2005-12-13
  • 打赏
  • 举报
 回复
用session存用户的级别，在一个页面进行判断。
if session("vip")=vip级别 then response.redirect vip级别&".asp"

每个页面都包含这个判断页面就行了。
fenglik 2005-12-13
  • 打赏
  • 举报
 回复
这么写有漏洞,我注册一个vip2的帐号,看到是跳转到vip2.asp
我就直接输入vip3.asp地址,不是可以进去vip3.asp页面中吗?

myname_wenxiuyun 2005-12-13
  • 打赏
  • 举报
 回复
vipkind=recCheckUser("vip級別")

这里的vip級別写什么?
ybfqlyq 2005-12-13
  • 打赏
  • 举报
 回复
首先你取那個用戶名，得出他的級別，再通過級別去跳轉到相應的頁面。

'用户进入,就是这句怎样识别会员类型及跳转的页面
call UserEnter(uid,1)
response.Redirect("vip.asp")
Response.End
換成
vipkind=recCheckUser("vip級別")
select case vipkind
case 1
response.Redirect("vip.asp")
case 2
response.Redirect("vip2.asp")
case 3
response.Redirect("vip3.asp")
case 4
response.Redirect("vip4.asp")
case else
response.Redirect("reg.asp")
end select
wfwclyms 2005-12-13
  • 打赏
  • 举报
 回复
帮顶！

帮忙！
http://community.csdn.net/Expert/topic/4457/4457244.xml?temp=3.281802E-02
myname_wenxiuyun 2005-12-13
  • 打赏
  • 举报
 回复
是这样的意思吗?

vipkind=recCheckUser("vip1")
call UserEnter(uid,1)
select case vipkind
case 1
response.Redirect("vip.asp")
case 2
response.Redirect("vip2.asp")
case 3
response.Redirect("vip3.asp")
case 4
response.Redirect("vip4.asp")
case else
response.Redirect("reg.asp")
end select
Response.End()

vipkind=recCheckUser("vip2")
call UserEnter(uid,1)
select case vipkind
case 1
response.Redirect("vip.asp")
case 2
response.Redirect("vip2.asp")
case 3
response.Redirect("vip3.asp")
case 4
response.Redirect("vip4.asp")
case else
response.Redirect("reg.asp")
end select
Response.End()

vipkind=recCheckUser("vip3")
call UserEnter(uid,1)
select case vipkind
case 1
response.Redirect("vip.asp")
case 2
response.Redirect("vip2.asp")
case 3
response.Redirect("vip3.asp")
case 4
response.Redirect("vip4.asp")
case else
response.Redirect("reg.asp")
end select
Response.End()

vipkind=recCheckUser("vip4")
call UserEnter(uid,1)
select case vipkind
case 1
response.Redirect("vip.asp")
case 2
response.Redirect("vip2.asp")
case 3
response.Redirect("vip3.asp")
case 4
response.Redirect("vip4.asp")
case else
response.Redirect("reg.asp")
end select
Response.End()

vipkind=recCheckUser("vip級別")
call UserEnter(uid,1)
select case vipkind
case 1
response.Redirect("vip.asp")
case 2
response.Redirect("vip2.asp")
case 3
response.Redirect("vip3.asp")
case 4
response.Redirect("vip4.asp")
case else
response.Redirect("reg.asp")
end select
Response.End()
sujinlin 2005-12-13
  • 打赏
  • 举报
 回复
vipkind=recCheckUser("vip級別")
这里只有一个VIP级别吧
vip2
vip3
vip4
怎么写


第一个怎么写的，其他的就怎么写 。上面说的已经非常详细了。竟然……

真的不明白，你那里没有懂》？
myname_wenxiuyun 2005-12-13
  • 打赏
  • 举报
 回复
vipkind=recCheckUser("vip級別")
这里只有一个VIP级别吧
vip2
vip3
vip4
怎么写
xx123731 2005-12-13
  • 打赏
  • 举报
 回复
你在数据表里用的什么字段做VIP的判断标准？ 如果是一个VIP级别的字段就这样
把call UserEnter(uid,1)
response.Redirect("vip.asp")
Response.End
換成
vipkind=recCheckUser("vip級別")
call UserEnter(uid,1)
select case vipkind
case 1
response.Redirect("vip.asp")
case 2
response.Redirect("vip2.asp")
case 3
response.Redirect("vip3.asp")
case 4
response.Redirect("vip4.asp")
case else
response.Redirect("reg.asp")
end select
Response.End()
myname_wenxiuyun 2005-12-12
  • 打赏
  • 举报
 回复
vip 1-4你用什么判断？

数据库中肯定应该有个字段用来存放vip的级别的

借用楼上写的
==============================================
'用户进入,就是这句怎样识别会员类型及跳转的页面
call UserEnter(uid,1)
response.Redirect("vip.asp")
Response.End

=============================================
用下面代码替换


type=recCheckUser("vip级别")
select case type
case 1
response.Redirect("vip.asp")
case 2
response.Redirect("vip1.asp")
case 3
response.Redirect("vip2.asp")
case else
response.Redirect("reg.asp")
end select

Response.End()
=======================================
按照上面的是不是就只有一个VIP级别了,我的意思是:
假如VIP(字段)会员 登入 跳转至VIP.asp,
假如VIP2(字段)会员 登入 跳转至VIP2.asp,
假如VIP3(字段)会员 登入 跳转至VIP3.asp,
假如VIP4(字段)会员 登入 跳转至VIP4.asp,

否则跳转至reg.asp页面;
下面是这样的:
wkcode 2005-12-12
  • 打赏
  • 举报
 回复
为什么这么写呢?给你个思路:在一个页面里写全部功能,但只有当用户级别符合某级时,才显示此项,这样的好处是代码比较整齐,而且可以在数据库中随时分配各个级别所拥有的功能!
sujinlin 2005-12-12
  • 打赏
  • 举报
 回复
vip 1-4你用什么判断？

数据库中肯定应该有个字段用来存放vip的级别的

借用楼上写的
==============================================
'用户进入,就是这句怎样识别会员类型及跳转的页面
call UserEnter(uid,1)
response.Redirect("vip.asp")
Response.End

=============================================
用下面代码替换


type=recCheckUser("vip级别")
select case type
case 1
response.Redirect("vip.asp")
case 2
response.Redirect("vip1.asp")
case 3
response.Redirect("vip2.asp")
case else
response.Redirect("reg.asp")
end select

Response.End()
myname_wenxiuyun 2005-12-12
  • 打赏
  • 举报
 回复
假如VIP会员 登入 跳转至VIP.asp,
假如VIP2会员 登入 跳转至VIP2.asp,
假如VIP3会员 登入 跳转至VIP3.asp,
假如VIP4会员 登入 跳转至VIP4.asp,

否则跳转至reg.asp页面;
下面是这样的:


'判断帐号及密码是否正确
set recCheckUser=server.CreateObject("ADODB.recordset")
uid=trim(Request("userid"))
upwd=trim(Request("password"))
strSQL="select * from userinfo where txtId='" & uid & "' and txtPass='" & upwd & "'"
recCheckUser.Open strSQL,conn

if not recCheckUser.EOF then
'如果用户帐号及密码正确

'检测用户帐号是否审核通过或被锁定
If CheckUserIdBegin(Uid)=0 Then
Response.Write "<script language=JavaScript>{window.alert('此会员帐号尚未通过验证，请尽快与我们联系!');window.history.go(-1);}</script>"
response.end
End If

'用户进入,就是这句怎样识别会员类型及跳转的页面
call UserEnter(uid,1)
response.Redirect("vip.asp")
Response.End
else
'用户帐号及密码不正确
recCheckUser.Close
set recCheckUser=nothing
set conn=nothing
Response.Write "<script language=JavaScript>{window.alert('您输入的帐号及密码错误，请重新输入!');window.history.go(-1);}</script>"
end if



就以上代码怎么改写?
wojiaogyp 2005-12-12
  • 打赏
  • 举报
 回复
什么意思?
myname_wenxiuyun 2005-12-12
  • 打赏
  • 举报
 回复
能不能按我上面一楼的代码改一下?
skycuilin 2005-12-11
  • 打赏
  • 举报
 回复
type=x
select case type
case 1
response.Redirect("vip.asp")
case 2
response.Redirect("vip1.asp")
case 3
response.Redirect("vip2.asp")
case else
response.Redirect("reg.asp")
end select
关于uniapp开发企业微信内置应用扫码跳转Ios与Android返回兼容性问题
最近在做一个uniapp开发企业微信内置应用中实现扫码跳转到详情页面的功能，其中发现了一个ios与android点击返回兼容性问题，在该跳转后的详情页面发现ios点击返回是可以正常返回上一个页面的，然后发现android点击返回则是直接关闭应用，这个问题真是我没想到的，针对这个问题我也想了一些方法，同时也去网上各种搜导航栏左边,中间，右边的内容可以自定义吗？- 开发者社区 - 企业微信开发者中心。
访问静态html页面,用Filter程序实现静态HTML页面的访问保护
今天为练习Filter的用法编写了一个小程序.当用户通过article的超链接读取文章的时候,会通过Filter进行检测有没有登录.只有登录的读者才能跳到文章页面,否则跳到登录页面.文章就用简单的article1 和article2 的html页面来表示这是Filter的代packagea2;import java.io.IOException;import java.io.Unsupporte...
Confirm确认框无效的解决方法

试了很多办法，后来终于通过请教高手解决了。
 
问题出在IE上，在IE6.0测试正常，7.0出现问题，点取消后仍然会执行click事件，似乎是IE安全级别的问题，可能是因为脚本被禁用导致的。将下列完整代码写上就解决了。
 
设置JSP页面不缓存,也就是页面立刻失效
转载自扑热息痛的博客 jsp设置页面过期 服务端方法： response.setHeader("Pragma","No-cache"); response.setHeader("Cache-Control","no-cache"); response.setDateHeader("Expires", -10); ％> 在登陆页面和登陆后页面均加入这段代码即可 注意，一定
设置JSP页面不缓存
转载自扑热息痛的博客 jsp设置页面过期 服务端方法： response.setHeader("Pragma","No-cache"); response.setHeader("Cache-Control","no-cache"); response.setDateHeader("Expires", -10); ％> 在登陆页面和登陆后页面均加入这段代码即可 注意，一定
ASP

28,406

社区成员

356,946

社区内容

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages，是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今

加载中

查看更多榜单
社区公告
暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章