📄 admin_login.asp
字号:
<%@ Language=VBScript %>
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft FrontPage 5.0">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<style type="text/css"></style>
<!--#include file=gconn.asp-->
<style type="text/css">
<!--
-->
</style>
<title>G</title>
<link href="guest-text.css" rel="stylesheet" type="text/css">
</HEAD>
<BODY bgcolor="#008284" >
<table width="622" height="34" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#EFF8F7">
<tr>
<td height="4" colspan="2">
<%
dim myrs,sq
set myrs=server.CreateObject ("adodb.recordset")
sq="select top 1 * from admin"
myrs.Open sq,gconn,1,3
if request("admin") <> "" then
if myrs("admin")=Request("admin") then
if myrs("password")=request("password") then
session("admin")=true
login_ok()
else
Response.Write ("<div align=center class=text><font color=#FF0000>登陆失败！</font> </div>")
login()
end if
else
Response.Write ("<div align=center class=text><font color=#FF0000>登陆失败！</font> </div>")
login()
end if
else
login()
end if
myrs.Close ()
%>
<%sub login%>
<form name="form1" method="post" action="admin_login.asp">
<table width="340" height="97" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#EFF8F7" class="guest-test">
<tr>
<td width="160"><div align="right"></div></td>
<td width="180"> </td>
</tr>
<tr>
<td height="20" valign="top"> <div align="right">：<br>
</div></td>
<input type="text" name="admin" size="20">
</td>
</tr>
<tr>
<td height="27"> <div align="right">：</div></td>
<input type="password" name="password" size="20"></td>
</tr>
<tr>
<td height="35"> </td>
<td><input type="submit" name="Submit" value="提交" style="bgcolor:#cccccc"></td>
</tr>
</table>
</form>
<%end sub%>
<%sub login_ok%>
<div align="center" class="guest-test"><br>
登陆成功 <br>
<br>
<a href="../tuya_show.asp">［管理涂鸦］ </a> </div>
<span class="guest-test">
<%end sub%>
</span></td>
</tr>
</table>
<table width="622" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#EFF8F7">
</BODY>
</HTML>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -