📄 bulletin_readinfo.asp

📁 北京华信东方网络办公系统

💻 ASP

字号:

<%@ Language=VBScript %>
<!--#include file= "../dbase.asp"-->
<!--#include file= "bulletin_function.asp"-->
<%
' n_id, v_title, t_content, v_department, v_OfferMan, c_ShowOfferMan, v_Kind, 
' t_receive, d_OfferDate, t_Accessories
id=clng(request.QueryString("id"))
bulletinSingleInfo = bulletinReadInfo(id)
	if isnull(bulletinSingleInfo) then
		response.Redirect("../error/Error.asp?steps=-1&errInfo=<li>没有该公告</li>")
		response.End()
	end if
	%>
<html>
<head>
<title><%= bulletinSingleInfo(1,0) %></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="../mstyle.css" rel="stylesheet" type="text/css">
<style type="text/css">
<!--
.wordspace {
	letter-spacing: 5px;
	word-spacing: 5px;
}
//-->
</style>
</head>

<body rightmargin="0">
<table width="100%" border="0" cellspacing="0" cellpadding="1" align="center">
  <tr> 
    <td colspan="2"><strong>主　　题 :</strong> <%= bulletinSingleInfo(1,0) %></td>
  </tr>
  <tr> 
    <td colspan="2"><strong>发 布 人 :</strong> 
      <%response.Write(bulletinSingleInfo(3,0) &"&nbsp;&nbsp;")
	if bulletinSingleInfo(5,0)="y" then
	response.Write(bulletinSingleInfo(4,0))
	end if %>
    </td>
  </tr>
  <tr> 
    <td colspan="2"><strong>发布时间 :</strong> <%= bulletinSingleInfo(8,0) %></td>
  </tr>
  <tr> 
    <td width="400" height="165" colspan="2" valign="top" ><strong>内　　容 :</strong><br> 
      <textarea cols="63" rows="11" readonly><%= bulletinSingleInfo(2,0) %></textarea> 
    </td>
  </tr>
  <tr> 
    <td> 
      <%if bulletinSingleInfo(9,0)<>"" then 
	response.Write("<img src='images/download.gif' style='cursor: hand' alt='下载附件' onclick=""window.open('"&bulletinSingleInfo(9,0)&"','','width=1,height=1,resizable=yes')"" >" )
	end if
	%>
    </td>
    <td align="center" valign="bottom"><input type="button" name="Button" value="关闭窗口" onClick="self.close();"></td>
  </tr>
</table>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -