<!--#include file="inc/config.asp"-->
<!--#include file="inc/conn.asp"-->
<!DOCTYPE HTML>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title><%=SiteName%>-powered by aspcms</title>
<link href="css/reset.css" rel="stylesheet" type="text/css">
<link href="css/style.css" rel="stylesheet" type="text/css">

<style type="text/css">
*{margin:0;padding:0;}
div.pic{
	margin:3px;
    position:relative;
    overflow:hidden;
    width:120px;
    height:90px;
}
div.pic img {text-align:center; margin:0 auto; vertical-align:middle}
</style>
</head>
<body>
<script type="text/javascript">
function no(){
	alert("报名已经结束，谢谢您的参与");
	return false;
}
</script>
<div id="toolbar">
  <div>
    <ul>
    <%
function RemoveHTML(fString)
  dim   re   
  set   re   =   New   RegExp   
  re.Global   =   True   
  re.IgnoreCase   =   True   
  if   not   isnull(fString)   then   
  re.Pattern   =   "<(.[^>]*)>"   
  fString   =   re.Replace(fString,"") 
   fString   =  Replace(fString,"&nbsp;","")  
  RemoveHTML   =   fString   
  end   if 
end function
	
	
set rslink=server.createobject("adodb.recordset")
execlink="select * from link order by id desc"		
rslink.open execlink,conn,1,1
do while not rslink.eof
%>

   <li <%if rslink("linkrl")="0" then%>class="fr"<%else%>class="fl"<%end if%>><a href="<%=rslink("link")%>" target="_blank"><%=rslink("title")%></a>&nbsp;</li>
    <%		
rslink.movenext
Loop
rslink.close
set rslink=nothing
%>
    
          </ul>
  </div>
</div><!-- toolbar End -->
<div style="background:#990606;">
<div id="banner">
	<div class="banner_bg">
	<div>
	
    </div>
    </div>
</div>
</div>
<!-- banner End -->
<div id="nav">
  <ul>
      <li class=""><span><a href="index.asp">首页</a></span></li>
  <%
set rsm=server.createobject("adodb.recordset")
exec="select * from menu order by pnum desc,id desc"		
rsm.open exec,conn,1,1
do while not rsm.eof
%>

    <li class=""><span><a href="About.asp?id=<%=rsm("id")%>"><%=rsm("title")%></a></span></li>
    <%		
Rsm.movenext
Loop
rsm.close
set rsm=nothing
%>
    <li class=""><span><a href="rank.asp">投票结果</a></span></li>
  

  </ul>
</div>
<!-- nav End -->
<div id="subNav">
  
</div><!-- subNav End -->

<!--Start Beacon Code v2-->

<!--End Beacon Code v2--><div id="main" class="clearfix">
  <div class="colLeft">
    
    
    <!-- divisionNews End -->
    <div class="networkList bjNetwork ">
      <div class="box_tit"><div><h3 class="area_title">评选人物</h3></div></div><!-- box_tit End -->
   
        <ul class="clearfix border_dashed_bottom">
        <%
page=clng(request("page"))	
sql="select * from Info"
set rs=server.createobject("adodb.recordset") 
rs.open sql,conn,1,1
rs.PageSize=100
if page=0 then page=1 
pages=rs.pagecount
if page > pages then page=pages
rs.AbsolutePage=page  
for j=1 to rs.PageSize 
%>
                <li class="padding_top_10px">
				
          <div class="operators">
            <div class="pic"><a href="View.asp?id=<%=rs("id")%>"><img src="<%=rs("pic")%>"></a></div>
            <dl>
              <dt><%=rs("title")%></dt>
              <dd class="vote"><a href="Vote.asp?id=<%=rs("id")%>">投票</a><a href="View.asp?id=<%=rs("id")%>">详细</a></dd>
              <dd class="votes">得票数：<span><%=rs("ps")%></span></dd>
            </dl>
          </div>
		  
        </li>
 <%
if (j mod 5)=0 Then       
  response.write "</tr><tr>"
end if
rs.movenext
if rs.eof then exit for
next
%>       
        


              </ul>
         
        
      
    </div><!-- networkList End -->
    <form method="post" action="index.asp">
    </form><!-- pages End -->
    

    
  </div><!-- colLeft End -->
 <div class="colRight">

<div class="area" style="margin-bottom:0; margin-top:10px;">
      <div class="area_tit"><h3><span class="fr"><a href="about.asp?id=3" target="_blank">更多>></a></span><%
		  sqlleft="Select * from Menu where id=3"
			Set rsleft=conn.execute(sqlleft)
			if not rsleft.eof then
				response.Write(rsleft("title"))
			end if
		  %></h3></div>
      <div class="area_con">
        <div>
<!--          <h4>主要奖项</h4> -->
          <ul>
          <%
		  sql="Select * from Menu where id=3"
			Set rs=conn.execute(sql)
			if rs.eof then
				Response.Write("<script>alert('不存在的信息或者尚未通过审核!');location='index.asp';</script>")
				Response.End()
			else
			response.Write(left(rs("content"),200)&"...")
			end if
		  %>
          </ul>
        </div>

      </div>
    </div>
	
	
	
<div class="area" style="margin-bottom:0; margin-top:10px;">
      <div class="area_tit"><h3><span class="fr"><a href="about.asp?id=2" target="_blank">更多>></a></span><%
		  sql="Select * from Menu where id=2"
			Set rs=conn.execute(sql)
			if not rs.eof then
			response.Write(rs("title"))
			end if
		  %></h3></div>
      <div class="area_con">
        <div>
<!--          <h4>主要奖项</h4> -->
          <ul>
           <%
		  sql="Select * from Menu where id=2"
			Set rs=conn.execute(sql)
			if rs.eof then
				Response.Write("<script>alert('不存在的信息或者尚未通过审核!');location='index.asp';</script>")
				Response.End()
			else
			response.Write(left(rs("content"),400)&"...")
			end if
		  %>
          </ul>
        </div>

      </div>
    </div>


    <!-- area End -->
    
        
    <!-- area End -->
  </div><!-- colRight End -->
  <div class="clear"></div>
  <!-- sinaBlog End -->
  <div class="main_bottom"></div>
</div><!-- main End -->

<!--coper_links 开始-->

<!--coper_links 结束-->
 
</div><!-- main End -->
<div id="footer">

  <div><%=Copyright%><br>
powered by <a href="http://www.aspcms.com" target="_blank">aspcms</a></div>
</div><!-- footer End -->

</a></noscript>


</body>
</html>
