<!--#include file="../common/conn.asp"-->
<!--#include File="String.asp"-->
<%
call checkuser("调查管理")
	Title		=	"GBchina投票器"
	If Not IsEmpty(GetVariable("PageNO")) Then
	   PageNO=cint(GetVariable("PageNO"))
	Else
	   PageNO=1
	End If

	SQLStr	=	"Select ID From web_vote Where ParentID=0 And m_id=" & WebUserID & " Order By ID DESC"

	rs.Open SQLStr,conn,1,3
	PageSize	=5
	rs.PageSize =PageSize
	AllCount	= rs.RecordCount
	MaxPage		= rs.PageCount 
	If rs.RecordCount > 0 Then
	rs.MoveFirst 
	rs.AbsolutePage = PageNO
	End If
%>
<html>
<head>
<title><%=Title%></title>
<!-- no cache headers -->
<meta http-equiv="Pragma" content="no-cache">
<meta http-equiv="no-cache">
<meta http-equiv="Expires" content="-1">
<meta http-equiv="Cache-Control" content="no-cache">
<!-- end no cache headers -->
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<STYLE type="text/css">
FONT		{FONT-FAMILY: Arial,Verdana,Helvetica,sans-serif; FONT-SIZE: 12px}
BODY		{FONT-FAMILY: Arial,Verdana,Helvetica,sans-serif; CURSOR: default; FONT-SIZE: 12px; COLOR: #333333; SCROLLBAR-BASE-COLOR: #669900; SCROLLBAR-ARROW-COLOR: FFFFFF}

P			{FONT-FAMILY: Arial,Verdana,Helvetica,sans-serif; FONT-SIZE: 12px;  COLOR: #333333}
TD			{FONT-FAMILY: Arial,Verdana,Helvetica,sans-serif; FONT-SIZE: 12px;  COLOR: #333333;line-height:150%}
TR			{FONT-FAMILY: Arial,Verdana,Helvetica,sans-serif; FONT-SIZE: 12px;  COLOR: #333333}
UL			{FONT-FAMILY: Arial,Verdana,Helvetica,sans-serif; FONT-SIZE: 12px;  COLOR: #333333}
LI			{FONT-FAMILY: Arial,Verdana,Helvetica,sans-serif; FONT-SIZE: 12px;  COLOR: #333333}

FORM		{FONT-FAMILY: Arial,Verdana,Helvetica,sans-serif; FONT-SIZE: 12px}
SELECT		{FONT-FAMILY: "宋体",Arial,Verdana,Helvetica,sans-serif; BACKGROUND-COLOR: #EEEEEE; COLOR: #333333; FONT-SIZE: 12px;}
TEXTAREA	{FONT-FAMILY: Arial,Verdana,Helvetica,sans-serif; BACKGROUND-COLOR: #EEEEEE; COLOR: #333333; FONT-SIZE: 12px;}
OPTION		{FONT-FAMILY: Arial,Verdana,Helvetica,sans-serif; BACKGROUND-COLOR: #EEEEEE; COLOR: #333333; FONT-SIZE: 12px;}
INPUT		{FONT-FAMILY: Arial,Verdana,Helvetica,sans-serif; COLOR: #333333; FONT-SIZE: 12px;}

A:active	{COLOR: #FF0000;}
A:visited	{COLOR: #333333; TEXT-DECORATION: none}
A:hover		{COLOR: #FF0000;TEXT-DECORATION: underline}
A:link		{COLOR: #333333; TEXT-DECORATION: none}

A.blink:active, A.blink:hover	{COLOR: #FF0000;}
A.blink:visited,A.blink:link	{COLOR: #333366;;TEXT-DECORATION: underline}

#redad A:active		{COLOR: #FF0000;  TEXT-DECORATION: none}
#redad A:visited	{COLOR: #FF0000; TEXT-DECORATION: none}
#redad A:ho嘀污敵笩?	ver		{COLOR: #FF0000; TEXT-DECORATION: underline}
#redad A:link		{COLOR: #FF0000; TEXT-DECORATION: none}

#greenad A:active	{COLOR: #FF0000;  TEXT-DECORATION: none}
#greenad A:visited	{COLOR: #336600; TEXT-DECORATION: none}
#greenad A:hover	{COLOR: #FF0000; TEXT-DECORATION: underline}
#greenad A:link	{COLOR: #336600; TEXT-DECORATION: none}

#cat A:active	{COLOR: #FFFFFF;  TEXT-DECORATION: none}
#cat A:visited	{COLOR: #FFFFFF; TEXT-DECORATION: none}
#cat A:hover	{COLOR: #FFFFFF; TEXT-DECORATION: underline}
#cat A:link		{COLOR: #FFFFFF; TEXT-DECORATION: none}

.bginput		{FONT-FAMILY: "宋体",Arial,Verdana,Helvetica,sans-serif; FONT-SIZE: 12px; COLOR: #333333; HEIGHT: 18px; BACKGROUND-COLOR: #CCCCCC}
.input			{FONT-FAMILY: Arial,Verdana,Helvetica,sans-serif; FONT-SIZE: 12px; COLOR: #333333; HEIGHT: 18px; BACKGROUND-COLOR: #F9F9F9}
.baseline		{FONT-FAMILY: Arial,Verdana,Helvetica,sans-serif; BORDER-COLOR: black black #336600; BORDER-STYLE: dashed; BORDER-TOP-WIDTH: 0px; BORDER-RIGHT-WIDTH: 0px; BORDER-BOTTOM-WIDTH: 1px; BORDER-LEFT-WIDTH: 0px}
.solidbaseline	{FONT-FAMILY: Arial,Verdana,Helvetica,sans-serif; BORDER-COLOR: black black #E0E0E0; BORDER-STYLE: solid; BORDER-TOP-WIDTH: 0px; BORDER-RIGHT-WIDTH: 0px; BORDER-BOTTOM-WIDTH: 1px; BORDER-LEFT-WIDTH: 0px}
</STYLE>
</head>
<body leftmargin="0" topmargin="0" BodyBegin>
<table width="100%" border="0" cellpadding="4" cellspacing="1" bgcolor="336600">
  <tr> 
    <td bgcolor="669900"><font color="#FFFFFF"><strong>所有调查，共[<%=AllCount%>]个调查 </strong></font></td>
  </tr>
  <%
	Dim i
	i=0
	DO While Not rs.EOF and i<PageSize
		Dim strTrColor
		strTrColor="#EEEEEE"
		if i mod 2=0 then strTrColor="#F9F9F9"
%>
  <tr bgcolor="<%=strTrColor%>"> 
    <td>
	<script Src="Vote.asp?ID=<%=rs("ID")%>&admin=1">
	</script>
		<hr size="1"> 
    </td>
  </tr>
  <%		i=i+1 
		rs.MoveNext  
	Loop 
	rs.Close  
%>
  <tr> 
    <td bgcolor="f9f9f9">&nbsp;</td>
  </tr>
  <tr> 
    <td bgcolor="669900"><table border="0" cellpadding="2" width="100%">
        <tr> 
          <td align=right> 第<%=PageNO%>页[<%=(PageNO-1)*PageSize+1%>-<%=PageNo*PageSize%>]&nbsp;共<%=AllCount%>个调查 
            <%if PageNO-1>0 then %>
            [<A href=VoteList.asp?class=<%=classid%>&pageNO=1&ID=<%=GetQueryString("ID")%>>首页</a>][<A href=VoteList.asp?class=<%=classid%>&pageNO=<%=pageNO-1%>&ID=<%=GetQueryString("ID")%>>上页</a>] 
            <% 
else    
%>
            [首页][上页] 
            <% 
end if %> <% 
	if PageNo+1<=MaxPage then  
%>
            [<A href=VoteList.asp?class=<%=classid%>&pageNO=<%=pageNO+1%>&ID=<%=GetQueryString("ID")%>>下页</a>][<A href=VoteList.asp?class=<%=classid%>&pageNO=<%=MaxPage%>&ID=<%=GetQueryString("ID")%>>末页</a>] 
            <% 
	else    
%>
            [下页][末页] 
            <% 
	end if
	conn.Close
	Set RS = Nothing
	Set conn = Nothing
%> </td>
        </tr>
      </table></td>
  </tr>
</table>
  </body>                                    
                                    
</html>