www.gusucode.com > 黑鹰自助链管理系统 1.1 商业版码程序 > adminhymm/index.asp
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<!--#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
%>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>后台登陆</title>
<link href="img/login.css" rel="stylesheet" type="text/css" />
</head>
<body>
<div class="main">
<div class="title">
</div>
<div class="login">
<form name="form1" method="post" action="chklogin.asp">
<table width="413" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#EEEAD6">
<div class="inputbox">
<dl>
<dt>用户名：</dt>
<dd><input type="text" class="textarea" size="20" name="username">
</dd>
</dl>
<dl>
<dt>密码：</dt>
<dd><input class="textarea" type="password" size="20" name="password">
</dd>
</dl>
<dl>
<dt>认证码：</dt>
<dd><input type="text" name="mofei" class="textarea" size="20"> <%=getcode1()%>
</dd>
</dl>
</div>
<div class="butbox">
<dl>
<dt><input class="button" type="submit" value="" name="Submit"></dt>
<dd><a href="http://www.hymm.net" target="_blank">官方网站</a> | <a href="http://bbs.hymm.net" target="_blank">技术论坛</a></dd>
</dl>
</div>
</form>
</div>
</div>
<div class="copyright">
Powered by <a href="http://www.hymm.net" target="_blank">Hymm Dance System</a> Copyright ©2009-2010
</div>
</body>
</html>