list.asp

3000首FLASH源程序

<!--#include file=function.asp-->
<!--#include file=top.asp-->
<%
founderr=false
if request("id")="" then
	founderr=true
	errmsg=errmsg+"<li>请选择图片！</li>"
else
	sql="select * from pic where id="&request("id")
	rs.open sql,conn,1,3
	if rs.eof and rs.bof then
		founderr=true
		errmsg=errmsg+ "<li>没有找到相关图片，可能已经被管理员删除！</p>"
	else
		rs("hits")=rs("hits")+1
		rs.update
		call showcontent()
	end if
	rs.close
end if
if founderr=true then call error()

sub showcontent()%>
<table align=center border=0 cellpadding=2 cellspacing=1 width=770 bgcolor="#000000">
  <tr> 
    <td align=center height=18 valign=top width=313 bgcolor="#FF8ECE"><a href=show.asp?id=<%=rs("id")%>><img src=<%=rs("images")%> width=300 border="0"></a></td>
    <td align=center height=18 valign=top width=467 bgcolor="#FFBAE7"> 
      <table border=0 cellpadding=0 cellspacing=0 width="99%">
        <tr> 
          <td align=middle colspan=4 height=25><b><%=rs("title")%></b></td>
        </tr>
        <tr> 
          <td colspan=4 height=0>---------------------------------------------------------------------</td>
        </tr>
        <tr> 
          <td align=right width="14%">编号：</td>
          <td width="34%"><%=rs("no")%></td>
          <td align=right width="19%">作者：</td>
          <td width="33%"><%=rs("authorid")%></td>
        </tr>
        <tr> 
          <td colspan=4 height=0>---------------------------------------------------------------------</td>
        </tr>
        <tr> 
          <td align=right width="14%">尺寸：</td>
          <td width="34%">高：<%=rs("pheight")%>宽：<%=rs("pwidth")%></td>
          <td align=right width="19%">印记：</td>
          <td width="33%"><%=rs("sign")%></td>
        </tr>
        <tr> 
          <td colspan=4>---------------------------------------------------------------------</td>
        </tr>
        <tr> 
          <td align=right width="14%">纸本：</td>
          <td width="34%"><%=rs("text")%></td>
          <td align=right width="19%">创作时间：</td>
          <td width="33%"><%=rs("creattime")%></td>
        </tr>
        <tr> 
          <td colspan=4 height=0>---------------------------------------------------------------------</td>
        </tr>
        <tr> 
          <td align=right width="14%">收藏时间：</td>
          <td width="34%"><%=rs("collecttime")%></td>
          <td width="19%" align="right">上传时间：</td>
          <td width="33%"><%=rs("updatetime")%></td>
        </tr>
        <tr> 
          <td colspan=4>---------------------------------------------------------------------</td>
        </tr>
        <tr> 
          <td align=right width="14%">价格一：</td>
          <td width="34%"><%=rs("value1")%></td>
          <td align=right width="19%">价格二：</td>
          <td width="33%"><%=rs("value2")%></td>
        </tr>
        <tr> 
          <td colspan=4>---------------------------------------------------------------------</td>
        </tr>
        <tr> 
          <td align=right width="14%" valign="top">简介：</td>
          <td colspan=3><%=rs("content")%></td>
        </tr>
        <tr> 
          <td colspan=4>---------------------------------------------------------------------</td>
        </tr>
      </table>
    </td>
  </tr>
   
</table>
<%end sub

set rs=nothing   
conn.close   
set conn=nothing
%>
<!--#include file=copyright.asp-->