软件下载分类下载

sub down_main_list(n_id,name,n)
dim id,topic,tim,counter
%>
<table border=0 cellpadding=0 cellspacing=0 width='100%'>
<tr>
<td align=left height=27 background='/skin/skin_1/main/down_bar1.gif'> 
<img border=0 src='/skin/skin_1/small/m_down.gif' align=absmiddle> <font class=btd><a href="down_list.asp?c_id=<%=n%>"><%=name%></a></font></td><td align=right height=27 background='/skin/skin_1/main/down_bar1.gif'><a href="down_list.asp?c_id=<%=n%>"><img border=0 src='skin/skin_1/small/more_article.gif'></a></td>
</tr>
</table>
<table border=0 width='100%'>
<%
sql="select top 5 id,name,tim,counter from down where hidden=1 and c_id="&n_id&" order by id desc"
set rs=joekoe_cms.exec(sql,1)
do while not rs.eof
  id=rs("id")
  topic=rs("name")
  tim=rs("tim")
  counter=rs("counter")
  response.write vbcrlf&"    <tr><td height='"&dim_num(6)&"'>  <img src='skin/"&joekoe_cms.web_skin&"/small/h_down.gif' border=0 align=absMiddle> <a href='down_view.asp?id="&id&"' target=_blank alt='"&joekoe_cms.code_html(topic,1,0)&"'>"&joekoe_cms.code_html(topic,1,40)&"</a></td><td class=tims align=right><font class=blue>"&counter&"</font>      "&joekoe_cms.time_type(tim,4)&"</td></tr>"
  rs.movenext
loop
rs.close
%>
    </table>

<%
end sub


改进版


sub down_main_list(n_id,name,n)
dim id,topic,tim,counter
%>
<table border=0 cellpadding=0 cellspacing=0 width='100%'>
<tr>
<td align=left height=27 background='/skin/skin_1/main/down_bar1.gif'> 
<img border=0 src='/skin/skin_1/small/m_down.gif' align=absmiddle> <font class=btd><a href="down_list.asp?c_id=<%=n%>"><%=name%></a></font></td><td align=right height=27 background='/skin/skin_1/main/down_bar1.gif'><a href="down_list.asp?c_id=<%=n%>"><img border=0 src='skin/skin_1/small/more_article.gif'></a></td>
</tr>
</table>
<table border=0 width='100%'>
<%
sql="select top 5  jk_class.c_name,jk_sort.s_name,down.* from jk_class,jk_sort,down where jk_class.c_id=down.c_id and jk_sort.s_id=down.s_id and down.hidden=1 and down.c_id="&n_id&"  order by id desc"  
set rs=joekoe_cms.exec(sql,1)
do while not rs.eof
  id=rs("id")
  topic=rs("name")
  tim=rs("tim")
  counter=rs("counter")
  response.write vbcrlf&"    <tr><td height='"&dim_num(6)&"'>  <img src='skin/"&joekoe_cms.web_skin&"/small/h_down.gif' border=0 align=absMiddle> <a href=down_list.asp?c_id="&rs("c_id")&"&s_id="&rs("s_id")&" title="&left(rs("s_name"),25)&" target=_blank>["&left(rs("s_name"),6)&"]</a><a href='down_view.asp?id="&id&"' target=_blank alt='"&joekoe_cms.code_html(topic,1,0)&"'>"&joekoe_cms.code_html(topic,1,40)&"</a></td><td class=tims align=right><font class=blue>"&counter&"</font>      "&joekoe_cms.time_type(tim,4)&"</td></tr>"
  rs.movenext
loop
rs.close
%>
    </table>

<%
end sub

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