📄 admin_login.asp

📁 一个Flash和ASP结合的涂鸦网站
💻 ASP
字号:
<%@ Language=VBScript %>
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.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>
<link href="../text.css" rel="stylesheet" type="text/css">
<title>GuangGuangDang</title>
<link href="guest-text.css" rel="stylesheet" type="text/css">
</HEAD>
<BODY background="../images/bg.gif" >

<table width="622" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr> 
    <td><img src="../images/top.gif" width="622" height="17"></td>
  </tr>
  <tr> 
    <td bgcolor="#FFFFFF"> <div align="right"></div>
      <div align="right"><img src="../images/guestbook/top.jpg" width="622" height="212"></div></td>
  </tr>
  <tr valign="middle"> 
    <td height="21" valign="middle" background="../images/bg1.gif"> &nbsp;<a href="../index.asp"><img src="../images/b1.gif" alt="首页" width="38" height="9" border="0"></a>&nbsp;<a href="../aboutme.asp"><img src="../images/b2.gif" alt="我自己" width="70" height="9" border="0"></a>&nbsp;<a href="../favorites.asp"><img src="../images/b3.gif" alt="收藏" width="75" height="9" border="0"></a>&nbsp;<a href="../coollink.asp"><img src="../images/b4.gif" alt="酷站" width="80" height="9" border="0"></a>&nbsp;<a href="../wallpaper.asp"><img src="../images/b6.gif" alt="精彩桌面" width="80" height="9" border="0"></a>&nbsp;<a href="guest.asp"><img src="../images/bb5.gif" alt="留言簿" width="86" height="9" border="0"></a>&nbsp;<a href="../tuya_show.asp"><img src="../images/bb7.gif" alt="涂鸦" width="37" height="9" border="0"></a></td>
  </tr>
</table>

<table width="622" height="34" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#EFF8F7">
  <tr> 
    <td width="270"><img src="../images/guestbook/content4%20copy_r4_c2.gif" width="96" height="30"></td>
    <td width="352"><div align="right"></div></td>
  </tr>
  <tr> 
    <td height="4" colspan="2"><img src="../images/guestbook/topbg.jpg" width="622" height="2"></td>
  </tr>
  <tr>
    <td height="4" colspan="2">&nbsp; 
      <%
		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">&nbsp;</td>
          </tr>
          <tr> 
            <td height="20" valign="top"> <div align="right">管理员：<br>
              </div></td>
            <td valign="top" background="../images/guestbook/bg_xian.gif"><input type="text" name="admin"> 
            </td>
          </tr>
          <tr> 
            <td height="27"> <div align="right">密&nbsp;码：</div></td>
            <td valign="top" background="../images/guestbook/bg_xian.gif"><input type="password" name="password"></td>
          </tr>
          <tr> 
            <td height="35">&nbsp;</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">
  <tr> 
    <td height="64"> <div align="right"> </div></td>
    <td height="64">&nbsp;</td>
  </tr>
  <tr> 
    <td width="307">&nbsp;</td>
    <td width="315"><div align="right"></div></td>
  </tr>
  <tr> 
    <td><img src="../images/copyright.gif" width="269" height="7"></td>
    <td><div align="right"><img src="../images/copyright1.gif" width="79" height="19"></div></td>
  </tr>
  <tr>
    <td>&nbsp;</td>
    <td>&nbsp;</td>
  </tr>
</table>
  <tr>
    
  <td>&nbsp;</td>
    <td><div align="right"></div></td>
  </tr>
</table>
<P>&nbsp;</P>

</BODY>
</HTML>
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -