www.gusucode.com > 黑鹰自助链管理系统 1.1 商业版码程序 > IP/250.asp

    <!--#include file="mdb.asp"-->
<link rel="stylesheet" href="../css/style.css">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<style type="text/css">
<!--
.STYLE2 {color: #FF0000}
-->
</style>
<%
set rsDe=server.createobject("adodb.recordset")
sql= "select * from detail Where verity=1 and yl_dayin>=0 order by yl_intime desc"
'response.write sql
rsDe.open sql,conn,1,1
%>

<title>黑鹰免费友情链接网-最新显示排行代码</title><BODY leftMargin=0 topMargin=0 marginwidth="0" marginheight="0">

<table width=250 height="60" border=0 cellpadding=1 cellspacing=1 bgcolor="#CFECF8">
<tr><td width="20" align="center" bgcolor="#CFECF8" rowspan="3"><script type="text/javascript" src="come.js"></script><a href='http://www.hymm.net' title=黑鹰链 target='_blank'><b>黑<br>
鹰<br>
链<br>
</b></a><a href=javascript:location.reload() title=刷新排名 class=red><b>刷</b></a></td>
<%
n=1 
While Not rsDe.Eof and n<7
%>
    <td bgcolor="#F9FDFC"><a href='/go.asp?id=<%=rsDe("id")%>' title=<%=rsDe("title")%> target='_blank'><%if rsDe("yl_dayin")>4 then%><font color=#ff00FF><%end if%>
<%if rsDe("yl_dayin")>9 then%></font><font color=#0000ff><%end if%>
<%if rsDe("yl_dayin")>19 then%></font><font color=#FF0000><%end if%>
<%if rsDe("yl_dayin")>29 then%><font color=#0000ff><b><%end if%>
<%if rsDe("yl_dayin")>49 then%><font color=#ff0000><b><%end if%>
<%=rsDe("title")%><%if rsDe("yl_dayin")>4 then%>
</b></font></a><a href='/go.asp?id=<%=rsDe("id")%>' title=<%=rsDe("title")%> target='_blank'>
<%end if%>
</a></td>
    <%
if n mod 2 =0 then
Response.Write("</Tr>")
   end if     
rsDe.MoveNext
n=n+1
Wend
rsDe.close
set rsDe=nothing
%>
</table>
<span style="display:none">
<script language="javascript" type="text/javascript" src="http://js.users.51.la/2738073.js"></script>
</span>
        <!--禁止右键开始-->
    <script language="JavaScript">
document.oncontextmenu=new Function("event.returnValue=false;");
document.onselectstart=new Function("event.returnValue=false;");
  </script>
    <!--禁止右键结素-->