为asp页面加个简单登陆密码

我没学过asp、小白哈。。。登陆index.asp页面,需要输入用户名123,密码456;输入错误要重新输入。输入正确即可看到index的真正内容。。。不管用什么方法,达... 我没学过asp、小白哈。。。
登陆index.asp页面,需要输入用户名123,密码456;输入错误要重新输入。
输入正确即可看到index的真正内容。。。
不管用什么方法,达到要求就可。谢谢!
展开
 我来答
bdstudy
2009-05-19 · TA获得超过1781个赞
知道小有建树答主
回答量:460
采纳率:50%
帮助的人:368万
展开全部
楼上的回答,是一般网站的做法。
根据你的情况,就给你个最简单的,代码也尽量简洁,清楚不必要的代码干扰。
例子的目的在于让你浅显理解原理。

-----------login.asp---------------------------------------
<html><head><title>简单登陆</title></head>
<body>
<form method="post" action="login.asp" name="loginForm">
用户名:<INPUT maxLength=16 size=16 type=text name=username >
密码:<INPUT maxLength=16 size=16 type=password name=password>
<INPUT type=submit value="登陆">
</form>
</body></html>
<%
username=request("username")
password=request("password")
if username="123" and password="456" then//这里是最简单的设定,一般做法是从数据库读取用户名和密码,判断是否正确
Response.Redirect("index.asp")//这里是判断输入正确后跳转的页面,你根据情况修改即可(关键是理解原理,然后可以灵活应用)
else
response.write"<script>alert('输入错误,请重新输入')</script>"
end if
%>

其实够简单的,这样些为的是便于你理解。由于简单,没有测试。平时,再简单的东西,建议都要测试。
靐一龘
2016-03-18 · TA获得超过2023个赞
知道小有建树答主
回答量:437
采纳率:50%
帮助的人:218万
展开全部
ASP
登录代码介绍

1(index.asp 用户登录页面)

<!-- #include file="conn.asp" -->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>
会员
</title>
<style type="text/css">
<!--
body,td,th {
font-family:
宋体
;
font-size: 14px;
}
-->
</style>
</head>
<body>
<center>
<p>
会员注册系统
</p>
<form name="form1" method="post" action="login.asp">
<table width="34%" border="0">
<tr>
<td width="33%" height="30">
用户名
:</td>
<td
width="67%"
height="30"><input
name="username"
type="text"
id="username"
size="15"></td>
</tr>
<tr>
<td height="30">
密码
:</td>
<td height="30"><input name="password" type="password" id="password" size="15"></td>
</tr>
<tr>
<td colspan="2" align="center"><input type="submit" name="Submit" value="
确定
">
<input type="reset" name="Submit" value="
重置
"></td>
</tr>
<tr>
<td colspan="2"><a href="reg.asp" target="_self">
注册
</a></td>
</tr>
</table>
</form>
</center>
</body>

</html>

2(login.asp 用户数据处理文件)

<!-- #include file="conn.asp" -->
<%
'
打开数据库判断用户是否存在
,info
为表名
,username
为字段名

set rsc=server.createobject("adodb.recordset")
sqlc="select
*
from
info
where
username='"&request.Form("username")&"'
and
password='"&request.Form("password")&"'"
rsc.open sqlc,conn,1,1
session("username")=rsc("username")
session("password")=rsc("password")
session.Timeout=30
set rsc=nothing
response.Redirect("change.asp")
'
如果用户不存在
,session("username")
为空

%>

3(change.asp 用户信息修改页面)

<!-- #include file="conn.asp" -->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>
修改
</title>
<style type="text/css">
<!--
body,td,th {
font-size: 14px;
}
-->
</style></head>
<center>
<body>
<br>
<%

set rsc=server.createobject("adodb.recordset")
sqlc="select
*
from
info
where
username='"&session("username")&"'
and
password='"&session("password")&"'"
rsc.open sqlc,conn,1,1
nr=rsc("password")
username=rsc("username")
password=rsc("password")
sex=rsc("sex")
qq=rsc("qq")
mail=rsc("mail")
add=rsc("add")
personalinfo=rsc("personalinfo")
vv=rsc("ntime")
set rsc=nothing
if nr="" then
response.Redirect("index.asp")
end if
if strcomp(nr,request.Form("password"))=0 then
response.Write("
欢迎你!
"&request.Form("username"))
response.Write("
你是在
"&vv&"
注册的
")
session("username")=request.Form("username")
end if
if session("username")="" then
response.Redirect("index.asp")
end if
%>
<form name="form1" method="post" action="change.asp?ac=ch">
<table width="39%" height="105" border="0" >
<tr>
<td width="27%" height="30">
用户名:
</td>
<td
width="73%"
height="30"><input
name="username"
type="text"
id="username"
value="<%=username%>">
*</td>
</tr>
<tr>
<td height="30">
密码:
</td>
<td
height="30"><input
name="password"
type="text"
id="password"
value="<%=password%>">
*</td>
</tr>
<tr>
<td height="30">
性别:
</td>
<td height="30"><input name="sex" type="text" id="sex" value="<%=sex%>"></td>
</tr>
<tr>
<td height="30">QQ

</td>
<td height="30"><input name="qq" type="text" id="qq" value="<%=qq%>"></td>
</tr>
<tr>
<td height="30">Mail

</td>
<td height="30"><input name="mail" type="text" id="mail" value="<%=mail%>"></td>
</tr>
<tr>
<td height="30">
地址:
</td>
<td height="30"><input name="add" type="text" id="add" value="<%=add%>"></td>
</tr>
<tr>
<td>
介绍
</td>
<td><textarea
name="personalinfo"
cols="30"
rows="6"
id="personalinfo"><%=personalinfo%></textarea></td>
</tr>
<tr>
<td> </td>
<td><input type="submit" name="Submit" value="
修改
">
<a href="change.asp?se=y" target="_self">
退出系统
</a></td>
<% if strcomp(request.QueryString("se"),"y")=0 then
session("username")=""
response.Redirect("index.asp")
end if
%>
</tr>
</table>
</form>
<%
if strcomp(request.QueryString("ac"),"ch")=0 then
set rs=server.createobject("adodb.recordset")
sql="select * from info where username='"&session("username")&"'"
rs.open sql,conn,1,3
rs("username")=request.Form("username")
rs("password")=request.Form("password")
rs("mail")=request.Form("mail")
rs("sex")=request.Form("sex")
rs("qq")=request.Form("qq")
rs("add")=request.Form("add")
rs("personalinfo")=request.Form("personalinfo")
rs.update
set rs=nothing
response.Write("
修改完成!
")
end if
%>
</body>
</center>
</html>

4(reg.asp 新用户注册页面)

<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>
用户注册
</title>
<style type="text/css">
<!--
body,td,th {
font-family:
宋体
;
font-size: 14px;
}
-->
</style>
</head>
<body>
<center>
用户注册
<br>
<%
=request.QueryString("msg")
%>
<form name="form1" method="post" action="addnewdata.asp?ac=adduser">
<table width="39%" height="105" border="0" >
<tr>
<td width="27%" height="30">
用户名:
</td>
<td width="73%" height="30"><input name="username" type="text" id="username">
*</td>
</tr>
<tr>
<td height="30">
密码:
</td>
<td height="30"><input name="password" type="password" id="password">
*</td>
</tr>
<tr>
<td height="30">
确定密码:
</td>
<td height="30"><input name="password2" type="password" id="password2">
*</td>
</tr>
<tr>
<td height="30">
性别:
</td>
<td height="30"><input name="sex" type="text" id="sex"></td>
</tr>
<tr>
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
prospertu
2016-02-25 · 超过20用户采纳过TA的回答
知道答主
回答量:206
采纳率:0%
帮助的人:42.5万
展开全部
简单可以不通过数据库的啊,直接将密码存储在变量中,
用输入密码和变量密码对比,正确就打开页面,不正确就关闭页面。

输入框的话可以先用一个session变量存储登陆结果,若未登陆则显示输入框。
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
小刚爱生活
推荐于2016-10-25 · TA获得超过1025个赞
知道大有可为答主
回答量:2140
采纳率:100%
帮助的人:555万
展开全部
<%
dim username,password,user,pass,action
user="123"
pass="456"
action=trim(request("action"))
if action="logout" then
session("userlogin")=""
response.Write "已退出"
response.Write "<a href=t.asp>返回</a>"
response.End()
end if
if session("userlogin")<>"ok" then
if action="login" then
username=trim(request("username"))
password=trim(request("password"))
if username=user and password=pass then
session("userlogin")="ok"
response.redirect "t.asp"
else
response.Write "登陆失败"
response.Write "<a href=t.asp>重新登陆</a>"
response.End()
end if
else
%>
<form id="form1" name="form1" method="post" action=""><table width="300" border="0" align="center" cellpadding="2" cellspacing="1" bgcolor="#000000">
<tr>
<td width="83" height="30" align="right" bgcolor="#FFFFFF">用户名:</td>
<td width="214" bgcolor="#FFFFFF">
<input type="text" name="username" id="username" />

</td>
</tr>
<tr>
<td height="30" align="right" bgcolor="#FFFFFF">密  码: </td>
<td bgcolor="#FFFFFF"><input type="text" name="password" id="password" /></td>
</tr>
<tr>
<td height="30" colspan="2" align="center" bgcolor="#FFFFFF"><input type="submit" name="button" id="button" value="提交" />
<input name="action" type="hidden" id="action" value="login" /></td>
</tr>
</table>
</form>
<%
end if
else
%>
<table width="500" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="50" colspan="3"><p><a href="?action=logout">退出</a></p><p>此处为登陆后才能看到的内容此处为登陆后才能看到的内容此处为登陆后才能看到的内容此处为登陆后才能看到的内容此处为登陆后才能看到的内容此处为登陆后才能看到的内容此处为登陆后才能看到的内容此处为登陆后才能看到的内容此处为登陆后才能看到的内容此处为登陆后才能看到的内容此处为登陆后才能看到的内容此处为登陆后才能看到的内容此处为登陆后才能看到的内容此处为登陆后才能看到的内容此处为登陆后才能看到的内容此处为登陆后才能看到的内容此处为登陆后才能看到的内</p>
</td>
</tr>
</table>
<%
end if
%>

保存以上代码为t.asp ,如需修改密码修改一下两行即可:
user="123"
pass="456"
本回答被提问者采纳
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 1条折叠回答
收起 更多回答(2)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式