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

    <!-- #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 border="0" cellpadding=3 cellspacing=1 align="center" valign="middle" width=93% 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?action=FormNewSms&pstIncepterId=<%=TAG_objRS("BOARD_USER_ID")%>&pstIncepter=<%=TAG_objRS("USER_REALNAME")%>"  title="给其发短信" >
		<img src="../images/ico/User_sms.gif" alt="给毒素发发站内短信" 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") = GBL_intUserId Then%>
		<a href="../board/board_del.asp?intPageNow=<%=TAG_intPerPage%>&intBoardId=<%=TAG_objRS("BOARD_ID")%>" title="删除本留言" onclick="return confirm('您确定删除本条留言吗')">[删除]</a>&nbsp;
		<a href="../board/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" -->