当前位置：">邵阳三农网 > "><%=tp("name")%>
<%
set fg=server.CreateObject("adodb.recordset")
sql="select top 10 * from muban where len(pic)>3 and m_id in(select m_id from mtp where b_id="&request.QueryString("id")&") order by id desc"
fg.open sql,coon,1,3
if fg.eof=false then
for i=1 to fg.recordcount
%>
">
" alt="<%=left(fg("name"),20)%>" width="305" height="255" />
<%
fg.movenext
if fg.eof then exit for
next
end if
fg.close
%>
-
<%
set wz=nothing
set wz=server.CreateObject("adodb.recordset")
sql="select top 8 * from muban where m_id in(select m_id from mtp where b_id="&request.QueryString("id")&")order by id desc"
wz.open sql,coon,1,3
if wz.eof=false then
for j=1 to wz.recordcount
%>
- " target="_blank" title="<%=wz("name")%>"><%=wz("name")%> <% wz.movenext if wz.eof then exit for next else %>
- 暂无信息！ <%end if wz.close %>
0 then%>style="margin-left:18px;"<%end if%>>
<%
stp.movenext
if stp.eof then exit for
next
end if
stp.close
%>
<%
if (i+1) mod 3 <>0 then
set t1=nothing
set t1=server.CreateObject("adodb.recordset")
sql="select top 1 * from muban where tj<>0 and len(pic)>3 and m_id="&stp("m_id")&""
t1.open sql,coon,1,3
if t1.eof=false then
%>
<%end if
t1.close
end if
%>
<%=left(nohtml(t1("m_content")),40)%>
-
<%
set wz=nothing
set wz=server.CreateObject("adodb.recordset")
sql="select * from muban where m_id="&stp("m_id")&" order by id desc"
wz.open sql,coon,1,3
if wz.eof=false then
for j=1 to wz.recordcount
%>
- " target="_blank" title="<%=wz("name")%>"><%=wz("name")%> <% wz.movenext if wz.eof then exit for next else %>
- 暂无信息！ <%end if wz.close %>