⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 listarti.asp

📁 这是一个电子政务的源代码
💻 ASP
字号:
<!--#include file="rscoon.asp"-->
<% toptitle="查看信息" %>
<!--#include file="mztop.asp"-->
<!--#include file="mzfunc.asp"-->
<TABLE width="766" height="100%" border=0 align="center" cellPadding=0 cellSpacing=1>
  <TBODY>
    <TR> 
      <TD bgColor=#f5f6fb class=wz7 height=404 vAlign=top> 
        <TABLE width="766" border=0 align="center" cellPadding=0 cellSpacing=1>
          <TBODY>
            <TR> 
			<%
			     id=request.querystring("id")
				 if id="" or isnull(id) or isnumeric(id)<>true then
				 response.write"<script>alert('操作出错\n请返回重试');history.back();</script>"
			          else
			   sql="select title, body,times from allarti where id="&id 
			         set rs=conn.execute(sql)
					 end if
					 if rs.eof then
					 response.write"<script>alert('操作出错\n请返回重试');history.back();</script>"
			             else
			%>
              <TD height=53 vAlign=top> <br>
                <DIV align=center> 
                  <font size="4"><%=rs("title")%></font>
                </DIV></TD>
            </TR>
          </TBODY>
        </TABLE>
       &nbsp;&nbsp;&nbsp;<%=UBBCode(rs("body"))%></TD>
    </TR>
    <TR>
      <TD bgColor=#f5f6fb  height=20 vAlign=top><div align="right"><a href="javascript:window.close()">【关闭窗口】</a></div></TD>
    </TR>
  </TBODY>
</TABLE>
<% end if 
  call mzfoot() %>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -