文章多行列表

sub root_main(f_title,c_num,f_num)
%>
<table cellspacing=1 cellpadding=4 class=table>
<tr><td class=td0> <%response.write img_skin(web_img_m)%> <%response.write f_title%></td></tr>
<tr class=bg_td><td>
<table border=0 cellspacing=0 cellpadding=2 width='100%'>
<%
  sql="select top "&c_num&" id,c_id,topic,counter from root where hidden=1 order by id desc"
  set rs=joekoe_cms.exec(sql,1)
  do while not rs.eof
  response.write "<tr>"
  for i=1 to 4
  if rs.eof then exit for
%>
<td>
<%response.write img_skin(web_img_h)%>
<a href="root/root_view.asp?c_id=<%response.write rs("c_id")%>&s_id=<%response.write sid%>&id=<%response.write rs("id")%>" alt='<%response.write joekoe_cms.code_js(joekoe_cms.code_html(rs("topic"),1,0),1)%>' target=_blank>
<%response.write joekoe_cms.code_js(joekoe_cms.code_html(rs("topic"),1,f_num),1)%></a></td>
<%
  rs.movenext
  next
  response.write "</tr>"
  loop
  rs.close
%>
<table border=0 cellspacing=0 cellpadding=0 width='100%'>
<tr><td align=right><a href="/root/root_list.asp?action=more&c_id=31">浏览更多…</a> </td></tr>
</table></td></tr></table>
<%
end sub
%>

调用 call root_main("美术馆",10,12)

文章来自: 本站原创
引用通告: 查看所有引用 | 我要引用此文章
Tags:
相关日志: