www.gusucode.com > CC校友录贴吧 CCBar源码程序asp编程 > template_c/page_board_list.html.asp

      <!-- #include file="page_sub_header.html.asp" -->             
<!-- ##### 主栏目开始 ##### --->
<%Call ActionView(CONST_ACTION_FUNC)%>
<table width=95% border="0" cellspacing="3" cellpadding="0">
<tr width=100%>
	<td width=10% align=left ></td>
	<td width=10% align=left></td>
	<td align=right>
		<a href="./board_add_form.asp">
		<div id="board_add_ico"><span class="alt">[ board add ico ]</span></div></a></td>
</tr>
</table>
<table border="0" cellpadding=3 cellspacing=1 align="center" valign="middle" width=99% style='word-break:break-all'>
<tbody>
<% 
If IsObject(TAG_objRS) Then 
Dim i : i = 0 
Do While Not TAG_objRS.Eof %>

	<tr  width="100%" class="board_tr">
		<td  width="30" valign="top" >
	<img src="../images/ico/board_ico.gif" alt="ID:<%=TAG_objRS("BOARD_ID")%>留言" border="0" align='absmiddle' valign='middle'></a></td>
		<td  class="board_td" width= valign="top">
	主题:<%=TAG_objRS("BOARD_TITLE")%>&nbsp;<img src="../board/smileface/<%=TAG_objRS("BOARD_FACE")%>.gif" alt="留言表情" align="absmiddle"></a></td>
	</tr>
	<tr class="board_tr" width="100%">
		<td></td>
		<td class="board_td"><%=UbbCode(TAG_objRS("BOARD_CONTENT"))%></td>
	</tr> 
	<tr  width="100%" class="board_tr">
		<td ></td>
		<td  valign="top" class="board_td">
		留言人:<%=TAG_objRS("USER_REALNAME")%>&nbsp;<font color="#999999">(<%=TAG_objRS("BOARD_TIME")%>)</font>&nbsp;&nbsp;&nbsp;
		<a href="../sms/sms_add_form.asp?pstReTitle=<%=TAG_objRS("USER_REALNAME")%>&pstReSenderId=<%=TAG_objRS("BOARD_USER_ID")%>&pstReSender=<%=TAG_objRS("USER_REALNAME")%>"  title="给其发短信" >
		<img src="../images/ico/User_sms.gif" alt="给<%=TAG_objRS("USER_REALNAME")%>发站内短信" border="0" align="absmiddle" valign="middle"></a>
		<img src="../images/Ico/User_info.gif" style="cursor:hand;" onclick="window.open('../address/address_userinfo_pop.asp?intUserId=<%=TAG_objRS("BOARD_USER_ID")%>','','left=5,top=5,width=450,height=410,scrollbars=yes,status=yes');" alt="查看用户信息" border="0" align="absmiddle" valign="middle">
		<% If TAG_objRS("BOARD_USER_ID") = Cint(GBL_intUserId) Then%>
		<a href="./board_del.asp?intPageNow=<%=Request("intPageNow")%>&intBoardId=<%=TAG_objRS("BOARD_ID")%>" title="删除本留言" onclick="return confirm('您确定删除本条留言吗')">[删除]</a>&nbsp;
		<a href="./board_mdy_form.asp?intPageNow=<%=TAG_intPerPage%>&intBoardId=<%=TAG_objRS("BOARD_ID")%>" title="修改本留言">[修改]</a>
		<% End If %>
		</td>
	</tr> 
	<tr  width="100%">
		<td height="1" colspan="2" class="board_line"><div id="board_line"><span class="alt">[ board add ico ]</span></div></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 colspan="2" align="right"><%=TAG_strPageNav%></td>
	</tr>
</tbody>
</table>

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