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

📄 news_show.asp

📁 九酷网络个人主页系统破解版
💻 ASP
字号:
<!--#include file="config.asp"-->
<%
if not isempty(request.querystring("id")) then
id=request.querystring("id")
else
id=1
end if
sql="select * from [news] where display=0 and id="&cint(id)
rs.open sql,conn,1,3
if rs.eof and rs.bof then
Response.Write("未找到此文章,或者已经删除!")
Response.end
end if
'判断关注次数是否增加
if Request.Cookies("9cool_news_show"&id)=empty then
rs("counter")=rs("counter")+1
Response.Cookies("9cool_news_show"&id)="show"
end if
rs.update
'定义内容
content=rs("content")
%>
<HTML><HEAD><TITLE><%=rs("title")%></TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<LINK href="css/style.css" type=text/css rel=stylesheet>
</HEAD>
<BODY>
<TABLE class=tableborder cellSpacing=0 cellPadding=0 width=778 align=center 
border=0>
  <TBODY>
  <TR>
    <TD height=5></TD></TR>
  <TR>
    <TD class=tablebody align=right height=25>&nbsp;</TD>
  </TR>
  <TR>
    <TD height=1></TD></TR>
  <TR>
    <TD background="" height=74>
      <TABLE cellSpacing=0 cellPadding=0 width="100%" align=center border=0>
        <TBODY>
        <TR>
          <TD align=middle width=180><img src="<%=bannerurl%>" border="0"></TD>
          <TD align=middle width=500><script src="ads.asp?id=1"></script>
            </TD>
          <TD noWrap align=middle width=90 height=70><IMG height=12 
            src="images/top_home.gif" width=13 border=0> <A title=将本站设为你的首页 
            onclick="this.style.behavior='url(#default#homepage)';this.sethomepage('<%=siteurl%>');return false;" 
            href="<%=siteurl%>">设为首页</A><BR><IMG height=12 
            src="images/top_gift.gif" width=13 border=0> <A 
            title=将本站加入到你的收藏夹 
            href="javascript:window.external.AddFavorite(location.href,document.title)">加入收藏</A><BR><IMG 
            height=12 src="images/top_mail.gif" width=13 border=0> <a href="mailto:<%=siteemail%>?subject=关于<%=site%>" target=_blank>联系我们</A></TD></TR></TBODY></TABLE></TD></TR>
  <TR>
    <TD height=1></TD></TR></TBODY></TABLE>
<TABLE class=tableborder cellSpacing=0 cellPadding=0 width=778 align=center 
border=0>
  <TBODY>
  <TR height=22>
    <TD align=center noWrap class=navbarbg><A 
          href="index.asp" class=navbar>首页</A> | <a href="reg.asp" class=navbar>立即注册</a> | <A 
            href="news.asp" class=navbar>新闻资讯</A> | <A 
            href="host.asp" class=navbar>空间服务</A> | <A 
          href="list.asp" class=navbar>主页列表</A> | <A 
            href="rank.asp" class=navbar>主页排行</A> | <A 
            href="link.asp" class=navbar>友情链接</A> | <A 
            href="#" class=navbar>站长社区</A></TD>
    </TR>
  <TR>
    <TD bgColor=#dfdfdf height=1></TD></TR></TBODY></TABLE>
<TABLE class=tableborder cellSpacing=0 cellPadding=0 width=778 align=center 
border=0>
  <TBODY>
    <TR>
      <TD bgColor=#efefef height=22>
        <TABLE cellSpacing=2 cellPadding=0 width="100%" border=0>
          <TBODY>
            <TR>
              <TD align=middle width="4%"><IMG height=13 
            src="images/class_ar.gif" width=13></TD>
              <TD width="74%">您当前的位置:<A href="<%=siteurl%>"><%=site%></A> -&gt; <a href="news.asp">新闻资讯</a></TD>
              <TD align=middle width="22%">&nbsp;</TD>
            </TR>
          </TBODY>
      </TABLE></TD>
    </TR>
    <TR>
      <TD bgColor=#d9d9d9 height=1></TD>
    </TR>
    <TR>
      <TD height=5></TD>
    </TR>
  </TBODY>
</TABLE>
<table width="778" border="0" align="center" cellpadding="0" cellspacing="0" class="tableborder">
  <tr valign="top">
    <td width="188"  class="tableleft"><table width="100%"  border="0" cellspacing="0" cellpadding="0">
      <tr>
        <td class="titleback2">栏目导航</td>
      </tr>
      <tr>
        <td height="100" valign="top"><%
Set rsnewstype=conn.Execute("select * from [newstype]") 
if rsnewstype.eof and rsnewstype.bof then
response.write "<br><br><center>暂无文章分类</center>"
else
%>
            <table width="100%"  border="0" cellspacing="1" cellpadding="4" class=tabmenubar>
              <%
do while not rsnewstype.eof
%>
              <tr>
                <td class=showbody1><%
response.write "· <a href=news.asp?typeid="&rsnewstype("id")&">"&rsnewstype("typename")&"</a>"
%></td>
              </tr>
              <%
  rsnewstype.movenext
loop
end if
rsnewstype.close
set rsnewstype=nothing
%>
          </table></td>
      </tr>
      <tr>
        <td height="2" bgcolor="#FFFFFF"></td>
      </tr>
    </table></td>
    <td width="588" height="350" align="right" class="tableright"><table width="575" border="0" cellpadding="0" cellspacing="0" style="table-layout:fixed;word-break:break-all">
      <tr>
        <td align="center" height="32" style="font-size: 12pt;color: #FF6600;"><%=rs("title")%></td>
      </tr>
      <tr>
        <td align="center" height="25" bgcolor="#F7F7F7">发布时间:<span class="hui"><%=rs("time")%> 共阅[<%=rs("counter")%>]次</span></td>
      </tr>
      <script language="JavaScript" type="text/javascript">
var newasp_fontsize=9;
var newasp_lineheight=12;
    </script>
      <tr>
        <td valign="top"><p align="right"><a style="CURSOR: hand; POSITION: relative" onClick="if(newasp_fontsize&gt;8){NewaspContentLabel.style.fontSize=(--newasp_fontsize)+&quot;pt&quot;;NewaspContentLabel.style.lineHeight=(--newasp_lineheight)+&quot;pt&quot;;}" title="减小字体"><img src="images/1.gif" border="0" width="15" height="15" /><font color="#FF6600">减小字体</font></a> <a style="CURSOR: hand; POSITION: relative" onClick="if(newasp_fontsize&lt;64){NewaspContentLabel.style.fontSize=(++newasp_fontsize)+&quot;pt&quot;;NewaspContentLabel.style.lineHeight=(++newasp_lineheight)+&quot;pt&quot;;}" title="增大字体"><img src="images/2.gif" border="0" width="15" height="15" /><font color="#FF6600">增大字体</font></a> </p>
              <div id="NewaspContentLabel" style="display:block;padding:0px 10px;" class="ContentFont">
              <%=content%>
              <%rs.close%></td>
      </tr>
      <tr>
        <td align="right" height="25" bgcolor="#F7F7F7" style="display:block;padding:0px 10px"> [<a href="javascript:window.close()" class="hei14_xi">关闭窗口</a>] [<a href="javascript:window.print()">打 印</a>]</td>
      </tr>
    </table></td>
  </tr>
</table>
<!--#include file="bottom.asp"-->
 

⌨️ 快捷键说明

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