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>