一个简单的登录问题。不知道哪里错了。在线等待。大哥们帮帮忙

hjb1029 2002-11-25 07:06:40
我做了一个简单的登录系统。登录的Input如下
<form method="POST" action="form2.asp" target="_blank" name="alogin" onsubmit="javascript:submit1()">
<td height="24" valign="middle" bgcolor="006699">
<font color="#FFFFFF"><font color="#ffffff" size=2>帐 号</font>
<input name="name" type="text" id="name" style="background-color:#ffffff; border-bottom:#eeeeee 1px solid; border-left:1px solid;border-right:1px solid; border-top:1px solid; color:#000000" value="<%=name%>" size="10" maxlength="10"; font-color:#ffffff>
<font color="#FFFFFF"><font color="#ffffff" size=2 >密 码</font>
<input type="password" name="passwd" size="10" value="<%=passwd%>" id="passwd" style="background-color:#ffffff; border-bottom:#eeeeee 1px solid; border-left:1px solid;border-right:1px solid; border-top:1px solid; color:#000000">
<input type="image" src="images/login1.png" name="login" width="60" height="20">
验证如下
<% @ Language=VBScript %>
<% if request.form("login")="登陆" then
name=trim(request.form("name"))
passwd=trim(request.form("passwd"))
if((len(name)<>0)and(len(passwd)<>0))then
set Conn=server.createobject("adodb.connection")
Conn.Open"driver={SQL.server};server=HJB;uid=sa;pwd=cjj;database=hjb"
sl="select*from[user] where name='"&name&"' and passwd='"&passwd&"'"
set rec=server.createobject("adodb.recordser")
rec.open sl,conn,3,3
if rec.eof then
session("check")="0"
response.write"输入的用户名,密码不对!"
else
session("check")=1
response.write"你已经通过检查,可以访问保密网页了!"
end if
else
response.write"用户名为空或密码为空"
response.redirect"login.asp"
end if
elseif request.form("alogin")="我要注册"then
response.reditect"regist.asp"
end if
%>
在登录界面里。打进帐号和密码。只出现form2别的什么都没反映。各位大哥帮我看看有什么错的地方
...全文
30 10 打赏 收藏 转发到动态 举报
写回复
用AI写文章
10 条回复
切换为时间正序
请发表友善的回复…
发表回复
hjb1029 2002-11-25
  • 打赏
  • 举报
回复
回conner
取得INPUT的值,然后到SQL中验证呀。login.asp是登录页面的文件名。
月光易水 2002-11-25
  • 打赏
  • 举报
回复
晕!
TO:hjb1029(黄河浪子) :程序都没有执行,数据库有记录没纪录有什么关系
TO:conner(测试) : <input type="image" src="images/login1.png" name="login" width="60" height="20" value="注册"> 应该与form2一致吧 value="登陆"
conner 2002-11-25
  • 打赏
  • 举报
回复
我做了一个简单的登录系统。登录的Input如下
<form method="POST" action="form2.asp" target="_blank" name="alogin" onsubmit="javascript:submit1()">
<td height="24" valign="middle" bgcolor="006699">
<font color="#FFFFFF"><font color="#ffffff" size=2>帐 号</font>
<input name="name" type="text" id="name" style="background-color:#ffffff; border-bottom:#eeeeee 1px solid; border-left:1px solid;border-right:1px solid; border-top:1px solid; color:#000000" value="<%=name%>" size="10" maxlength="10"; font-color:#ffffff>
<font color="#FFFFFF"><font color="#ffffff" size=2 >密 码</font>
<input type="password" name="passwd" size="10" value="<%=passwd%>" id="passwd" style="background-color:#ffffff; border-bottom:#eeeeee 1px solid; border-left:1px solid;border-right:1px solid; border-top:1px solid; color:#000000">
<input type="image" src="images/login1.png" name="login" width="60" height="20" value="注册">
验证如下
<% @ Language=VBScript %>
<% if request.form("login")="登陆" then
name=trim(request.form("name"))
passwd=trim(request.form("passwd"))
if((len(name)<>0)and(len(passwd)<>0))then
set Conn=server.createobject("adodb.connection")
Conn.Open"driver={SQL.server};server=HJB;uid=sa;pwd=cjj;database=hjb"
sl="select*from[user] where name='"&name&"' and passwd='"&passwd&"'"
set rec=server.createobject("adodb.recordser")
rec.open sl,conn,3,3
if rec.eof then
session("check")="0"
response.write"输入的用户名,密码不对!"
else
session("check")=1
response.write"你已经通过检查,可以访问保密网页了!"
end if
else
response.write"用户名为空或密码为空"
response.redirect"login.asp"
end if
elseif request.form("alogin")="我要注册"then
response.reditect"regist.asp"
end if
%>
hjb1029 2002-11-25
  • 打赏
  • 举报
回复
不是啊。我要的效果不是这样的。我在SQL SERVER中有记录。比如在表user中有帐号hjb1029 密码asdf 按这个打进去的话至少也会有你“已经通过检查,可以访问保密网页了!"这个吧。如果不对。也该有反映的呀!各位大哥能帮忙改一下吗?
Lotsof 2002-11-25
  • 打赏
  • 举报
回复
login只是一个图形按纽,并没有给它赋值啊!
将它改为
<input type="image" src="images/login1.png" name="login" width="60" height="20" onclick="javascript:document.alogin.summit()"> 就可以了!
conner 2002-11-25
  • 打赏
  • 举报
回复
在一个你登陆的时候怎么就将值赋给了input,虽然不影响运行,但是你这样写的目的是什么呢?
conner 2002-11-25
  • 打赏
  • 举报
回复
程序运行的一点都没有错,完全按照你写的去执行了!就应该只出现form2别的什么都没反映的
conner 2002-11-25
  • 打赏
  • 举报
回复
这句怎么可能实现呢????
if request.form("login")="登陆" then

仔细看看吧!!!!
jujishou 2002-11-25
  • 打赏
  • 举报
回复
end if不 匹配!
月光易水 2002-11-25
  • 打赏
  • 举报
回复
运行:if request.form("login")="登陆" Then
' 条件为假 (form 中 login 没有赋值)
'语句不执行
elseif request.form("alogin")="我要注册"then
' 条件为假 (alogin <> "我要注册")
'语句不执行
end if

结果:什么都不输出 :)


28,390

社区成员

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

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