<!--#include file="conn.asp"-->
<!--#include file="config.asp"-->
<!--#include file="function.asp"-->
<!--#include file="char.inc"-->
<%
dim shu,news,E_BigClassID,E_SmallClassID,E_typeid,EC_SpecialID,order,time,path,click,title
E_BigClassID=ChkRequest(request.querystring("E_BigClassID"),1)
E_typeid=ChkRequest(request.querystring("E_typeid"),1)
E_SmallClassID=ChkRequest(request.querystring("E_SmallClassID"),1)
EC_SpecialID=ChkRequest(request.querystring("EC_SpecialID"),1)
shu=ChkRequest(request.querystring("shu"),1)
order=checkstr(request("order"))
time=checkstr(request.querystring("time"))
title=checkstr(request.querystring("title"))
click=checkstr(request.querystring("click"))
Path = "./"
if shu<>"" then   '显示数目，不加为10
ss=shu
else
ss=10
end if
if order="click" then  '排序方式，click为按点击率
oo="click"
else
oo="EC_ArticleID"
end if
if time="" or time="0" then  '显示时间，0为不显示
tt=0
else
tt=1
end if
if click="" or click="0" then  '显示点击数，0为不显示
cc=0
else
cc=1
end if
if title<>"" then   '显示数目，不加为10
nn=CInt(title)
else
nn=20
end if
if E_typeid<>"" then
	set rs=conn.execute("SELECT top "&ss&" * FROM "& db_wygkcn_Article_Table &"  where E_typeid="& cint(E_typeid) &" and Checked=1 order by "&oo&" desc")
else
if E_BigClassID<>"" then
	set rs=conn.execute("SELECT top "&ss&" * FROM "& db_wygkcn_Article_Table &"  where E_BigClassID="& cint(E_BigClassID)&" and Checked=1 order by "&oo&" desc")
else
if E_SmallClassID<>"" then
	set rs=conn.execute("SELECT top "&ss&" * FROM "& db_wygkcn_Article_Table &"  where E_SmallClassID="& cint(E_SmallClassID)&" and Checked=1 order by "&oo&" desc")
else
if EC_SpecialID<>"" then
	set rs=conn.execute("SELECT top "&ss&" * FROM "& db_wygkcn_Article_Table &"  where EC_SpecialID="& cint(EC_SpecialID) &" and Checked=1 order by "&oo&" desc")
else
	set rs=conn.execute("SELECT top "&ss&" * FROM "& db_wygkcn_Article_Table &" where Checked=1 order by "&oo&" desc")
end if
end if
end if
end if
if rs.eof and rs.bof then %>
     document.write('没有');
  <% else  
do while not rs.eof

title=htmlencode4(trim(rs("title")))

%>
document.write('<LINK href=CSS/Wygkcn_Home.css rel=stylesheet><div class="side_con">·<font ><A  href="<%=path%>wygkcn_ShowArticle.asp?EC_ArticleID=<%=rs("EC_ArticleID")%>" title="<%=title%>" target="_blank"><%=CutStr(title,nn)%></A><%if tt=1 then%><FONT color="#666666">(<%=month(rs("updatetime"))%>-<%=day(rs("updatetime"))%>)</FONT><%end if%><%if date()-rs("updatetime")<2 then%><FONT color="#ff0000">新！</FONT><%end if%><%if cc=1 then%><FONT color="#666666">(<%=rs("click")%>)</FONT><%end if%></font></div>');

<%

rs.movenext 
loop 
end if
Rs.Close
set Rs=nothing
%>
