📄 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="3">《<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">
<tbody>
<tr>
<td>
<img height="17" src="../images/photolist_leftop.gif" width="17"></td>
<td background="../images/photolist_top.gif">
<img height="17" src="../images/photolist_top.gif" width="1"></td>
<td>
<img height="17" src="../images/photolist_rightop.gif" width="17"></td>
</tr>
<tr>
<td background="../images/photolist_left.gif"> </td>
<td>
<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 background="../images/photolist_right.gif"> </td>
</tr>
<tr>
<td>
<img height="18" src="../images/photolist_leftbottom.gif" width="17"></td>
<td background="../images/photolist_bottom.gif">
<img height="18" src="../images/photolist_bottom.gif" width="1"></td>
<td>
<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 class="form_td" colspan="2" align="left"><div id="album_nav_newreview"><span class="alt">[ album_nav_newreview ]</span></div></td>
</tr>
<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="550" 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" -->⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -