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")%> <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")%> <font color="#999999">(<%=TAG_objRS("BOARD_TIME")%>)</font> <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> <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" -->