📄 index.asp

📁 网吧使用的导航web站点
💻 ASP
字号:
<!--#include file="mdb.asp"-->
<%
dim site
sql="select site from title"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,3
site=rs("site")
rs.close
set rs=nothing
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
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>管理员登录 - <%=site%></title>
<style>
<!--
.p1          { font-size: 12px; font-family: 宋体; color: #000000 }
li           { color: #000000}
td           { font-size: 12px; font-family: 宋体; color: #000000 }
body {
	background-image: url();
}
-->
</style>
</head>
<body onkeydown=return(!(event.keyCode==78&&event.ctrlKey))><br><br><br> 
<table width="300" border="0" cellspacing="1" cellpadding="5" align="center" bgcolor="#000000">
  <form name="form1" method="post" action="chklogin.asp">
    <tr>
      <td bgcolor="#E8E8E8" align="center"  colspan="2" height="45">管理登陆</td>
    </tr>
    <tr>
      <td bgcolor="#FFFFFF" width="80">用户名： </td>
      <td bgcolor="#FFFFFF" width="220"><input type="text" name="username" class="textarea" size="19"></td>
    </tr>
    <tr>
      <td bgcolor="#FFFFFF">密&nbsp;&nbsp;码：</td>
      <td bgcolor="#FFFFFF"><input type="password" name="password" class="textarea" size="19"></td>
    </tr>
    <tr>
      <td bgcolor="#FFFFFF">验证码：</td>
      <td bgcolor="#FFFFFF"><input type="text" name="mofei" class="textarea" size="19">&nbsp;<%=getcode1()%></td>
    </tr>
    <tr>
      <td bgcolor="#FFFFFF" colspan="2" align="center" height="30" valign="middle"><input style="color: #FFFFFF; background-color: #FF1171; border: 1px solid #000000" type="submit" value="确 定" name="Submit">
&nbsp;&nbsp;&nbsp;
        <input style="color: #FFFFFF; background-color: #FF1171; border: 1px solid #000000" type="reset" value="取 消" name="Submit2"></td>
    </tr>
  </form>
</table>
</body>
</html>
⌨️ 快捷键说明

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