📄 board.aspx
字号:
<%@ Page Language="VB" ContentType="text/html" ResponseEncoding="utf-8" Inherits="Auway.LiteBlaster.Pages.BoardHelper" %>
<%@ Register Src="Controls/Header.ascx" TagName="Header" TagPrefix="LB" %>
<%@ Register Src="Controls/Footer.ascx" TagName="Footer" TagPrefix="LB" %>
<%@ Register Src="Controls/BoardIndex.ascx" TagName="BoardIndex" TagPrefix="LB" %>
<%@ Import Namespace="Auway.LiteBlaster.Core" %>
<%@ Import Namespace="Auway.LiteBlaster.Enumerations" %>
<%@ Import Namespace="Auway.LiteBlaster.Exceptions" %>
<%@ Import Namespace="Auway.LiteBlaster.Extensions" %>
<%@ Import Namespace="Auway.LiteBlaster.Forum" %>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
<html><!-- InstanceBegin template="/Templates/main.dwt.aspx" codeOutsideHTMLIsLocked="false" -->
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title><%=SystemInfo.Instance.ForumTitle %></title>
<link type="text/css" rel="stylesheet" href="Skins/Styles/main.css" />
<link type="text/css" rel="stylesheet" href="Skins/Styles/itemList.css" />
<script language="javascript" type="text/javascript" src="Lib/sarissa.js"></script>
<script language="javascript" type="text/javascript" src="Lib/ajax.js"></script>
<script language="javascript" type="text/javascript" src="Lib/x/x_core.js"></script>
<script language="javascript" type="text/javascript" src="Lib/x/x_event.js"></script>
<script language="javascript" type="text/javascript" src="Lib/main.js"></script>
<!-- InstanceBeginEditable name="head" -->
<script language="javascript" type="text/javascript" src="Lib/itemList.js"></script>
<script language="javascript" type="text/javascript">
this.onload = function(){
regenSP(null); //initialize special params
// toPage_invoke(); // to invoke this at onload means async callback
}
var boardId = <%=CurBoard.ID %>;
var type = '<%=Type %>';
var sortby = '<%=SortBy %>';
var desc = <%=IIf(Desc, "true", "false") %>;
var preSetStr = sortby;
toPage_curPage = <%=PageIndex %>;
toPage_url = 'Board.aspx';
toPage_bodyId = 'TopicBody';
toPage_statusId = 'StatusBody';
toPage_loadingText = '正在加载主题列表……';
function regenSP(curStr){
if(xStr(curStr)){
if(preSetStr == curStr){
desc = !desc;
}else{
preSetStr = curStr;
sortby = curStr;
desc = true;
}
}
toPage_specialParams = 'id=' + boardId + '&sort=' + encodeURIComponent(sortby) + '&desc=' + desc + '&list=true&type=' + encodeURIComponent(type);
if(xStr(curStr)){
toPage_invoke();
}
}
function regenByType(typeStr){
type = typeStr;
regenSP(null);
toPage_invoke();
}
function toPage_invoke(){
toPage(toPage_curPage);
}
function viewTopicsByOptions(){
var viewPageIndex = parseInt(xGetElementById('TopicsViewPageIndex').value);
if(isNaN(viewPageIndex) || viewPageIndex < 1){
viewPageIndex = toPage_curPage;
}
type = xGetElementById('TopicsViewType').value;
sortby = xGetElementById('TopicsViewSortBy').value;
desc = parseXmlText(xGetElementById('TopicsViewDesc').value);
preSetStr = sortby;
regenSP(null);
toPage(viewPageIndex);
}
</script>
<link rel="stylesheet" type="text/css" href="Skins/Styles/board.css" />
<link rel="alternate" type="application/rss+xml" href="RSS.aspx?id=<%=CurBoard.ID %>" />
<!-- InstanceEndEditable -->
</head>
<body style="min-width:900px">
<div id="BodyFrame" align="left">
<div id="BodyFrameInner">
<LB:Header id="HeaderFrame" runat="server" />
<div id="PathIndicator">
» <a href="Admin/../"><%=SystemInfo.Instance.ForumTitle %></a><span id="ExtraPathIndicator"></span>
</div>
<!-- InstanceBeginEditable name="PathIndicator" -->
<script language="javascript" type="text/javascript">
addExtraTitle('<%=CurBoard.Name %>');
setExtraPathIndicator('<%=Boards.Instance.GetBoardPathHtml(CurBoard.ID) %>');
</script>
<!-- InstanceEndEditable -->
<br />
<table id="Container">
<tbody><tr><td>
<!-- InstanceBeginEditable name="Container" -->
<table class="ListBody" align="center"><tbody><tr><td>
<%
ChildrenBoardIndexer.ParentBoardID = CurBoard.ID
%>
<LB:BoardIndex id="ChildrenBoardIndexer" runat="server" />
<div style="height:45px">
<div style="float:left">
<a href="TopicEdit.aspx?type=add&boardid=<%=CurBoard.ID %>">
<img src="Skins/Images/Buttons/new_topic.png" alt="新主题" />
</a>
</div>
<div style="float:left">
<a href="TopicEdit.aspx?type=add&boardid=<%=CurBoard.ID %>&vote=true">
<img src="Skins/Images/Buttons/new_vote.png" alt="新投票" />
</a>
</div>
</div>
<table class="ListTable ListHeader">
<tbody>
<tr>
<td><%=Server.HtmlEncode(CurBoard.Name) %></td>
<td class="ListHeaderExpanded" onClick="switchHeaderSwitcherVisible('TopicBody', event);"> </td>
</tr>
</tbody>
</table>
<table class="ListTable" cols="2">
<tbody>
<% If Len(CurBoard.Rules) > 0 Then %>
<tr>
<td class="ListItemsTd ListItemsTd_style2 txtcenter" width="10%">版规</td>
<td class="ListItemsTd ListItemsTd_style1 txtleft"><%=TextHelper.SolveRichText(CurBoard.Rules, True, True) %></td>
</tr>
<% End If %>
<% If Len(CurBoard.Description) > 0 Then %>
<tr>
<td class="ListItemsTd ListItemsTd_style2 txtcenter" width="10%">简介</td>
<td class="ListItemsTd ListItemsTd_style1 txtleft"><%=TextHelper.SolveRichText(CurBoard.Description, True, True) %></td>
</tr>
<% End If %>
<tr>
<td colspan="2" class="ListItemsTd ListItemsTd_style3">
<div style="float:left">
<%=GenerateBoardMastersHtml() %>
</div>
<div style="float:right">
<%
Dim TypeSelectionStartLink As String = "Board.aspx?id=" & CurBoard.ID.ToString() & "&type="
%>
<a href="<%=TypeSelectionStartLink %>all" onClick="regenByType('all'); return false;">全部</a> |
<a href="<%=TypeSelectionStartLink %>best" onClick="regenByType('best'); return false;">精华帖</a> |
<a href="<%=TypeSelectionStartLink %>top" onClick="regenByType('top'); return false;">置顶帖</a> |
<a href="<%=TypeSelectionStartLink %>striking" onClick="regenByType('striking'); return false;">醒目帖</a> |
<a href="<%=TypeSelectionStartLink %>locked" onClick="regenByType('locked'); return false;">已锁帖</a> |
<a href="<%=TypeSelectionStartLink %>closed" onClick="regenByType('closed'); return false;">已结帖</a>
<% If UserInfo.CurrentUserOrGuest.ID > 0 Then %>
| <a href="UserPanel.aspx?tab=4" target="_blank" class="board_bookmark">版面收藏</a>
<% If UserInfo.CurrentUserOrGuest.IsBoardMaster(CurBoard.ID) Then %>
| <a href="BoardManager.aspx?id=<%=CurBoard.ID %>" class="board_manage">版面管理</a>
<% End If %>
<% End If %>
</div>
</td>
</tr>
</tbody>
</table>
<%
' load body before page loaded
Dim BodyHtml As String
Try
BodyHtml = GenerateTopicListHtml(CurBoard.ID)
Catch ex As Exception
ExceptionHandler.HandleExceptionToErrorPage(ex)
End Try
%>
<div id="TopicBody"><%=BodyHtml %></div>
<div id="StatusBody"></div>
<br />
<table class="ListTable ListHeader">
<tbody>
<tr>
<td>主题显示</td>
<td class="ListHeaderExpanded" onClick="switchHeaderSwitcherVisible('TopicsViewOptionsBody', event);"> </td>
</tr>
</tbody>
</table>
<table id="TopicsViewOptionsBody" class="ListTable">
<tbody>
<tr>
<td class="ListItemsTd ListItemsTd_style3 txtcenter" valign="middle">
帖子种类:
<select id="TopicsViewType" style="width:80px">
<option value="all">全部</option>
<option value="best">精华帖</option>
<option value="top">置顶帖</option>
<option value="striking">醒目帖</option>
<option value="locked">已锁帖</option>
<option value="closed">已结帖</option>
</select>
排列方式:
<select id="TopicsViewSortBy" style="width:110px">
<option value="lastposttime">最后回复时间</option>
<option value="posttime">发帖时间</option>
<option value="title">主题标题</option>
<option value="poster">主题作者</option>
<option value="lastposter">最后回复者</option>
<option value="replycount">回复次数</option>
<option value="hitcount">查看次数</option>
</select>
排列顺序:
<select id="TopicsViewDesc" style="width:60px">
<option value="true">降序</option>
<option value="false">升序</option>
</select>
页码:
<input id="TopicsViewPageIndex" type="text" style="width:50px" />
<input type="button" value="按照选项显示主题列表" onClick="viewTopicsByOptions();" />
</td>
</tr>
</tbody>
<tbody>
<tr>
<td class="ListItemsTd ListItemsTd_style3 txtleft" align="center">
<div style="float:left; padding:5px; width:30%">
<img src="Skins/Images/Status/topic_normal_open.gif" />
普通主题
</div>
<div style="float:left; padding:5px; width:30%">
<img src="Skins/Images/Status/topic_normal_locked.gif" />
已锁的普通主题
</div>
<div style="float:left; padding:5px; width:30%">
<img src="Skins/Images/Status/topic_normal_closed.gif" />
已关闭的普通主题
</div>
<div style="float:left; padding:5px; width:30%">
<img src="Skins/Images/Status/topic_hot_open.gif" />
热门主题
</div>
<div style="float:left; padding:5px; width:30%">
<img src="Skins/Images/Status/topic_hot_locked.gif" />
已锁的热门主题
</div>
<div style="float:left; padding:5px; width:30%">
<img src="Skins/Images/Status/topic_hot_closed.gif" />
已关闭的热门主题
</div>
<div style="float:left; padding:5px; width:30%">
<img src="Skins/Images/Status/topic_best.gif" />
精华帖
</div>
<div style="float:left; padding:5px; width:30%">
<img src="Skins/Images/Status/topic_top.gif" />
置顶帖
</div>
<div style="float:left; padding:5px; width:30%">
<img src="Skins/Images/Status/topic_vote.gif" />
投票帖
</div>
<div style="float:left; padding:5px; width:30%">
<img src="Skins/Images/Status/topic_new.gif" />
24小时新帖
</div>
</td>
</tr>
</tbody>
</table>
<br />
<div style="width:100%" align="right">
<%=Session("BoardTreeOptionsHtml") %>
</div>
</td></tr></tbody></table>
<!-- InstanceEndEditable -->
</td></tr></tbody>
</table>
<br />
<LB:Footer id="FooterFrame" runat="server" />
</div>
</div>
</body>
<!-- InstanceEnd --></html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -