UC知道高手来帮我看看我这ASP代码有什么问题啊
来源：百度知道 编辑：UC知道 时间：2024/05/11 15:41:37
<%
dim userid
dim userpws
dim errormsg
dim flag
flag=0
username=Request.Form("user")
userpwd=Request.Form("pwd")
set tmprs=Myconn.Execute("Select * From user Where userid='"&username&"'")
if tmprs.eof and tmprs.bof then Errormsg=Errormsg+"<br>"+"<li>对不起，您不是本班成员!</a>！"
elseif userpwd<>tmprs("password") then response.write("密码错误!")
else flag=1
if flag=1 then
response.cookies("class061")("cookuser")="userid"
response.cookies("class061")("cookpwd")="userpwd"
response.write("登陆成功!")
%>
有什么问题,帮我改改
dim userid
dim userpws
dim errormsg
dim flag
flag=0
username=Request.Form("user")
userpwd=Request.Form("pwd")
set tmprs=Myconn.Execute("Select * From user Where userid='"&username&"'")
if tmprs.eof and tmprs.bof then Errormsg=Errormsg+"<br>"+"<li>对不起，您不是本班成员!</a>！"
elseif userpwd<>tmprs("password") then response.write("密码错误!")
else flag=1
if flag=1 then
response.cookies("class061")("cookuser")="userid"
response.cookies("class061")("cookpwd")="userpwd"
response.write("登陆成功!")
%>
有什么问题,帮我改改
1.数据库没连
2.少了End If
3.flag变量没必要（除非你要把它放session里用来以后判断登陆）,直接
……
是本班成员!</a>！"
elseif userpwd<>tmprs("password") then response.write("密码错误!")
else
response.cookies("class061")("cookuser")="userid"
……
4.关于Errormsg，不是本班学生也应该给个提示吧！
5.登陆成功跳转个页面
不懂你数据库里定义了什么值，这样怎么看呀，我也是初学者，希望有高手来解决！