📄 index.asp

📁 一对一校友录多班级而且非常漂亮http://free.cnyys.com/my/yhe/DEFAULT.ASP

💻 ASP

字号:

<!--#include file="../conn2.asp"-->
<%dim type2
type2=request.querystring("type2")
select case type2
case "login":
call login
case else:
call show
end select
sub show%>
<br> 
<TABLE width="50%" align=center 
                  border=0>
   <form name="form1" method="post" action="index.asp?type2=login">
                    <TBODY>
                    <TR> 
                      <TD width="31%">&nbsp;</TD>
					    <TD width="69%">只有管理员才能进的啊！</TD>
                    </TR>
                    <TR>
                      <TD><div align="right">用户名：</div></TD>
					    <TD><input name="username" type="text" id="username"></TD>
                    </TR>
                    <TR>
                      <TD><div align="right">密码一：</div></TD>
					    <TD><input name="password" type="password" id="password"></TD>
                    </TR>
                    <TR>
                      <TD><div align="right">密码二：</div></TD>
					    <TD><input name="password2" type="password" id="password2"></TD>
                    </TR>
                   <TR>
                      <TD>&nbsp;</TD>
					    <TD><input type="submit" name="Submit" value="提交">　
					      <input type="reset" name="Submit" value="重置"></TD>
                    </TR>
                    <TR>
                      <TD>&nbsp;</TD>
					    <TD><%=now()%>
			          </TD>
                    </TR>
</TBODY></form></TABLE>
<br>
<%end sub
sub login
dim rs,password,username,password2
username=request.form("username")
password=request.form("password")
password2=request.form("password2")
set rs=server.createobject("adodb.recordset")
sql="select * from admin where username='"&username&"'"
rs.open sql,conn,1,3
if password<>rs("password") or password2<>rs("password2") then
response.write "<title>sorry!!!</title>"
response.write "<body>"
response.write "<p>&nbsp;</p><p>&nbsp;</p><p>&nbsp;</p><table width=253 border=0 bgcolor=#000000 cellspacing=1 cellpadding=0 align=center><tr><td align=center bgcolor=#FFFFFF><p>&nbsp;</p><p>帐号或密码错误,</p><p><a href='javascript:history.go(-1)'>请返回重新输入</a></p></td></tr></table>"
exit sub
end if
rs("lastdate")=Now()
rs("login")=rs("login")+1
rs.update
Session("chong")=4
rs.close
set rs=nothing
response.redirect "manage.htm"
end sub%>
</BODY></HTML>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -