asp登录界面源代码

只需实现用户名,密码,登录,注册功能... 只需实现用户名,密码,登录,注册功能 展开
 我来答
匿名用户
推荐于2018-05-17
展开全部
default
<html>

<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>个人注册</title>
<script language=vbscript>
sub b1_onclick()
if len(trim(form1.t1.value))=0 then
msgbox"请输入你的帐号!",0+48,"提示"
form1.t1.focus
elseif len(trim(form1.t2.value))=0 then
msgbox"请输入你的密码!",0+48,"提示"
form1.t2.focus
else
if isnumeric(form1.t1.value)=true then
msgbox"请输入汉字!",0+48,"重输"
form1.t1.focus
elseif len(trim(form1.t2.value))<3 or len(trim(form1.t2.value))>8 then
msgbox"密码在3至8位之间!",0+48,"重输"
form1.t2.focus
else
window.open"1.asp","new","toolbar=no,width=280,height=150,menubar=no,scrollbar=no,resizable=0"
form1.submit
end if
end if
end sub
</script>
</head>
<body>
<p>yw9sky天地</p>

<form method="POST" action="1.asp" name="form1" target="new">
<p align="center"><font size="6" color="#FF0000" face="隶书">个人注册</font></p>
<p align="center"><font size="4">姓名:</font><input type="text" name="t1" size="20"></p>
<p align="center"><font size="4">密码:</font><input type="password" name="t2" size="20"></p>
<p align="center"><input type="button" value="注册" name="B1"><input type="reset" value="重写" name="B2"></p>
</form>

</body>

</html>

1.asp
<%@ language=vbscript %>
<%
dim x,y,num
num=0
x=request.form("t1")
y=request.form("t2")
response.cookies("user")("name")=x
response.cookies("user")("num")=num
response.cookies("user")("password")=y
response.cookies("user").expires=date()+365
%>

<html>

<head>
<title>信息确认</title>
</head>
<body>
<p>yw9sky天地</p>
<table border="0" width="100%" id="table1" align=center cellspacing=1 bgcolor=#333399>
<tr bgcolor=#ffffff align=center>
<td colspan="2" width="100%">信息确认</td>
</tr>
<tr bgcolor=#ffffff align=center>
<td width="31%">姓名:</td>
<td width="69%"><% = x %></td>
</tr>
<tr bgcolor=#ffffff align=center>
<td width="31%">密码:</td>
<td width="69%"><% = y %></td>
</tr>
<tr bgcolor=#ffffff align=center>
<td colspan="2" width="100%" align="center"><a target="_blank" href="2.asp">登录</a>
<font onclick="window.close()" style="cursor:hand">关闭</font></td>
</tr>
</table>

</body>
</html>

<%@ language=vbscript %>

<html>

<head>
<title>个人登录</title>
<script language=vbscript>
sub b1_onclick()
if len(trim(form1.t1.value))=0 then
msgbox"请输入你的姓名!",0+48,"提示"
form1.t1.focus
elseif len(trim(form1.t2.value))=0 then
msgbox"请输入你的密码!",0+48,"提示"
form1.t2.focus
else
if isnumeric(form1.t1.value)=true then
msgbox"请输入汉字!",0+48,"重输"
form1.t1.focus
elseif len(trim(form1.t2.value))<3 or len(trim(form1.t2.value))>8 then
msgbox"密码在3至8位之间!",0+48,"重输"
form1.t2.focus
else
form1.submit
end if
end if
end sub
</script>
</head>
<body>
<form method="POST" action="3.asp" name="form1" target="_blank">
<p align="center"><font size="6" color="#FF0000" face="隶书">个人登录</font></p>
<p align="center"><font size="4">姓名;</font><input type="text" name="t1" size="20"></p>
<p align="center"><font size="4">密码:</font><input type="password" name="t2" size="20"></p>
<p align="center"><input type="button" value="开始登录" name="B1"><input type="reset" value="重新输入" name="B2"></p>
</form>
</body>

</html>

3.asp
<% @ language=vbscript %>
<%
dim x,y,nm,pw
x=request.form("t1")
y=request.form("t2")
nm=requset.cookies("user")("name")
pw=requset.cookies("user")("password")
if nm<>x or pw<>y then
response.redirect"default.htm"
end if
%>
<%
dim num
num=request.cookies('user")("num")
if num=0 then
num=1
else
num=num+1
end if
response.cookies("user")("num")=num
%>

<html>

<head>

<title>欢迎来访yw9sky</title>
</head>
<body>
欢迎<% =nm %>第<% =num %>次登录
</body>

</html>
匿名用户
2013-07-29
展开全部
<!--------index.asp---------->
<style>
body,form,table{ font-size:12px;font-family:Verdana}
.inp{ border-left:white;border-top:white;border-right:white;border-bottom:1px solid gray; width:80px}
</style>
<%
if request.Cookies("User")("Name")="" then
%>
<form method=post name=login action=login.asp>
<div align=center>
<table cellspacing=5 cellpadding=5>
<tr>
<td colspan=2>您还没有登录!</td>
</tr>
<tr>
<td width=60 align=right>用户名: </td><td align=left><input name=Name class=inp></td>
</tr>
<tr>
<td width=60 align=right>密 码: </td><td align=left><input name=Pwd class=inp type=password></td>
</tr>
<tr>
<td width=60 align=right>保存期限: </td><td align=left><select name=Cookies_Time>
<option value=1>1
<option value=7>1周
</select></td>
</tr>
<tr>
<td colspan=2><input type=submit value=提交></td>
</tr>
</form>
<%
else
%>
<span style="font-size:12px;font-family:Verdana">欢迎您,</span><%=request.cookies("User")("Name")%>。
<%
end if
%>

<!-------------login.asp----------->
<%
Response.Cookies("User")("Name")= request("Name")
Response.Cookies("User")("Pwd")= request("Pwd")
Cookies_Time=request.form("Cookies_Time")
if Cookies_Time="" then Cookies_Time=1
if Cookies_Time<>"0" then
Cookies_Time=dateadd("d",Cookies_Time,date())
Response.Cookies("User").expires=Cookies_Time
response.redirect "index.asp"
end if
%>
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
匿名用户
2013-07-29
展开全部
要是你要的话。我可以发一个文件给你。里面的内容是一本书的所有例子。包括有
“留言板、注册和登陆、Blog、小型论坛、新闻发布等等。”
都是ASP版的。只要你建好站点。复制相应的文件到你站点下就行了。
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
匿名用户
2013-07-29
展开全部
你可以去下载!!!!很简单的 不需要验证吗
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 1条折叠回答
收起 更多回答(2)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

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

类别

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

说明

0/200

提交
取消

辅 助

模 式