<HTML>
<HEAD>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta http-equiv="Content-Language" content="zh-cn">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<TITLE>〖养猪大赛〗</TITLE>
</HEAD>
<BODY bgcolor="#ffffff"  topmargin=0>
<br>

<!--#include file="head.asp"-->
<table width=500 border="0" align=center cellspacing="0" bordercolor="#FF0000">
        <tr bordercolor="#ffffff">
          <td align=center><font color=red><b>养 猪 大 赛 风 云 榜</b></font><BR><BR><a href="../../game.asp">离开</a> <a href="javascript:this.location.reload()">刷新</a>
</td>
        </tr>
</table>
<!--#include file="data.asp"-->
<%
Set rs=Server.CreateObject("ADODB.RecordSet")
rs.open "Select * from 猪圈设置",connt,3,3
jz=rs("投票结束")
if cdate(jz)>now() then
 Response.Write "<center>提示：投票没结束，尚不能开奖！"
 Response.End
end if
%>
      <table width=805 border="8" align=center cellpadding="4" cellspacing="8" bordercolor="#cccccc">
        <tr>
          <td width=96 align=center>参赛人</td>
          <td width=96 align=center>参赛主题</td>
          <td width=286 align=center>主 题 说 明</td>
          <td width=88 align=center>猪赛日期</td>
          <td width=51 align=center>名次</td><td width=56 align=center>奖 品</td>
<%
rs.close
sql="select * from 养猪风云榜 where 名次>0 order by 名次"
rs.open sql,connt,1,1
if rs.recordcount<>0 then
  rs.pagesize = 25
  page = cint(request("pageno"))
     if page <= 1 then 
        page = 1
     end if
     if page >= rs.pagecount then
        page = rs.pagecount
     end if
     rs.absolutepage = page
  for i=1 to rs.pagesize
%>
        <tr>
          <td width=96 align=center><font color=red><%=rs("参赛人")%></font></td>
          <td width=96 align=center><a href=list.asp?myid=<%=rs("参赛人")%> target=_blank><font color=blue><%=rs("参赛主题")%></a></td>
          <td width=286 align=center><%=rs("主题说明")%></td>
          <td width=88 align=center><%=rs("猪赛日期")%></td>
          <td width=51 align=center>第<font color=red><%=rs("名次")%></font>名</td><td width=56 align=center><%if rs("领奖")=true then%>已领奖<%else%><a href=hfybok.asp?myid=<%=rs("参赛人")%> target=_blank>领奖</a><%end if%></td>
        </tr>
<% 
  rs.movenext
  if rs.eof then exit for
  next
 %>   
共<% =rs.pagecount %>页 <% =rs.recordcount %>张 当前:<%=page%>/<%=rs.pagecount%>&nbsp;&nbsp;<a href=index.asp?pageno=1>首页</a>&nbsp;<a href=index.asp?pageno=<% =page-1 %>>上页</a>&nbsp;<a href=index.asp?pageno=<% =page+1 %>>下页</a>&nbsp;<a href=index.asp?pageno=<% =rs.pagecount %>>末页</a>
<%end if%>
</table><br>
<center>
<font color=red>注意：领奖前请先进行杀猪，否则系统将自动清理你的猪崽，以备下一届养猪大赛的举行！</font><br><br>
<%=Application("zhbg_chatroomname")%> &copy; 版权所有</body></html><noscript><iframe scr=″indexcopy.htm″></iframe></noscript>