<!--#include file="Inc/conn.asp"-->
<!--#include file="Inc/Function_Page.asp"-->
<!--#include file="Inc.asp"--><!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" lang="zh-CN">
<head>
	<title>最近更新内容列表 - <%=SiteTitle%></title>
	<meta http-equiv="Content-Type" content="text/html; charset=gbk" />
	<meta name="keywords" content="<%=Sitekeywords%>" />
	<meta name="description" content="<%=Sitedescription%>" />
	<%if SitePath="/" then%>
	<link href="<%=SitePath%><%=skin%>head.css" rel="stylesheet" type="text/css">
	<%else%>
	<link href="<%=SitePath%><%=skin%>header.css" rel="stylesheet" type="text/css">
	<%end if%>
	<link href="<%=SitePath%><%=skin%>default.css" rel="stylesheet" type="text/css">
	<link href="<%=SitePath%><%=skin%>index.css" rel="stylesheet" type="text/css">
  <script type="text/javascript" src="<%=SitePath%>inc/main.asp"></script>
  <script type="text/javascript" src="<%=SitePath%>Dig.asp"></script>
</head>
<body><%call spiderbot()%>
		<!--#include file="top.asp"-->
	<center>
<table border="0" width="980" cellspacing="0" cellpadding="0" id="table1">
	<tr>
		<td width="822" valign="top">		
	<div class="vmovie">
		<div class="vmoviebg">

<!-- 左侧开始 -->

		<div class="vleft">
		

		
<!-- 一个循环段落开始 -->

	<div class="movelist"><img border="0" src="<%=SitePath%>images/classimg/new.jpg" width="626" height="80" style="border:1px solid #C0C0C0; padding-left: 4px; padding-right: 4px; padding-top: 1px; padding-bottom: 1px">
		<div class="lpic">　</div>
		
	
		<div>
		<span class="mbg3">
		
		<span class="more"></span>
		</span>
		</div>
		
		
		<div class="lpic2"></div>
		</div>
		<div class="movies ">
		
		<%
set rs1=server.createobject("ADODB.Recordset")
sql1="select Top 2 ID,Title,Images,Content,TitleFontColor from  xiaowei_Article where yn = 0 and Images<>'' order by DateAndTime desc,ID desc"
rs1.open sql1,conn,1,3
NoI=0
If Not rs1.Eof Then 
do while not (rs1.eof or err) 
NoI=NoI+1
%>  
		
		<div class="vmovies">
		
		<div class="movie">
		<a href="<%If seo=1 then%>Article_<%=rs1("ID")%>.html<%elseif seo=2 then%>Article/?<%=rs1("ID")%>.html<%elseif seo=3 then%>List.asp?ID=<%=rs1("ID")%><%elseif seo=4 then%>Article/<%=rs1("ID")%>.html<%end if%>">
		<div class="icon"><span></span></div>
		<div class="imgs"><img src="<%=SitePath%><%=SiteUp%>/<%=rs1("Images")%>" alt="" /></div>
		</a>
		</div>
		
		<div class="movernr">
		<ul>
		<li class="titles"><a href="<%If seo=1 then%>Article_<%=rs1("ID")%>.html<%elseif seo=2 then%>Article/?<%=rs1("ID")%>.html<%elseif seo=3 then%>List.asp?ID=<%=rs1("ID")%><%elseif seo=4 then%>Article/<%=rs1("ID")%>.html<%end if%>"><%if rs1("TitleFontColor")<>"" then Response.Write("<font style=""color:"&rs1("TitleFontColor")&""">"&left(LoseHtml(rs1("title")),13)&"</font>") else Response.Write(""&left(LoseHtml(rs1("title")),13)&"") end if%></a></li>
		<li><%=left(LoseHtml(rs1("Content")),50)%></li>
		</ul>
		</div>
		
		</div>
		
  <%
  rs1.movenext
  loop
  else
  Response.Write("没有图片文章")
  end if
  rs1.close
  set rs1=nothing
  %>
		

		</div>
		<div class="movies end">
		
<%
Set mypage=new xdownpage
mypage.getconn=conn
mypage.getsql="select ID,Title,DateAndTime,Hits,dig,IsTop,Images,TitleFontColor,Content from xiaowei_Article Where yn=0 order by IsTop desc,ID desc"
mypage.pagesize=""&artlistnum&""
set rs=mypage.getrs()
for i=1 to mypage.pagesize
    if not rs.eof then 
%>

		<div class="vmoviesa">

		<div class="movernrsa">
		<ul>
		<li class="titlesa">  <span class="note"><!--<span id="dig<%=Rs("id")%>"><a href="javascript:Dig(<%=Rs("id")%>);" style="color:#ff6600;font-size:12px;font-weight:bold;">顶一下</a></span> 已顶 <span id="<%=Rs("id")%>"><%=Rs("dig")%></span> 次　-->点击：<font color="cc0000"><B><%=rs("Hits")%></B></font></a> 次　<%=FormatDate(rs("DateAndTime"),5)%></span>·&nbsp;<%If rs("IsTop")=1 then Response.Write("<font color=red size=2>[固顶] </font>") end if%><%If rs("Images")<>"" then Response.Write("<font color=blue>[图]</font>") end if%><a href="<%If seo=1 then%>Article_<%=rs("ID")%>.html<%elseif seo=2 then%>Article/?<%=rs("ID")%>.html<%elseif seo=3 then%>List.asp?ID=<%=rs("ID")%><%elseif seo=4 then%>Article/<%=rs("ID")%>.html<%end if%>" target="_blank"><B><%if rs("TitleFontColor")<>"" then Response.Write("<font style=""color:"&rs("TitleFontColor")&""">"&rs("Title")&"</font>") else Response.Write(""&rs("Title")&"") end if%></B></a> </li>
				<%If artlist=0 then%><li class="titlesb">　　<%=left(LoseHtml(rs("Content")),100)%> <%End if%>  </li>
		</ul>
		</div>
		
		</div>
		
<%
        rs.movenext
    else
         exit for
    end if
next
%>



		</div>
		
<!-- 一个循环段落结束 -->

	<div class="movies end">
<table border="0" cellspacing="3" cellpadding="2" align="center"><tr><%=mypage.showpage()%></tr></table>
  </div>
		</div>
		
<!-- 左侧结束 -->

</td>
		
		
		<td valign="top" align="left" width="320"><!--#include file="right.asp"--></td>
	</tr>
</table></center>

	<div class="vbottoms">
	<div class="vbottom">
		<%Call ShowAD(6)%>　<%=SiteTcp%>	<!-- 网站底部 -->
	</div>
</div>
	</div>
<SCRIPT LANGUAGE=JAVASCRIPT><!-- 
if (top.location != self.location)top.location=self.location;
// --></SCRIPT>
<%
rsclass.close
set rsclass=nothing
%>
</body>
</html>
