<%
set rsww=server.createobject("adodb.recordset")
sqlww="select * from class where id="&request.querystring("id")
rsww.open sqlww,conn,1,1
If rsww.EOF Then
response.Write "<br><br><center><font style='font-size: 14px'>Ƿѱɾ[<a href='index.asp'>ﷵҳ</a>]</font></center><br><br>"
Else
%>

<TITLE><%=rsww("class")%></TITLE>

<%
dim i,intPage,page,pre,last,filepath
set rs17 = server.CreateObject("adodb.recordset")
   sql17="select * from lmnews where picl=1 and class='"&rsww("class")&"' order by id desc"
      rs17.PageSize = 10 '趨ÿҳʾļ¼
      rs17.CursorLocation = 3
      rs17.Open sql17,conn,0,2,1 'ִѯSQLý¼
      pre = true
      last = true
      page = trim(Request.QueryString("page"))
      
      if len(page) = 0 then
                  intpage = 1
                  pre = false
      else
          if cint(page) =< 1 then
               intpage = 1
               pre = false
          else
              if cint(page) >= rs17.PageCount then
                  intpage = rs17.PageCount
                  last = false
              else
                   intpage = cint(page)
             end if
         end if
      end if
    if not rs17.eof then
         rs17.AbsolutePage = intpage
    end if
%>




<!--ͼƬڿʼ--><table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr>
                <td><!--ѭʼ--><table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
            <tr>
			<%    
   for i=1 to rs17.PageSize
     if rs17.EOF or rs17.BOF then exit for
%>
              <td><table border="0" align="center" cellpadding="3" cellspacing="2">
  <tr>
    <td><!--pic--><table width="224" border="0" align="center" cellpadding="0" cellspacing="0">
      <tr>
        <td><img src="images/pic_1.gif" width="224" height="12" /></td>
      </tr>
      <tr>
        <td background="images/pic_2_bj.gif"><table width="200" border="0" align="center" cellpadding="0" cellspacing="0">
          <tr>
            <td height="150"><div align="center"><a href="view.asp?id=<%=rs17("id")%>" title="<%=rs17("title")%>" alt="<%=rs17("title")%>" target=_blank><img src="<%=rs17("dk_uploadfile")%>" width="200" height="150" border="0"></a></div></td>
          </tr>
        </table></td>
      </tr>
      <tr>
        <td><img src="images/pic_3.gif" width="224" height="12" /></td>
      </tr>
    </table>
    <!--pic_end--></td>
  </tr>
  <tr>
    <td><div align="center"><a href="view.asp?id=<%=rs17("id")%>" title="<%=rs17("title")%>" alt="<%=rs17("title")%>" target=_blank><%=left(rs17("title"),18)%></a></div></td>
  </tr>
  <tr>
    <td height="10"></td>
  </tr>
</table></td>
			    <% rs17.movenext
if (i mod 2)=0 then
response.Write("</tr><tr>")
end if
next
%>
            </tr>
          </table><!--ѭ--></td>
              </tr>
              <tr>
                <td height="10"></td>
              </tr>
              <tr>
                <td height="1" background="images/dot.gif"></td>
              </tr>
			   <tr>
                <td height="10"></td>
              </tr>
              <tr>
                <td><!----><table width="96%" height="30" border="0" align="center" cellpadding="2" cellspacing="2" >
  <tr bgcolor="#FFFFFF">
    <%if rs17.pagecount > 0 then%>
    <td width="16%" align="left" bgcolor="#FFFFFF"><div align="center"><%=intpage%>ҳ/<%=rs17.PageCount%>ҳ</div></td>
    <%else%>
    <td width="16%" align="left" bgcolor="#FFFFFF"><div align="center">0ҳ/0ҳ</div></td>
    <%end if%>
    <td width="68%" align="right" bgcolor="#FFFFFF"> <%=rs17.recordcount%> <a href="pic.asp?page=1&id=<%= request("id") %>">ҳ</a>|
      <%if pre then%>
        <a href="pic.asp?page=<%=intpage -1%>&id=<%= request("id") %>">ҳ</a>|
      <%end if%>
        <%if last then%>
        <a href="pic.asp?page=<%=intpage +1%>&id=<%= request("id") %>">ҳ</a>|
      <%end if%>
        <a href="pic.asp?page=<%=rs17.PageCount%>&id=<%= request("id") %>" >βҳ</a>|ת
      <select name="sel_page" onChange="javascript:location=this.options[this.selectedIndex].value;">
          <%for i=1 to rs17.pagecount
       if i = intpage then%>
          <option value="pic.asp?page=<%=i%>&id=<%= request("id") %>" selected="selected"><%=i%></option>
          <%else%>
          <option value="pic.asp?page=<%=i%>&id=<%= request("id") %>"><%=i%></option>
          <%end if
					next
					rs17.close
			  set rs17=nothing
					 %>
      </select>
    ҳ &nbsp;</td>
  </tr>
</table><!--ҳ--><!----></td>
              </tr>
            </table>
              <!--ͼƬڽ-->


<%
rsww.close
set rsww=nothing
%>



<%
end if
%>