<%
Dim ROfBd(444)    '999为最大版面号，根据实际情况修改

'定义版面号对应的版规，使用HTML语言，不得换行！！！要实现显示换行用<BR>，避免使用英文标点。
'括号中是版面号，后面引号内写版规内容，
ROfBD(444) = "封闭管理，关闭再转移功能。"
ROfBD(3) = "精品音乐赏析，外文歌曲分享。"
ROfBD(9) = "鼓励原创，欢迎转载，深度与内涵的高地。"
ROfBD(8) = "自由是潜水的主旨，在这里，说你一切想说的。"
ROfBD(4) = "会员自拍相片，精品图片欣赏，转动你的眼球。"
ROfBD(1) = "版主申请，友情链接，意见建议，投诉举报，活动筹划，广告赞助。"
IF RofBD(GBL_board_ID) <> "" Then
%>
<br>
<table width="<%=DEF_BBS_ScreenWidth%>" border="0" cellspacing="0" cellpadding="0" align="center">
<tr align=center>
     <td>
           <table width=<%=DEF_BBS_ScreenWidth%> border=0 cellspacing=1 cellpadding=5 align=left bgcolor=<%= DEF_BBS_DarkColor %> class=TBone>
                 <tr bgcolor=<%=DEF_BBS_LightDarkColor%> >
                       <td class=TBHead colSpan=4><img src=images/blank.gif width=2 height=3 colspan=16><br><b><font color=ffffff class=HeadFont><%= GBL_Board_BoardName %> 主题</font></b> --- <%
                       Response.Write RofBD(GBL_board_ID)
                       %>
                 </td>
           </tr>
</table>
<% If GBL_TableBottomString <> "" Then %><table width=<%=DEF_BBS_ScreenWidth%> border=0 cellspacing=0 cellpadding=0 align=center><tr><td><%=GBL_TableBottomString%></td></tr></table><% End If %>
</td>
</tr>
</table>
<% End If %>