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

📄 news_display.asp

📁 发布整站源码 可以再开发~ 本人实用中 效果嗷嗷滴~
💻 ASP
字号:
<!--#include file="config.asp"-->
<!--#include file="conn.asp"-->
<!--#include file="code.asp"-->
<%
dim id
id=htmlencode(request("id"))
if id="" or (not isnumeric(id)) then
response.write "<script>alert('参数不正确!!!');window.close()</script>"
response.end
end if

set rs = server.createobject("adodb.recordset")
sql="update News set hits=hits+" & NewsHits & " where id="&id
conn.execute sql
sql="SELECT * FROM News where id="&id
	rs.open sql,conn,1,1 
	if rs.bof and rs.eof then 
	rs.close
	response.write "<script>alert('无此数据!!!');window.close()</script>"
response.end
else
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<LINK href="image/css.css" type=text/css rel=stylesheet>
<title><%=rs("title")%>::公告内容::<%=webname%></title>
</head>

<BODY leftMargin=0 background="<%=bgimage%>" topMargin=0>
<!--#include file="top.asp"-->
<!--#include file="ad.asp"-->
<table width="990"  border="0" align="center" cellpadding="3" cellspacing="1" bgcolor="#666666">
  <tr>
    <td bgcolor="#FFFFFF">&nbsp;&nbsp;当前位置:<a href="index.asp">首页</a>&gt;&gt;<a href="news.asp">最新公告</a>&gt;&gt;公告内容</td>
  </tr>
</table>
<br>
<table width="990" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td width="75%" valign="top"><TABLE cellSpacing=1 cellPadding=3 width=99% bgColor=#000000 border=0>
      <FORM name=form1 onsubmit="return check()" action=admin_News_save.asp method=post language="javascript">
        <TBODY>
          <TR bgColor=#FFFFFF>
            <TD width="75%" height="30" align="center" bgcolor="#EFEFEF"><b><%=rs("title")%></b></TD>
          </TR>
          <TR bgColor=#FFFFFF>
            <TD valign="top"><table width="95%"  border="0" align="center" cellpadding="0" cellspacing="0">
              <tr>
                <td height="30" align="center"><font color="#999999">来源:<%=webname%>   时间:<%=rs("addtime")%>   浏览:<%=rs("hits")%></font></td>
              </tr>
              <tr>
                <td><%=htmldecode(rs("content"))%></td>
              </tr>
            </table></TD>
          </TR>
        </TBODY>
      </FORM>
    </TABLE></td>
    <td width="6"></td>
    <td valign="top"><table width="100%" border="0" cellpadding="3" cellspacing="1" bgcolor="#000000">
      <tr>
        <td align="center" bgcolor="#FFFFFF"><img src="image/ad_none.gif" width="120" height="80"><br>
          <br>
          <img src="image/ad_none.gif" width="120" height="80"><br>
          <br>
          <img src="image/ad_none.gif" width="120" height="80"><br>
          <br>
          <img src="image/ad_none.gif" width="120" height="80"><br>
          <br>
          <img src="image/ad_none.gif" width="120" height="80"></td>
      </tr>
    </table></td>
  </tr>
</table>
<!--#include file="foot.asp"-->
</body>
</html>
<%
rs.close
end if
set rs=nothing
conn.close
set conn=nothing
%>

⌨️ 快捷键说明

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