photo.inc

是个不错的文件代码,希望大家好好用,

<CENTER>
<table border=0 cellspacing=0 cellpadding=0 width='775'>
<tr>
<td height=28 background='images/index/p_bg.gif'>
<table border=0 cellspacing=0 cellpadding=0 width='100%'>
<tr><td align="right" valign="center"><font class=tims></font>&nbsp;&nbsp;&nbsp;&nbsp;</td></tr></table>
</td>
</tr>
</table>
<table border=0 cellspacing=0 cellpadding=0 width='775'>
<tr align=center>
<%
sql="select top 7 id,nname,photopic,photoname,topic,tim,counter from photo where hidden=1 order by id desc"
dim id,topic
set rs=joekoe_cms.exec(sql,1)
do while not rs.eof
id=rs("id")
topic=rs("topic")
%>
<td width='20%'>
<table border=0 cellspacing=0 cellpadding=0>
<tr><td align=center><%response.write pic_fk(rs("photopic"),1,"photo.asp?action=show&id="&id)%></td></tr>
<tr><td align=center><a href='photo.asp?action=show&id=<%response.write id%>' alt='照片名称：<%response.write joekoe_cms.code_html(topic,1,0)%><br>发 布 人：<%response.write rs("photoname")%><br>发布时间：<%response.write joekoe_cms.time_type(rs("tim"),5)%>' target=_blank><%response.write joekoe_cms.code_html(topic,1,14)%></a></td></tr>
<tr><td align=center>浏览次数:<font class=red><%response.write rs("counter")%></font></td></tr>
</table>
</td>
<%
rs.movenext
loop
rs.close
%>
</tr>

</table>
</td>
</tr>
<tr></table>
</CENTER>