求asp中用单选按钮做判断用户的身份的代码
我在程序中用两个单选按钮做用户的身份判断,一个是高级用户,一个是普通用户,假如用户选择高级用户,就以高级用户身份登录,否则以普通用户登录,我高级用户和普通用户是两张表,这...
我在程序中用两个单选按钮做用户的身份判断,一个是高级用户,一个是普通用户,假如用户选择高级用户,就以高级用户身份登录,否则以普通用户登录,我高级用户和普通用户是两张表,这块怎么实现,谁有具体代码,帮帮忙?
展开
1个回答
展开全部
<%
if Request.Form("submit")="确定" then
dim rs,sql
sql="select * from asd where name='"&request.Form("xingming")&"'"
Set rs=db.Execute(sql)
if Request.Form("password")=""or Request.Form("xingming")=""then
Response.Write "<script>alert('请输入完整!')</script>"
elseif rs.recordcount<=0 then
response.write "<script>alert('用户不存在!')</script>"
elseif rs("password")=trim(Request.Form("password")) and rs("name")=trim( Request.Form("xingming"))then
dim username,shenfen
session("username")=request.Form("xingming")
response.Redirect "liuyan.asp"
elseif rs("password")<>trim(Request.Form("password")) or rs("name")<>trim( Request.Form("xingming")) then
response.write "密码错误"
end if
elseif Request.Form("submit")="新用户注册" then
Response.Redirect "register.asp"
elseif Request.Form("submit")="管理员" then
Response.Redirect "admin.asp"
end if
%>
这是具体的代码哦,代码的第一句好像就是判断的,你看看吧!不会的话,给我留言!祝你好运!
if Request.Form("submit")="确定" then
dim rs,sql
sql="select * from asd where name='"&request.Form("xingming")&"'"
Set rs=db.Execute(sql)
if Request.Form("password")=""or Request.Form("xingming")=""then
Response.Write "<script>alert('请输入完整!')</script>"
elseif rs.recordcount<=0 then
response.write "<script>alert('用户不存在!')</script>"
elseif rs("password")=trim(Request.Form("password")) and rs("name")=trim( Request.Form("xingming"))then
dim username,shenfen
session("username")=request.Form("xingming")
response.Redirect "liuyan.asp"
elseif rs("password")<>trim(Request.Form("password")) or rs("name")<>trim( Request.Form("xingming")) then
response.write "密码错误"
end if
elseif Request.Form("submit")="新用户注册" then
Response.Redirect "register.asp"
elseif Request.Form("submit")="管理员" then
Response.Redirect "admin.asp"
end if
%>
这是具体的代码哦,代码的第一句好像就是判断的,你看看吧!不会的话,给我留言!祝你好运!
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询