page_user_my_album_list.html.asp

1] 校友多种方式注册认证[直接注册,答问注册,认证注册] 2] 校友论坛 小巧而实用的论坛,支持UBB标签,快速回复,帖子搜索,灵活的将帖子置顶,设置精华 3] 校友相册 相片上传[方便上传

<!-- #include file="page_user_header.html.asp" -->             
<!-- ##### 主栏目开始 ##### --->
<%Call ActionView(CONST_ACTION_FUNC)%>
<table border="0" cellpadding="0" cellspacing="0" align="center" valign="middle" width="93%"  style="word-break:break-all">
	<tr  class="nav_title_tr">
		<td  class="nav_title_td" colspan="2">
		<div class="mainNav">我发表的相片</div></td>
	</tr>
</table>
<table class="list_table" width="93%" border="0" cellpadding="2" cellspacing="1" align="center" valign="middle">
	<form name="vbfrom" id="vbform" action="user_my_topic_del.asp" method="post">
		<tr class="list_title_tr">
			<td  class="list_title_td" width="5%" align="center">ID</td>
			<td  class="list_title_td" width="30%" align="center"><%=MakeOrder("ALBUM_TITLE","标题",TAG_strOrderUrl)%></td>
			<td  class="list_title_td" width="15%" align="center"><%=MakeOrder("ALBUM_TYPE","类型",TAG_strOrderUrl)%></td>
			<td  class="list_title_td" width="15%" align="center"><%=MakeOrder("ALBUM_HITS","人气",TAG_strOrderUrl)%></td>
			<td  class="list_title_td"  align="center"><%=MakeOrder("ALBUM_ADD_TIME","上传时间",TAG_strOrderUrl)%></td>
			<td  class="list_title_td" align="center">删除</td>
		</tr>
		<% 
If IsObject(TAG_objRS) Then 
Dim i : i = 0 
Do While Not TAG_objRS.Eof %>

		<tr onmouseover="BgChange(this,'odd')" onmouseout="BgChange(this,'even')" class="even">
			<td class="list_td_change"><%=i+1%></td>
			<%
			Dim strImgUrl : strImgUrl = GetAlbumFileUrlLogic(GBL_objPubDB.objPubRS("ALBUM_IMG_FILE"),GBL_objPubDB.objPubRS("ALBUM_STATUS"))
			%>
			<td  ><a target="_blank" title="点击查看图片" href="<%=strImgUrl%>"><%=TAG_objRS("ALBUM_TITLE")%></a></td>
			<td  ><%=TAG_objRS("ALBUM_TYPE")%></td>
			<td  class="list_td_change" align="center"><%=TAG_objRS("ALBUM_HITS")%></td>
			<td  ><%=TAG_objRS("ALBUM_ADD_TIME")%></td>
			<td align="center"><a class="edit" onclick="return confirm('您确认删除?')" href="../album/album_del.asp?redflag=myalbum&intAlbumId=<%=TAG_objRS("ALBUM_ID")%>">删除</a></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%>"  />
</form>
	<tr  class="list_title_tr"> 
		<td colspan=9><%=TAG_strPageNav%></td>
	</tr>
</tbody>
</table>

<!-- ##### 主栏目结束 ##### -->   
<!-- #include file="page_sub_footer.html.asp" -->