asp 登陆页面怎么写

2024-12-26 16:03:42
推荐回答(4个)
回答1:

很简单啊·查询数据库存会员信息的表·提取username和password跟让用户输入的用户名与密码对比啊,对比正确就跳index.aspx,错误就alert个信息提示用户输入错误·难道你想要源码?

回答2:

自己百度吧,代码多的很。
或者自己去书店,找本asp书。都有的。你这种求代码的人,不管在论坛还是在那,都懒得理你。因为你太懒。你以后最好是自己先试着写,调试不过,再求助。别人帮你修修改改,指点指点。这样你才进步快

回答3:










管理员


密 码






check.asp是数据库保存界面
代码如下:
<%
dim name,password
name=request.form("name")
password=request.form("password")
dim exec,conn,rs
exec="select *from check where(name='"&name&"' and password='"&password&"')"
set conn=server.createobject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("admin.mdb")
set rs=server.createobject("adodb.recordset")
rs.open exec,conn
if not rs.eof then
rs.Close
conn.Close
session("checked")="yes"
session("check")="right"
response.Redirect "index.asp"
else
session("checked")="no"
session("check")="wrong"
response.Redirect "login.asp"
end if
%>

回答4:

正好我也在做给你看看我做的
首先假设你的登陆页是 login.asp
这里这样写





企业管理员登陆
 












管理员
密码


这个是数据提交页 Admin_ChkLogin.asp 这个网页
<%
username=replace(trim(request("username")),"'","")
password=replace(trim(Request("password")),"'","")
set rs=server.createobject("adodb.recordset")
sql="select * from 会员信息 where password='"&password&"' and username='"&username&"'"
rs.open sql,conn,1,3
if rs.bof and rs.eof then
Response.Redirect "login.asp" '判断用户名或密码错误 或者不存在
else

session("AdminName")=rs("username")
rs.close
set rs=nothing
Response.Redirect "Index.asp" '注册成功进行页面的跳转

end if
rs.close
set rs=nothing
%>