📄 adminlogin.asp
字号:
<%
if request("logout")<>"" then
session("admin")=""
session("password")=""
session("flag")=""
response.redirect "adminlogin.asp"
end if
%>
<html>
<head>
<link rel="stylesheet" type="text/css" href="style.css">
<title>飞速网络WEB+WAP管理系统</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="keywords" content="飞速网络WEB+WAP管理系统">
</head>
<body bgcolor="#F7F3F7" text="#000000">
<p align="center"><br>
<br>
<p align="center"><br>
<br>
<h1 align="center"><font color="#FF0000" face="黑体">飞速网络WEB+WAP管理系统</font></h1>
<h1 align="center"> </h1>
<table width="32%" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#000000">
<form method=post action="chklogin.asp">
<tr>
<td width="100%" height="30" valign="middle" bgcolor="#FFFFFF"> 用户名：
<input class="input" style="color: #FF0000; background-color: #FFFFFF; border: 1px solid #000000" size="12" name="username"></td>
</tr>
<tr>
<td width="100%" height="29" valign="middle" bgcolor="#FFFFFF"> 密 码：
<input class="input" style="color: #FF0000; background-color: #FFFFFF; border: 1px solid #000000" type="password" size="12" name="password"></td>
</tr>
<tr><td width="100%" height="29" valign="middle" bgcolor="#FFFFFF"> 验证码： <input name="mofei" style="color: #FF0000; background-color: #FFFFFF; border: 1px solid #000000" type="text" size="12"> <%=getcode1()%></td>
</tr>
<tr>
<td width="100%" height="30" valign="middle" bgcolor="#FFFFFF">
<input class="input" style="color: #FFFFFF; background-color: #FF0000; border: 1px solid #000000" type="submit" value="确 定" name="Submit">
<input class="input" style="color: #FFFFFF; background-color: #FF0000; border: 1px solid #000000" type="reset" value="取 消" name="Submit2">
</td>
</tr>
</form>
</table>
<%
Function getcode1()
Dim test
On Error Resume Next
Set test=Server.CreateObject("Adodb.Stream")
Set test=Nothing
If Err Then
Dim zNum
Randomize timer
zNum = cint(8999*Rnd+1000)
Session("GetCode") = zNum
getcode1= Session("GetCode")
Else
getcode1= "<img src=""getcode.asp"">"
End If
End Function
%>
<br>
<br><br>
<table width="750" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td align="center">© 程序制作：<a href="http://www.wapfs.net" target="_blank">飞速网络</a></td>
</tr>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -