page_admin_board_manage.html.asp

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

<!-- #include file="page_admin_user_header.html.asp" -->             
<!-- ##### 主栏目开始 ##### --->
<%Call ActionView(CONST_ACTION_FUNC)%>
<div id="main_content">
	<div id="main_content_title">
		<div class="note">用户留言列表</div>	
	</div>
	<div id="main_content_list">	
		<table class="main" width="100%"  border="0" cellspacing="1" cellpadding="0">
		<form name="vbfrom" id="vbform" action="admin_board_manage_save.asp" method="post">
		<input type="hidden" name="method" value="del">
			<tr id="main_list_index">
				<td width="2%" align="center">
					<input class="checkbox" onclick="CheckAll(this.form,this)" id="topcheckall" name="topcheckall" type="checkbox" value="" /></td>
				<td width="5%">序号</td>
				<td>用户名</td>
				<td width="8%">真实姓名</td>
				<td>发布时间</td>
				<td>标题</td>
				<td>内容</td>
				<td>字数</td>
				<td width="5%">状态</td>
				<!-- <td width="5%">修改</td> -->
			</tr>
			<% 
If IsObject(TAG_objRS) Then 
Dim i : i = 0 
Do While Not TAG_objRS.Eof %>

			<tr onmouseover="LineMouseOver(this)" onmouseout="LineMouseOut(this,<%=i+1%>)" onmousedown="LineMouseDown(this,<%=i+1%>)" class="<%=TrStyleSet(i)%>">
				<td align="center">
				<input name="selId" type="checkbox" class="form_checkbox" id="selId" value="<%=TAG_objRS("BOARD_ID")%>" /></td>
				<td><%=i+1%></td>
				<td><%=TAG_objRS("USER_ACCOUNT")%></td>
				<td><%=TAG_objRS("USER_REALNAME")%></td>
				<td><%=TAG_objRS("BOARD_TIME")%></td>
				<td><%=TAG_objRS("BOARD_TITLE")%></td>
				<td><%=UbbCode(TAG_objRS("BOARD_CONTENT"))%></td>
				<td><%=Len(TAG_objRS("BOARD_CONTENT"))%></td>
				<td><%=GetBoardStatusLogic(TAG_objRS("BOARD_STATUS"))%></td>
				<!-- <td align="center"><a class="edit" href="admin_admin_mdy_board.asp?intBoardId=<%=TAG_objRS("BOARD_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%>"  />

			<tr class="selectall">
				<td colspan="10">
					<input class="checkbox" onclick="CheckAll(this.form,this)" id="bottomcheckall" name="bottomcheckall" type="checkbox" value="" /> 全选
					<input type="button" value="删除留言" class="submit" onclick="vbform.method.value='del';return CheckSelChkBox(this.form,'你确认删除所选留言?');">
					&nbsp;<input type="button" value="留言置顶" class="submit" onclick="vbform.method.value='top';return CheckSelChkBox(this.form,'你确认置顶所选留言?');">
					&nbsp;<input type="button" value="留言解除置顶" class="submit" onclick="vbform.method.value='untop';return CheckSelChkBox(this.form,'你确认解除置顶所选留言?');">
				</td>
			</tr>
		</form>
		</table>		    
	</div>
	<div id="main_content_foot">
		<div class="pagination"><%=TAG_strPageNav%></div>
	</div>
</div>

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