合作专题汇总
<% set rs=conn.execute("select top 5 title,Updatetime,articleid from Pl_Article where classid=60 order by articleid desc") if not rs.eof then do while not rs.eof %> <% rs.movenext loop end if rs.close set rs=nothing %>
·<%=month(rs("updatetime"))%><%=day(rs("updatetime"))%>/<%=rs("articleid")%>.html" target="_blank"><%=rs("title")%> (<%=rs("updatetime")%>)
图库 更多>>
<% dim k k=1 tu="" set mm=conn.execute("select top 6 title,Updatetime,articleid,DefaultPicUrl from Pl_Article where DefaultPicUrl<>'' and DefaultPicUrl is not null order by articleid desc") if not mm.eof then do while not mm.eof %> <%mm.movenext if k mod 2=0 then response.write " " end if k=k+1 loop end if mm.close set mm=nothing response.write tu %>
width=120 height=90 border=0/>
<%=InterceptString(mm("title"),18)%>