www.gusucode.com > CC校友录贴吧 CCBar源码程序asp编程 > template_c/page_album_view.html.asp
<!-- #include file="page_sub_header.html.asp" --> <!-- #include file="page_album_menu.html.asp" --> <!-- ##### 主栏目开始 ##### ---> <%Call ActionView(CONST_ACTION_FUNC)%> <script language="Javascript"> //搜索表单校验 function verify(theform) { <%=TAG_strVerifyCode%> return true; } </script> <tr width="100%"> <td align="center" > <br><% If IsObject(TAG_objDicUnit) AND TAG_objDicUnit.Exists("Exist") Then %> <!--html_row DataRS=TAG_objDicUnit--> <table cellspacing="0" cellpadding="0" width="98%" align="center" border="0"> <tbody> <tr> <td align="left" height="20"> <font face="黑体" size="4">《<u><%=TAG_objDicUnit.Item("ALBUM_TITLE")%></u>》</font></td> </tr> <tr> <td background="../images/album/line2.gif"> <img height="2" src="../images/album/line2.gif" width="6"></td> </tr> <tr> <td align="center" > <table border="0" cellpadding="0" cellspacing="0" align="center" style="padding:0px 0px 0px 0px; "> <tbody> <tr style="padding:0px 0px 0px 0px; "> <td style="padding:0px 0px 0px 0px; "> <img height="17" src="../images/photolist_leftop.gif" width="17"></td> <td background="../images/photolist_top.gif" style="padding:0px 0px 0px 0px; "> <img height="17" src="../images/photolist_top.gif" width="1"></td> <td style="padding:0px 0px 0px 0px; "> <img height="17" src="../images/photolist_rightop.gif" width="17"></td> </tr> <tr style="padding:0px 0px 0px 0px; "> <td style="padding:0px 0px 0px 0px; " background="../images/photolist_left.gif"> </td> <td style="padding:0px 0px 0px 0px; "> <a href="<%=TAG_objDicUnit.Item("ALBUM_IMG_URL")%>" target="_blank"><img src="<%=TAG_objDicUnit.Item("ALBUM_IMG_URL")%>" onload="javascript:DrawImage(this,360,290);" alt="点击欣赏原始尺寸图片 " border="0" align="absmiddle" valign="middle"></a></td> <td style="padding:0px 0px 0px 0px; " background="../images/photolist_right.gif"> </td> </tr> <tr style="padding:0px 0px 0px 0px; "> <td style="padding:0px 0px 0px 0px; "> <img height="18" src="../images/photolist_leftbottom.gif" width="17"></td> <td style="padding:0px 0px 0px 0px; " background="../images/photolist_bottom.gif"> <img height="18" src="../images/photolist_bottom.gif" width="1"></td> <td style="padding:0px 0px 0px 0px; "> <img height="18" src="../images/photolist_rightbottom.gif" width="17"></td> </tr> </tbody> </table> </td> </tr> <tr> <td height="10" align="center" valign="middle"></td> </tr> <tr> <td> <table cellspacing="1" cellpadding="4" width="90%" class="list_table" border="0"> <tbody> <tr valign="top" class="list_tr"> <td width="20%" class="list_td">上传者:</td> <td width="30%" class="list_td_change"><%=TAG_objDicUnit.Item("USER_REALNAME")%> <img src="../images/Ico/User_info.gif" style="cursor:hand;" onclick="window.open('../address/address_userinfo_pop.asp?intUserId=<%=TAG_objDicUnit.Item("USER_ID")%>','','left=5,top=5,width=450,height=410,scrollbars=yes,status=yes');" alt="查看用户信息" border="0" align="absmiddle" valign="middle"></td> <td width="20%" class="list_td">上传时间:</td> <td width="30%" class="list_td_change"><%=TAG_objDicUnit.Item("ALBUM_ADD_TIME")%></td> </tr> <tr valign="top" class="list_tr" > <td width="20%" class="list_td">点击率:</td> <td width="30%" class="list_td_change"><%=TAG_objDicUnit.Item("ALBUM_HITS")%></td> <td width="20%" class="list_td">评论数</td> <td width="30%" class="list_td_change"><%=TAG_objDicUnit.Item("ALBUM_REVIEW_NUM")%></td> </tr> <tr valign="top" class="list_tr"> <td width="20%" class="list_td">相册类型:</td> <td width="30%" class="list_td_change"><%=TAG_objDicUnit.Item("ALBUM_TYPE")%></td> <td width="20%" class="list_td">加为收藏</td> <td width="30%" class="list_td_change"><a href="javascript:OpwCollection(2,<%=TAG_objDicUnit.Item("ALBUM_ID")%>,'<%=TAG_objDicUnit.Item("ALBUM_TITLE")%>');"><img src="../images/user/collect.GIF" border="0" title="加为收藏" align="absmiddle" width="16" height="16"></a></td> </tr> <tr valign="top" class="list_tr"> <td align="center" colspan="4" class="list_td"> <a href="album_view.asp?intAlbumId=<%=TAG_intLastId%>">【上一张】</a> <a href="album_view.asp?intAlbumId=<%=TAG_intNextId%>">【下一张】</a> <% If GBL_intUserId = TAG_objDicUnit.Item("USER_ID") Then%><img src="../images/ico/img_del.gif" border="0" align="absmiddle"><a href="album_del.asp?intAlbumId=<%=TAG_objDicUnit.Item("ALBUM_ID")%>" onclick="return confirm('您确认删除?')">[删除]</a><% End If%></td> </tr> </table> </td> </tr> <tr> <td align="left" height="20"> <br></td> </tr> <tr> <td align="left" height="20"> 相片评论:</td> </tr> <tr> <td background="../images/album/line2.gif"> <img height="2" src="../images/album/line2.gif" width="6"></td> </tr> <tr> <td align="left" height="20"> <br></td> </tr> <% If IsObject(TAG_objRS) Then Dim i : i = 0 Do While Not TAG_objRS.Eof %> <tr> <td> <table style='word-break:break-all;' cellspacing="1" cellpadding="4" width="90%" class="list_table" border="0" align="center"> <tbody> <tr valign="top" > <td width="12%" class="list_td_change" align="left">姓名:</td> <td width="55%" class="list_td_change" align="left"><%=TAG_objRS("USER_REALNAME")%></td> <td width="*" class="list_td_change"><font color="#aaaaaa"><%=TAG_objRS("ALBUM_REVIEW_ADD_TIME")%></font></td> </tr> <tr valign="top" > <td width="10%" class="list_td" align="left">评论:</td> <td width="*" colspan="2" class="list_td" align="left"><%=TAG_objRS("ALBUM_REVIEW_CONTENT")%></td> </tr> <tr valign="top" > <td width="*" colspan="3" align="right" class="list_td"> <a href="../sms/sms_add_form.asp?IncepterId=<%=TAG_objRS("USER_ID")%>&strIncepter=<%=TAG_objRS("USER_REALNAME")%>" title="给其发短信" > <img src="../images/ico/user_sms.gif" alt="给<%=TAG_objRS("USER_REALNAME")%>发站内短信" border="0" align="absmiddle" valign="middle"></a><span onclick=window.open('../address/address_userinfo_pop.asp?intUserId=<%=TAG_objRS("USER_ID")%>','','left=5,top=5,width=450,height=410,scrollbars=yes,status=yes') style="cursor:hand"><img src="../images/ico/user_info.gif" alt="查看<%=TAG_objRS("USER_REALNAME")%>的信息" border="0" align="absmiddle" valign="middle"></span> <font color="#aaaaaa">第<%=i+1%>楼 <a href=#top>[回页顶]</a></font><% If GBL_intUserId = TAG_objRS("ALBUM_REVIEW_OWNER_ID") Then%> <img src="../images/ico/img_del.gif" border="0" align="absmiddle"><a href="album_review_del.asp?intAlbumId=<%=TAG_objRS("ALBUM_REVIEW_PHOTO_ID")%>&intAlbumReviewId=<%=TAG_objRS("ALBUM_REVIEW_ID")%>" onclick="return confirm('您确认删除?')">[删除]</a><% End If%></td> </tr> </table> </td> </tr> <tr> <td align="left" height="10"></td> </tr> <% i = i + 1 If i >= TAG_intPerPage Then Exit Do TAG_objRS.MoveNext Loop If IsObject(TAG_objRS) Then TAG_objRS.Close() Set TAG_objRS = Nothing End If End If %> <input type="hidden" name="intPageNow" value="<%=TAG_intPageNow%>" /> <tr> <td align="center" valign="top"><%=TAG_strPageNav%></td> </tr> <tr> <td align="left" height="20"> <br></td> </tr> <tr> <td> <table border="0" cellpadding="3" cellspacing="1" align="center" width="80%" class="form_table"> <form action="../album/album_review_save.asp" method="post" id="vbform" name="vbform" onsubmit="return verify(this);"> <tr class="form_td" > <td colspan="2" class="form_td_right" valign="top"> <input type="hidden" name="intAlbumId" value="<%=TAG_intAlbumId%>" > <textarea name="txtContent" style="display:none;"></textarea> <iframe id="mEditor" src="../meditor/mEditor_1.html?lnk=txtContent&uploadpath=../upload/"" width="500" height="200" frameborder="0" scrolling="no"></iframe> <span class="asterisk">*</span></td> </tr> <tr class="form_td" > <td class="form_sub_td" colspan="2" > <input class="submit" type="submit" value="发表评论"> <input class="reset" type="reset" value="重 来"> </td> </tr> </form> </table></td> </tr> </tbody> </table> </td> <!--/html_row--> <% If IsObject(TAG_objDicUnit) Then Set TAG_objDicUnit = Nothing End If End If %> </tr> </table> <!-- ##### 主栏目结束 ##### --> <!-- #include file="page_sub_footer.html.asp" -->