📄 broadcast.asp

📁 5237 论坛.rar

💻 ASP

字号:

<!--#include file="Connections/connY.asp" -->
<!--#include file="Inc/SetCss.asp" -->
<!--#include file="Inc/TimeFormat.asp" -->
<!--#include file="Inc/UBBCode.asp" -->
<!--#include file="Inc/Css.asp" -->
<%
I=Request.QueryString("I")
Set rsBroad = Server.CreateObject("ADODB.Recordset")
Sql = "Select *  From tBroadManage Where rID="&I
rsBroad.Open Sql,ConnY,3,3
If Not rsBroad.Eof Then
%>
<body bgcolor="<%=Forum_ColorList_BgColor%>">
<table width="100%" border="0" cellspacing="1" cellpadding="2" align="center" class="font" bgcolor="<%=Forum_ColorList_BorderColor%>">
  <tr>
    <td bgcolor="<%=Forum_ColorList_TitleColor%>" height="20">
      <div align="center"><%=CovHtml(rsBroad("rTitle"))%></div>
    </td>
  </tr>
  <tr>
    <td bgcolor="<%=Forum_ColorList_BgColor%>" height="18"><%=UBB(rsBroad("rContent"))%></td>
  </tr>
  <tr>
    <td bgcolor="<%=Forum_ColorList_BgColor%>" height="18">
      <div align="right"><font color="<%=Forum_ColorList_PUserFontColor%>"><%=rsBroad("rPoster")%></font>发表于:<%=rsBroad("rTime")%></div>
    </td>
  </tr>
</table>
<%
Else
%>
<table width="100%" border="0" cellspacing="1" cellpadding="2" align="center" class="font" bgcolor="<%=Forum_ColorList_BorderColor%>">
  <tr> 
    <td bgcolor="<%=Forum_ColorList_TitleColor%>" height="20"> 
      <div align="center">出错啦!</div>
    </td>
  </tr>
  <tr> 
    <td bgcolor="<%=Forum_ColorList_BgColor%>" height="18">该广播无法显示,可能是由于管理员已删除的缘故.</td>
  </tr>
</table>
<%
End If
%>
<br>
<div align="center"><span class="font"><font color="<%=Forum_ColorList_PFontColor%>">5237</font>网络互动<br>
  http://www.5237.net</span></div>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -