📄 showtg.asp

📁 公文下发和上报管理：　在发布和上报文件时

💻 ASP

字号:

<!--#include file="asp/opendb.asp"-->
<!--#include file="asp/checkuser.asp"-->
<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<link rel="stylesheet" href="css/css.css">
<title></title>
</head>
<body bgcolor="#eeeeee" topmargin="0" leftmargin="5">

<%
set conn=opendb("oabusy","conn","accessdsn")
Set rs=Server.CreateObject("ADODB.recordset")
sql="select * from newnotice where id=" & request("id")
rs.open sql,conn,1
%>
<p>&nbsp;</p><center>
  <b><font size="3" color="#FF0000">通报名称：<%=rs("title")%></font></b><br>
  <br>
  [发布单位：
  <%set rs1=server.CreateObject("adodb.recordset")
    sql="select name from userinf where username='"&rs("username")&"'"
    rs1.open sql,conn,1
    Response.Write rs1("name")
    rs1.close
    set rs1=nothing%>
  ] 
  <table width="83%" border="0" cellpadding="0" cellspacing="0">
    <tr> 
      <td>&nbsp;&nbsp;<%=rs("content")%></td>
    </tr>
    <%
     rs.close
  
     set rs=nothing
     conn.close
     set conn=nothing %>
  </table>
  
</center>

&nbsp;<br><div align=right><a href="javascript:window.close()">关闭窗口</a></div>


</body>
</html><!--#include file="footer.htm"-->

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -