www.gusucode.com > 枫的记忆个人主页程序源码程序 > downcode.com\fengdejiyizh\photo.asp
<!--#include file="conn.asp"--> <% dim pid pid=trim(request("pid")) if pid="1" then p_id="自己" elseif pid="2" then p_id="兄弟" elseif pid="3" then p_id="朋友" elseif pid="4" then p_id="家庭" elseif pid="5" then p_id="收藏" end if %> <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> <title></title> <SCRIPT language=JavaScript src="rightclick.js"></SCRIPT> <script language="JavaScript" src="inc_script.js"></script> <style type="text/css"> <!-- A{text-transform: none; text-decoration: none; color: #666666;} A:hover {color: #ff0000;text-decoration:derline} body,table {font-size:9pt;font-family: Verdana, 宋体;color: #666666} --> </style> </head> <body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" onselectstart='return false' ondrag='return false' oncontextmenu='return false'> <SCRIPT language=JavaScript> <!-- function high(which2){ theobject=which2 highlighting=setInterval("highlightit(theobject)",100)} function low(which2){clearInterval(highlighting) which2.filters.alpha.opacity=50} function highlightit(cur2){ if (cur2.filters.alpha.opacity<200) cur2.filters.alpha.opacity+=50 else if (window.highlighting) clearInterval(highlighting)} //--></SCRIPT> <table width="100%" border="0" align="center" cellpadding="0" cellspacing="1"> <tr><td background=img/line1.gif colspan=3></td></tr> <tr> <% set rs=server.CreateObject("adodb.recordset") sql="select * from photo where p_type='"&p_id&"' and status='0' order by id desc" rs.open sql,conn,1,3 PageSize=15 %> <!--#INCLUDE FILE="page_up_down.asp"--> <% if rs.eof and rs.bof then response.write ("<td>暂时没有相片...</td>") else i=1 do while not rs.eof if processedrecord >=pagesize then exit do end if %> <td align="center" bgcolor="#f9f9f9"><table border="0" cellspacing="2" cellpadding="0"> <tr> <td height="15"></td> </tr> <tr> <td align="center"><table border="0" cellpadding="0" cellspacing="4" bgcolor="#FFFFFF"> <tr> <td><a href="javascript:thing('photo_show.asp?id=<%=rs("id")%>','','scrollbars=yes,resizable=no,width=620,height=600')" title="<%=rs("title")%>"><img src="admin/<%=rs("p_url")%>" width="120" height="90" border="0" onmouseout=low(this) onmouseover=high(this) style="FILTER: alpha(opacity=50)"></a></td> </tr> </table></td> </tr> <tr> <td align="right" style="font-size:10px;color:#666666;" height="15"><img src="img/click.gif" width="35" height="9" align="absbottom"><font color="#FF6666"><%=rs("flag")%></font></td> </tr> </table></td> <% if i mod 3=0 then response.write"</tr><tr><td background=img/line1.gif colspan=3></td></tr>" i=i+1 processedrecord=processedrecord+1 rs.movenext loop end if rs.close set rs=nothing %> </tr> </table> <table width="75%" border="0" cellspacing="0" cellpadding="0" align="right"> <tr height="25"> <td align="right" style="font-size:10px;color:#666666;"><img src="img/count.gif" border="0" align="absbottom"> <%=RecordCount%> <img src="img/page.gif" border="0" align="absbottom"> <font color="#FE03F5"><%=Page_No%></font>-<%=pagecount%> <a href="?pid=<%=pid%>&page_no=1" title=首页><img src="img/first.gif" border="0" align="absbottom"></a> <%if page_no>1 then%><a href="?pid=<%=pid%>&page_no=<%=page_no-1%>" title=上一页><img src="img/prev.gif" border="0" align="absbottom"></a><%else%><span title=上一页><img src="img/prev.gif" border="0" align="absbottom"></span><%end if%> <%if page_no<pagecount then%><a href="?pid=<%=pid%>&page_no=<%=page_no+1%>" title=下一页><img src="img/next.gif" border="0" align="absbottom"></a><%else%><span title=下一页><img src="img/next.gif" border="0" align="absbottom"></span><%end if%> <a href="?pid=<%=pid%>&page_no=<%=pagecount%>" title=末页><img src="img/end.gif" border="0" align="absbottom"></a> </td> </tr> </table> </body> </html>