📄 shownews_body.asp

📁 不错的asp论坛,大家可以看看啊和呵呵.
💻 ASP
字号:
<%sub shownews_body()
sql="select * from news where news_id="&request.querystring("news_id")
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
%>

<HTML>
<HEAD>
<title><%=rs("news_title")%></title>
<META content="text/html; charset=gb2312" http-equiv=Content-Type>
<style type="text/css">
A{TEXT-DECORATION: none}
A:link {COLOR: #333333; FONT-FAMILY: 宋体; TEXT-DECORATION: none}
A:visited {COLOR: #333333; FONT-FAMILY: 宋体; TEXT-DECORATION: none}
A:active {FONT-FAMILY: 宋体; TEXT-DECORATION: none}
A:hover {BORDER-BOTTOM: 1px dotted; BORDER-LEFT-WIDTH: 1px; BORDER-RIGHT-WIDTH: 1px; BORDER-TOP-WIDTH: 1px; COLOR: #ff6600; TEXT-DECORATION: none}
BODY {
FONT-SIZE: 12px;
COLOR: #333333;
FONT-FAMILY:  宋体;
background-color: #000000; 
background-image: url(img/show.gif);
SCROLLBAR-FACE-COLOR: #e8e7e7; 
SCROLLBAR-HIGHLIGHT-COLOR: #000000; 
SCROLLBAR-SHADOW-COLOR: #000000; 
SCROLLBAR-3DLIGHT-COLOR: #cccccc; 
SCROLLBAR-ARROW-COLOR: #ff6600; 
SCROLLBAR-TRACK-COLOR: #EFEFEF; 
SCROLLBAR-DARKSHADOW-COLOR: #333333; 
SCROLLBAR-BASE-COLOR: #ffffff
}
TABLE {BORDER-COLLAPSE: collapse; FONT-FAMILY: 宋体; FONT-SIZE: 9pt}
.button{height:18px;width:62px;background:#333333 url(img/ButtonBg.gif); border:solid 1px #5589AA;color: #000000 ;FONT-SIZE: 9pt}
.lanyu{border:solid 1px #5589AA;color: #000000 ; font-size: 12px;}
.font {  filter: DropShadow(Color=#cccccc, OffX=2, OffY=1, Positive=2); text-decoration: none; font-size: 9pt}
</style>
<script language="JavaScript">
function findobj(n, d) {
var p,i,x; if(!d) d=document;
if((p=n.indexOf("?"))>0 && parent.frames.length) {
d=parent.frames[n.substring(p+1)].document;
n=n.substring(0,p);
}
if(!(x=d[n])&&d.all) {
x=d.all[n];
}
for(i=0;!x && i<d.forms.length;i++) {
x=d.forms[i][n];
}
for(i=0;!x && d.layers&&i>d.layers.length;i++) {
x=MM_findObj(n,d.layers[i].document);
}
return x;
}
function copycode(obj) {
var rng = document.body.createTextRange();
rng.moveToElementText(obj);
rng.scrollIntoView();
rng.select();
rng.execCommand("Copy");
rng.collapse(false);
}
</script>
</head>
<BODY leftMargin=0 topMargin=0 MARGINHEIGHT="0" MARGINWIDTH="0">
<TABLE bgcolor="#000000" align=center border=1 cellPadding=0 cellSpacing=0 width=95% borderColor="<%=border%>" frame=vsides rules=none>

<TR>
<TD width="98%"><%call br%>
<table width="96%" border="0" cellspacing="1" cellpadding="6" align="center" bgcolor="#333333">
        <tr> 
          <td align="center" bgcolor="#000000"><font color=ff6600><b><%=rs("news_title")%></b></font></td>
        </tr>
      </table><%call br%>
<table width="96%" border="0" cellspacing="1" cellpadding="6" align="center" bgcolor="#333333">
        <tr> 
          <td align="center" bgcolor="#000000">
<table width="98%">
        <tr> 
          <td id=qq_14167815 style="word-break:break-all;line-height:150%"> 
            <br><font color=ffffff>
            <%=ubb2html(formatStr(autourl(rs("news_content"))),true,true)%></font> <br>
            <br>
            --------------------------------------------------------------------------------<br>
            &nbsp;<img src=img/none.gif border=0><img src=img/i8.gif border='0'>&nbsp;<b><font color="#3399FF">相关新闻</font></b><br>
            <%sql="select * from news where news_content like '%"&rs("news_keyword")&"%' and news_id <> "&rs("news_id")&" order by news_date DESC"
			set rs2=server.createobject("adodb.recordset")
            rs2.open sql,conn,1,1
			do while not rs2.eof
            %>&nbsp;<img src=img/none.gif border=0><img src=img/title.gif border='0'>&nbsp;<a href="shownews.asp?news_id=<%=rs2("news_id")%>"><%=rs2("news_title")%></a> <%=rs2("news_date")%><br>         
            <%
			rs2.movenext
			loop
			if rs2.eof and rs2.bof then
			response.write "没有相关新闻"
			end if
			rs2.close
			set rs2=nothing
			%>
           </td>
        </tr>
      </table></td>
        </tr>
      </table>
      <%call br%>
      <table width="96%" border="0" cellspacing="1" cellpadding="6" align="center" bgcolor="#333333">
        <tr> 
<td bgcolor="#000000"><font color=red>日期：<%=rs("news_date")%> 查看：<%=rs("news_count")%></font></td>        
<td align="center" bgcolor="#222222"><input type="button"  value="复制"  onClick="copycode(findobj('qq_3414630'));" class="button" style="color: #FFFFFF">&nbsp;<input type="button"  value="打印"  onClick="javascript:window.print()" class="button" style="color: #FFFFFF">&nbsp;<input type="button"  value="返回"  onClick="window.open('<%=homeurl%>')" class="button" style="color: #FFFFFF">&nbsp;<input type="button" name="close2" value="关闭"  onClick="window.close();return false;" class="button" style="color: #FFFFFF"></td></tr>
      </table>
<%call br%>
<%call br%>
</td>
        </tr>
<TR><td height="1" width="100%" bgcolor="<%=border%>"></td></tr>
      </table>
<%
rs.close
set rs=nothing
end sub%>
⌨️ 快捷键说明

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