<% if request.QueryString("id")="" then response.Redirect("index.asp") else if Iszs(request.QueryString("id"))=false then response.Redirect("index.asp") end if end if '分类类别 set tp=server.CreateObject("adodb.recordset") sql="select * from mtp where m_id="&request.QueryString("id")&"" tp.open sql,coon,1,3 if tp.eof then response.Redirect("index.asp") end if '大类类别 set ftp=server.CreateObject("adodb.recordset") sql="select * from mtp where m_id="&tp("b_id")&"" ftp.open sql,coon,1,3 set wz=nothing '分类下文章 set wz=server.CreateObject("adodb.recordset") sql="select * from muban where m_id="&request.QueryString("id")&" and zt=1 order by id desc" wz.open sql,coon,1,3 wz.pagesize=10 p=clng(request.QueryString("p")) if p<1 or p="" then p=1 end if if p>wz.pagecount then p=wz.pagecount end if if wz.eof=false then wz.absolutepage=p end if '分类下置顶文章 set zd=server.CreateObject("adodb.recordset") sql="select * from muban where m_id="&request.QueryString("id")&" and zd=1 order by id desc" zd.open sql,coon,1,3 '分类下图片文章 set ttt=server.CreateObject("adodb.recordset") sql="select top 4 * from muban where m_id="&request.QueryString("id")&" and len(pic)>3 order by id desc" ttt.open sql,coon,1,3 '最新文章 set nwz=server.CreateObject("adodb.recordset") sql="select top 10 * from muban where m_id="&request.QueryString("id")&" and zt=1 order by id desc" nwz.open sql,coon,1,3 '热门文章 set hwz=server.CreateObject("adodb.recordset") sql="select top 10 * from muban where m_id="&request.QueryString("id")&" and zt=1 order by hits desc" hwz.open sql,coon,1,3 %> <%=tp("name")%>_<%=ftp("name")%>_<%=w("w_name")%> ,<%=ftp("name")%>,<%=w("w_gjz")%>">
当前位置：">邵阳三农网 > "><%=ftp("name")%> > "><%=tp("name")%>
    <% if zd.eof=false then for i=1 to zd.recordcount %>
  • 【置顶】" title="<%=zd("name")%>" target="_blank"><%=zd("name")%>
    <%=left(nohtml(zd("m_content")),200)%>
    <%=wz("time")%>
    ','url':'<%=w("w_url")%>/show.asp?id=<%=zd("id")%>','text':'<%=zd("name")%>'}">
    • <% zd.movenext if zd.eof then exit for next end if %> <% if wz.eof=false then for i=1 to wz.pagesize %>
  • " title="<%=wz("name")%>" target="_blank"><%=wz("name")%>
    <%=left(nohtml(wz("m_content")),200)%>
    <%=wz("time")%>
    ','url':'<%=w("w_url")%>/show.asp?id=<%=wz("id")%>','text':'<%=wz("name")%>'}">
    • <% wz.movenext if wz.eof then exit for next else %>
  • 暂无信息！
    • <%end if %>
<%if wz.recordcount>0 then%>
<%end if%>
    <%if nwz.eof=false then for i=1 to nwz.recordcount %>
  • <%=i%>
    "><%=nwz("name")%>
    • <% nwz.movenext if nwz.eof then exit for next else %>
  • 暂无信息！
    • <% end if nwz.close %>